From 68ea390db8e5977dcc84dc93daeb467ee243cb35 Mon Sep 17 00:00:00 2001 From: Aleksey Veresov Date: Fri, 16 Oct 2020 13:34:42 +0300 Subject: Restyled ia32. --- ia32/macro.sts | 48 ++++++++++++++++++++++++------------------------ 1 file changed, 24 insertions(+), 24 deletions(-) (limited to 'ia32/macro.sts') diff --git a/ia32/macro.sts b/ia32/macro.sts index befcccb..efd062e 100644 --- a/ia32/macro.sts +++ b/ia32/macro.sts @@ -1,50 +1,50 @@ [ next 0 - # ad ?' # ff ?' # 20 ?' + # ad ?' # ff ?' # 20 ?' ] [ defasm 1 - [ %1% 0 - _%0% ?. - \] - ?$ ?? _%1% - ?$ # 4 ?+ ?. + [ %1% 0 + _%0% ?. + \] + ?$ ?? _%1% + ?$ # 4 ?+ ?. ] [ defword 1 - [ %1% 0 - _%0% ?. - \] - ?$ ?? _%1% - _docol # 4 ?+ ?. + [ %1% 0 + _%0% ?. + \] + ?$ ?? _%1% + _docol # 4 ?+ ?. ] [ defarr 2 - _data_segment ?choose - ?$ ?? _%1%_arr - # %2% # 4 ?* ?res - _code_segment ?choose - defasm %1% - ; push _%1%_arr - # 68 ?' _%1%_arr ?. - next + _data_segment ?choose + ?$ ?? _%1%_arr + # %2% # 4 ?* ?res + _code_segment ?choose + defasm %1% + ; push _%1%_arr + # 68 ?' _%1%_arr ?. + next ] [ defvar 1 - defarr %1% 1 + defarr %1% 1 ] [ literal 0 - lit # %1% ?. + lit # %1% ?. ] [ set_entry 0 - ?$ _threaded_code_entry ?! + ?$ _threaded_code_entry ?! ] [ if 0 - 0branch ?$ # 0 ?. + 0branch ?$ # 0 ?. ] [ fi 0 - ?$ ?swap ?! + ?$ ?swap ?! ] -- cgit v1.2.3