diff options
Diffstat (limited to 'examples/reverse.fype')
| -rw-r--r-- | examples/reverse.fype | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/examples/reverse.fype b/examples/reverse.fype new file mode 100644 index 0000000..a4384b6 --- /dev/null +++ b/examples/reverse.fype @@ -0,0 +1,7 @@ +(def (reverse x) + (def (my-reverse x y) + (if (null? x) + y + (my-reverse (cdr x) (cons (car x) y)))) + (my-reverse x '())) +(reverse (list 1 2 3)) |