Fixed fib sample
This commit is contained in:
@@ -1,6 +1,6 @@
|
||||
@extern putchar fun: character sint32 -> sint32
|
||||
@extern putchar fun: character u32 -> u32
|
||||
|
||||
fib fun: number sint32 -> sint32
|
||||
fib fun: number u32 -> u32
|
||||
ret if number < 2:
|
||||
number
|
||||
else
|
||||
@@ -8,13 +8,13 @@ fib fun: number sint32 -> sint32
|
||||
;
|
||||
;
|
||||
|
||||
printNum fun: number sint32
|
||||
biggest sint32 <- 10
|
||||
printNum fun: number u32
|
||||
biggest u32 <- 10
|
||||
rep biggest <= number: biggest <- biggest * 10
|
||||
biggest <- biggest / 10
|
||||
|
||||
rep biggest > 0:
|
||||
digit sint32 <- number / biggest
|
||||
digit u32 <- number / biggest
|
||||
putchar(digit + '0')
|
||||
number <- number % biggest
|
||||
biggest <- biggest / 10
|
||||
@@ -22,9 +22,9 @@ printNum fun: number sint32
|
||||
;
|
||||
|
||||
// Print first 20 fibonaci numbers
|
||||
main fun -> sint32
|
||||
rep i sint32 <- 0, i < 20:
|
||||
res sint32 <- fib(i)
|
||||
main fun -> u32
|
||||
rep i u32 <- 0, i < 20:
|
||||
res u32 <- fib(i)
|
||||
printNum(res)
|
||||
putchar('\n')
|
||||
i <- i + 1
|
||||
|
||||
Reference in New Issue
Block a user