diff --git a/main.fs b/main.fs
index c09427b..afed6ef 100644
--- a/main.fs
+++ b/main.fs
@@ -26,7 +26,7 @@ include debug.fs
 \ (this is used to determine if the change flag needs to be set)
 \ It begins with the change flag set, to draw the screen the first time.
 \ this variable can contain decimal-point amounts of devices. Things that need a non-decimal amount can round it with ftrunc.
-create devices 0e f, 0e f, -1
+create devices 0e f, -1 ,
 \ old devices is the old device count. For convenience.
 : old-devices devices float + ;
 
@@ -65,7 +65,7 @@ S" you feel like throwing some stuff into the pool." set-message
 \ clear-all clears the change flag on all values.
 : clear-all membercost 1 cleared devices 2 cleared message 2 cleared ;
 \ the word !0= tests if something is non-zero
-: !0= ( n -- flag ) 0= 0 ;
+: !0= ( n -- flag ) 0= 0= ;
 \ the word f!0= tests if a floating thing is non-zero
 : f!0= ( r -- flag ) f0= 0= ;