diff options
| author | Kyle Gunger <kgunger12@gmail.com> | 2022-10-20 16:47:49 -0400 |
|---|---|---|
| committer | Kyle Gunger <kgunger12@gmail.com> | 2022-10-20 16:47:49 -0400 |
| commit | eda272dc91a651f9b923b45efdde4e0bf71dc7bb (patch) | |
| tree | 650a798a623752a8edb0828044bd3d95a51f7c7d /tnslc/compile/isa_x86.tnsl | |
| parent | 01d6580a17d5dc00b84cc3e72e0a86b090c1c6bd (diff) | |
Add boilerplate
Diffstat (limited to 'tnslc/compile/isa_x86.tnsl')
| -rw-r--r-- | tnslc/compile/isa_x86.tnsl | 18 |
1 files changed, 16 insertions, 2 deletions
diff --git a/tnslc/compile/isa_x86.tnsl b/tnslc/compile/isa_x86.tnsl index e342c90..e11311a 100644 --- a/tnslc/compile/isa_x86.tnsl +++ b/tnslc/compile/isa_x86.tnsl @@ -56,6 +56,13 @@ ;return construct_statement("\tjmp ", {pos}) ;/ +/; cjmp_asm ({}charp suffix, pos) [{}charp] + ;{}charp p = "\tj" + ;add_strings(~p, ~suffix) + ;p.append(' ') + ;return construct_statement(p, {pos}) +;/ + /; mem_offset ({}charp pos, offset, scale) [{}charp] ;{}charp tmp = construct_statement("(", {pos, offset, scale}) ;tmp{len tmp - 1} = ')' @@ -104,6 +111,13 @@ ;add_strings(csec, ~out) ;/ +/; is_common_reg ({}charp n) [bool] + ;return string_equate(n, "ax") || string_equate(n, "bx") || string_equate(n, "cx") || string_equate(n, "dx") + || string_equate(n, "sp") || string_equate(n, "bp") || string_equate(n, "si") || string_equate(n, "di") + || string_equate(n, "8") || string_equate(n, "9") || string_equate(n, "10") || string_equate(n, "11") + || string_equate(n, "12") || string_equate(n, "13") || string_equate(n, "14") || string_equate(n, "15") +;/ + /# Accepted common names: # - ax # - bx @@ -162,7 +176,7 @@ /; make_label ({}charp func_name, func_place, ~{}charp csec) ;func_name.append("_") ;add_strings(~func_name, ~func_place) + ;func_name.append(':') + ;func_name.append('\n') ;add_strings(csec, ~func_name) - ;csec`.append(':') - ;csec`.append('\n') ;/ |