fix test.cval

This commit is contained in:
2025-11-17 15:48:51 +09:00
parent 9d1a9147b7
commit 1e15ec36d2

View File

@@ -4,7 +4,9 @@ val [int->int] fib (int n) {
return if eq n 0 { return if eq n 0 {
1 1
} else { } else {
mul n fib mul n {
fib {sub n 1}
}
}; };
}; };
@@ -24,4 +26,4 @@ val [char * int->char]get_char_of(char* s int index) {
return * { return * {
add s index add s index
}; };
} };