~rabbits/drifblim

3a375bb481af59c634491a817516ba6e0ae5437a — Devine Lu Linvega a month ago 030dc8c
Set default writing to 0x0100
1 files changed, 5 insertions(+), 0 deletions(-)

M src/drifblim.tal
M src/drifblim.tal => src/drifblim.tal +5 -0
@@ 26,9 26,11 @@ BRK

	#0a18 DEO
	( pass1 )
	#0100 .program/head STZ2
	;dict/reset ;scope scpy
	;src handle-file
	( pass2 )
	#0100 .program/head STZ2
	;dict/reset ;scope scpy
	#01 .program/write STZ
	;src handle-file


@@ 163,6 165,9 @@ JMP2r
	( move )
	#0001 !move-head

(
@|helpers )

@get-hex ( str* -- value* )

	DUP2 is-hex ?&valid