projects
/
ghc-base.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
[project @ 2003-07-31 10:48:50 by panne]
[ghc-base.git]
/
Text
/
ParserCombinators
/
Parsec
/
examples
/
while
/
fib.wh
1
v := 1;
2
u := 1;
3
if n <= 2 then
4
skip
5
else
6
while n > 2 do (
7
t := u;
8
u := v;
9
v := u + t
10
)
11