From 3a558d22ece741846f32294488306f3d786afcbc Mon Sep 17 00:00:00 2001
From: Kartik Agaram <vc@akkartik.com>
Date: Sun, 21 Jun 2020 23:29:46 -0700
Subject: 6573

---
 apps/factorial.mu | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

(limited to 'apps')

diff --git a/apps/factorial.mu b/apps/factorial.mu
index 5a748f0d..4c389a57 100644
--- a/apps/factorial.mu
+++ b/apps/factorial.mu
@@ -31,9 +31,9 @@ fn test-factorial {
   check-ints-equal result 0x78 "F - test-factorial"
 }
 
-fn main args: (addr array (addr array byte)) -> exit-status/ebx: int {
-  var a/eax: (addr array (addr array byte)) <- copy args
-  var tmp/ecx: int <- length a
+fn main args-on-stack: (addr array (addr array byte)) -> exit-status/ebx: int {
+  var args/eax: (addr array (addr array byte)) <- copy args-on-stack
+  var tmp/ecx: int <- length args
   $main-body: {
     # if (len(args) <= 1) factorial(5)
     compare tmp, 1
@@ -44,7 +44,7 @@ fn main args: (addr array (addr array byte)) -> exit-status/ebx: int {
       break $main-body
     }
     # if (args[1] == "test") run-tests()
-    var tmp2/ecx: (addr addr array byte) <- index a, 1
+    var tmp2/ecx: (addr addr array byte) <- index args, 1
     var tmp3/eax: boolean <- string-equal? *tmp2, "test"
     compare tmp3, 0
     {
-- 
cgit 1.4.1-2-gfad0