浏览代码

Initialize register cache for robustness

Hikaru Ikuta 3 年之前
父节点
当前提交
1136e5752e
共有 1 个文件被更改,包括 1 次插入0 次删除
  1. 1 0
      sectorlisp.S

+ 1 - 0
sectorlisp.S

@@ -55,6 +55,7 @@ begin:	mov	$0x8000,%sp			# uses higher address as stack
 main:	mov	%sp,%cx
 	mov	$'\r',%al
 	call	PutChar
+	mov	%dx,%fs				# Clear input lookahead cache
 	call	Read
 	call	EvalPrint
 	jmp	main