aboutsummaryrefslogtreecommitdiff
path: root/tclasm.tcl
diff options
context:
space:
mode:
authorWojciech Kosior <kwojtus@protonmail.com>2020-09-05 18:32:44 +0200
committerWojciech Kosior <kwojtus@protonmail.com>2020-09-05 18:38:27 +0200
commitf37a50d6cfe86e6f5ebe368c0868878fd72aa884 (patch)
tree22c8298f9c20a6817036ecf8f6d905fe5d6fa894 /tclasm.tcl
parent8d92524d4c46493ad83ebd493dabd3f88e11037b (diff)
downloadAGH-engineering-thesis-f37a50d6cfe86e6f5ebe368c0868878fd72aa884.tar.gz
AGH-engineering-thesis-f37a50d6cfe86e6f5ebe368c0868878fd72aa884.zip
add jump instruction together with bench
Diffstat (limited to 'tclasm.tcl')
-rw-r--r--tclasm.tcl9
1 files changed, 9 insertions, 0 deletions
diff --git a/tclasm.tcl b/tclasm.tcl
index c5b1cb3..1f716ee 100644
--- a/tclasm.tcl
+++ b/tclasm.tcl
@@ -150,6 +150,15 @@ proc set_sp {address} {
}
+proc _jump {address_part} {
+ puts 010000001[__to_binary $address_part 7]
+}
+
+proc jump {address} {
+ _with_im _jump $address
+}
+
+
# Instructions, that grow stack
proc tee {} {