diff options
Diffstat (limited to 'tests/stack_machine_tee/instructions.s.tcl')
-rwxr-xr-x | tests/stack_machine_tee/instructions.s.tcl | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/tests/stack_machine_tee/instructions.s.tcl b/tests/stack_machine_tee/instructions.s.tcl new file mode 100755 index 0000000..98117c7 --- /dev/null +++ b/tests/stack_machine_tee/instructions.s.tcl @@ -0,0 +1,14 @@ +#!/usr/bin/env tclsh + +source tclasm.tcl + +### All three stores should write the hABCDEF + +set_sp 0 +const hABCDEF +tee +store h000100 +tee +store h000200 +store h000300 +halt |