From 3a558d22ece741846f32294488306f3d786afcbc Mon Sep 17 00:00:00 2001 From: Kartik Agaram Date: Sun, 21 Jun 2020 23:29:46 -0700 Subject: 6573 --- html/apps/factorial.mu.html | 24 ++++++++++++------------ 1 file changed, 12 insertions(+), 12 deletions(-) (limited to 'html/apps/factorial.mu.html') diff --git a/html/apps/factorial.mu.html b/html/apps/factorial.mu.html index 48790a3e..25a0fa2f 100644 --- a/html/apps/factorial.mu.html +++ b/html/apps/factorial.mu.html @@ -16,8 +16,8 @@ a { color:inherit; } * { font-size:12pt; font-size: 1em; } .muTest { color: #5f8700; } .LineNr { } -.SpecialChar { color: #d70000; } .muFunction { color: #af5f00; text-decoration: underline; } +.SpecialChar { color: #d70000; } .Comment { color: #005faf; } .Constant { color: #008787; } .Delimiter { color: #c000c0; } @@ -70,7 +70,7 @@ if ('onhashchange' in window) { 11 # 12 # Compare apps/factorial4.subx 13 -14 fn factorial n: int -> result/eax: int { +14 fn factorial n: int -> result/eax: int { 15 compare n 1 16 { 17 break-if-> @@ -80,31 +80,31 @@ if ('onhashchange' in window) { 21 break-if-<= 22 var tmp/ecx: int <- copy n 23 tmp <- decrement -24 result <- factorial tmp +24 result <- factorial tmp 25 result <- multiply n 26 } 27 } 28 -29 fn test-factorial { -30 var result/eax: int <- factorial 5 -31 check-ints-equal result 0x78 "F - test-factorial" +29 fn test-factorial { +30 var result/eax: int <- factorial 5 +31 check-ints-equal result 0x78 "F - test-factorial" 32 } 33 -34 fn main args: (addr array (addr array byte)) -> exit-status/ebx: int { -35 var a/eax: (addr array (addr array byte)) <- copy args -36 var tmp/ecx: int <- length a +34 fn main args-on-stack: (addr array (addr array byte)) -> exit-status/ebx: int { +35 var args/eax: (addr array (addr array byte)) <- copy args-on-stack +36 var tmp/ecx: int <- length args 37 $main-body: { 38 # if (len(args) <= 1) factorial(5) 39 compare tmp, 1 40 { 41 break-if-> -42 var tmp/eax: int <- factorial 5 +42 var tmp/eax: int <- factorial 5 43 exit-status <- copy tmp 44 break $main-body 45 } 46 # if (args[1] == "test") run-tests() -47 var tmp2/ecx: (addr addr array byte) <- index a, 1 -48 var tmp3/eax: boolean <- string-equal? *tmp2, "test" +47 var tmp2/ecx: (addr addr array byte) <- index args, 1 +48 var tmp3/eax: boolean <- string-equal? *tmp2, "test" 49 compare tmp3, 0 50 { 51 break-if-= -- cgit 1.4.1-2-gfad0