diff options
author | Chris Lattner <sabre@nondot.org> | 2003-11-23 17:55:19 +0000 |
---|---|---|
committer | Chris Lattner <sabre@nondot.org> | 2003-11-23 17:55:19 +0000 |
commit | 9d014e70bb572d8b9250c9f2089ef2a67caa3727 (patch) | |
tree | 25f48f63d65c7361cf42bfb7f38a21c11a0f6a30 /projects/Stacker/samples/fibonacci.st | |
parent | 900f12b9f0784d0cf014e384d2d44099cb58166e (diff) | |
download | llvm-9d014e70bb572d8b9250c9f2089ef2a67caa3727.tar.gz llvm-9d014e70bb572d8b9250c9f2089ef2a67caa3727.tar.bz2 llvm-9d014e70bb572d8b9250c9f2089ef2a67caa3727.tar.xz |
Initial checkin of stacker samples
git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@10181 91177308-0d34-0410-b5e6-96231b3b80d8
Diffstat (limited to 'projects/Stacker/samples/fibonacci.st')
-rw-r--r-- | projects/Stacker/samples/fibonacci.st | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/projects/Stacker/samples/fibonacci.st b/projects/Stacker/samples/fibonacci.st new file mode 100644 index 0000000000..d5132d8bbe --- /dev/null +++ b/projects/Stacker/samples/fibonacci.st @@ -0,0 +1,6 @@ +# +# Fibonacci Algorithm in Stacker. +# +: print >d CR; +: fibonacci RROT DUP2 + print 3 PICK -- ; +: MAIN 0 print 1 print 44 WHILE fibonacci END ; |