提交: ad4fbff4ac0b35e09fda2b0fc50904e4730b3f5f - nsvtl (git)

Deriving a new dialect of Very Tiny Language from VTL-2 6800 version

Commit MetaInfo

• 修订版: ad4fbff4ac0b35e09fda2b0fc50904e4730b3f5f (tree)
• 时间: 2022-09-25 21:20:20
• 作者: Joel Matthew Rees <joel.rees@gmai...>
• Commiter: Joel Matthew Rees

Log Message

best version for EXORsim (no stack blast)

更改概述

• modified: VTL_6801_exorsim.asm

差异

--- a/VTL_6801_exorsim.asm
+++ b/VTL_6801_exorsim.asm
@@ -540,7 +540,7 @@ EVAL4	CMPA	#'/	; SEE IF IT'S DIVIDE
 EVAL5	SUBA	#'=	; SEE IF EQUAL TEST
 	BNE	EVAL6
 	PULA
-	BSR	SUBTR
+	SUBD	0,X
 	BNE	NOTEQ
 	TSTB
 	BEQ	EQL
@@ -551,7 +551,7 @@ EVAL6	DECA		; SEE IF LESS THAN TEST
 	PULA
 	BEQ	EVAL7
 *
-SUB2	BSR	SUBTR
+SUB2	SUBD	0,X
 	ROLB
 COMOUT	CLRA
 	ANDB	#$01
@@ -581,7 +581,7 @@ GOT	INC	MLDVCT
 	ROR	1,X
 	CLR	DIVQUO
 	CLR	DIVQUO+1
-DIV2	BSR	SUBTR
+DIV2	SUBD	0,X
 	BCC	OK
 	ADDD	0,X
 	CLC