diff options
author | exegete <nikitf-97@mail.ru> | 2020-10-17 03:33:08 +0300 |
---|---|---|
committer | exegete <nikitf-97@mail.ru> | 2020-10-17 03:33:08 +0300 |
commit | b6b9e29c1484c9c8b8af2b382d3a9d796c310217 (patch) | |
tree | 531c498be57a6ed4c61035e33dade9d6a18ae755 /ia32/macro.sts | |
parent | 808a161313e0a03ead45f843fee3d9c40bec02bd (diff) | |
download | cryptrobber-b6b9e29c1484c9c8b8af2b382d3a9d796c310217.tar cryptrobber-b6b9e29c1484c9c8b8af2b382d3a9d796c310217.tar.xz cryptrobber-b6b9e29c1484c9c8b8af2b382d3a9d796c310217.zip |
Common dir added, stderr output, minor changes
Diffstat (limited to 'ia32/macro.sts')
-rw-r--r-- | ia32/macro.sts | 20 |
1 files changed, 5 insertions, 15 deletions
diff --git a/ia32/macro.sts b/ia32/macro.sts index 9335176..fa9510b 100644 --- a/ia32/macro.sts +++ b/ia32/macro.sts @@ -20,7 +20,7 @@ [ defconst 2 defasm %1% - # 68 ?' # %2% ?. ; push %2% + # 68 ?' # %2% ?. ; push %2% next ] @@ -30,7 +30,7 @@ # %2% # 4 ?* ?res _code_segment ?choose defasm %1% - # 68 ?' _%1%_arr ?. ; push _%1%_arr + # 68 ?' _%1%_arr ?. ; push _%1%_arr next ] @@ -40,17 +40,13 @@ [ as 1 _data_segment ?choose - defword %1% - lit ?$ # 0 ?. - exit + defword %1% + lit ?$ # 0 ?. + exit _code_segment ?choose lit ?. ! ] -[ local 1 - top as %1% -] - [ literal 0 lit # %1% ?. ] @@ -88,9 +84,3 @@ branch ?swap ?. ?$ ?swap ?! ] - -[ change 0 - dup get - swap 2 get swap 2 + set - swap drop -] |