From 5a6004920a860160cdb4550f104b7bb20a54da7f Mon Sep 17 00:00:00 2001
From: Kyle Gunger <kgunger12@gmail.com>
Date: Sun, 26 Mar 2023 16:14:10 -0400
Subject: Fixed multiple simple parameters

---
 tnslc/tnslc.tnsl | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'tnslc/tnslc.tnsl')

diff --git a/tnslc/tnslc.tnsl b/tnslc/tnslc.tnsl
index a91d273..05cbe03 100644
--- a/tnslc/tnslc.tnsl
+++ b/tnslc/tnslc.tnsl
@@ -2609,6 +2609,7 @@
                 "\tsub rsp, ", int_to_string(ctmp.norm_size()), "\n"
             }, "")
             ;ctmp.set(val, out)
+            ;start = _param_end(tok, start) + 1
         ;; else
             ;regs++
         ;/
@@ -2638,6 +2639,7 @@
             }, "")
             ;ctmp.set(val, out)
             ;regs++
+            ;start = _param_end(tok, start) + 1
         ;; else if (regs == 6)
             ;break
         ;/
@@ -2664,6 +2666,7 @@
                 "\tmov ", get_reg(reg, ctmp.norm_size()),", [rsp]\n",
                 "\tadd rsp, ", int_to_string(ctmp.norm_size()), "\n"
             }, "")
+            ;reg++
         ;; else if (reg == 6)
             ;break
         ;/
-- 
cgit v1.2.3