azur/bobbylisp
1
1
Fork 0
mirror of https://github.com/azur1s/bobbylisp.git synced 2024-10-16 02:37:40 -05:00
Code Issues Projects Releases Wiki Activity

Compare commits

base: azur:8cfeb61549c2767c01d93a6f1c02da524ba28e72
Branches Tags
azur:master
azur:tc
...
compare: azur:47fbb70b8da4a724aded3d72b75cbd0fa88608a4
Branches Tags
azur:master
azur:tc

2 commits
8cfeb61549 ... 47fbb70b8d

Author SHA1 Message Date
Natapat Samutpong 47fbb70b8d rename 2022-04-09 22:17:36 +07:00
Natapat Samutpong dfe6efd326 Update README.md 2022-04-09 22:12:42 +07:00
2 changed files with 6 additions and 6 deletions
Show stats Expand all files Collapse all files

8
example/iter.hz → example/map.hz
View file

@ -1,4 +1,4 @@
fun iter_ (vec: [int]) (fn: |int| -> int) (current: int): void = do fun map_ (vec: [int]) (fn: |int| -> int) (current: int): void = do
if current == @len(vec) then if current == @len(vec) then
do end do end
else else
@ -8,16 +8,16 @@ fun iter_ (vec: [int]) (fn: |int| -> int) (current: int): void = do
|> @write(_) |> @write(_)
@write("\n") @write("\n")
iter_(vec, fn, current + 1) map_(vec, fn, current + 1)
end end
end end
end end
fun iter (vec: [int]) (fn: |int| -> int): void = iter_(vec, fn, 0) fun map (vec: [int]) (fn: |int| -> int): void = map_(vec, fn, 0)
fun mul10 (x: int): int = x * 10 fun mul10 (x: int): int = x * 10
fun main: void = do fun main: void = do
let foo: [int] = [69, 420, 727, 1337, 42069, 69420] let foo: [int] = [69, 420, 727, 1337, 42069, 69420]
iter(foo, mul10) map(foo, mul10)
end end