diff --git a/bin/sectorlisp.bin b/bin/sectorlisp.bin
index 4862b4b..733ea50 100755
Binary files a/bin/sectorlisp.bin and b/bin/sectorlisp.bin differ
diff --git a/sectorlisp.S b/sectorlisp.S
index abed8b2..b698959 100644
--- a/sectorlisp.S
+++ b/sectorlisp.S
@@ -67,7 +67,8 @@ _begin:	mov	$g_mem,%cx
 	pop	%es
 	pop	%ss
 	mov	%cx,%sp
-	mov	$NIL,ONE
+	inc	%ax
+	xchg	%ax,ONE				# mov $NIL,ONE
 main:	mov	$'\n',%dl
 	call	GetToken
 	call	GetObject