~rabbits/drifblim

0e2e73d0e6891b71fb41c891deadd79e2e82de4e — neauoire 11 months ago 902b186
Detect writing in zp
1 files changed, 3 insertions(+), 2 deletions(-)

M src/drifblim.tal
M src/drifblim.tal => src/drifblim.tal +3 -2
@@ 207,9 207,10 @@
	JMP2r

@record-length ( byte -- )
	.scan LDZ ?{ POP JMP2r }
	?{ JMP2r }
	.head LDZ2 .length STZ2
	.scan LDZ ?{ JMP2r }
	.head LDZ2 OVR ?{ ;err/zeropage <set-error> }
	.length STZ2
	JMP2r

(