3 年之前 · 90903662a9
--- a/sectorlisp.S
+++ b/sectorlisp.S
@@ -104,7 +104,7 @@ PrintObject:					# PrintObject(x:si)
 
															 	jnz	.PrintString			# -> ret
														
 
															 	ret
														
 
															-Read:	call	GetChar
														
 
															+Read:	xchg	%dx,%ax
														
 
															 	call	GetToken
														
 
															 GetObject:					# called just after GetToken
														
 
															 	cmp	$'(',%al