~mdw
/
fringe
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
algol68-fringe.a68: Fix stupid typo in a comment.
[fringe]
/
icon-fringe.icn
diff --git
a/icon-fringe.icn
b/icon-fringe.icn
index
8f9a0a0
..
47f88b0
100644
(file)
--- a/
icon-fringe.icn
+++ b/
icon-fringe.icn
@@
-44,7
+44,7
@@
end
###--------------------------------------------------------------------------
### Node structure.
###--------------------------------------------------------------------------
### Node structure.
-record
n
ode(left, data, right)
+record
N
ode(left, data, right)
## A simple binary tree structure.
procedure fringe(node)
## A simple binary tree structure.
procedure fringe(node)
@@
-67,7
+67,7
@@
procedure scan_tree()
data := move(1) | bail("no data")
right := scan_tree()
=")" | bail("missing )")
data := move(1) | bail("no data")
right := scan_tree()
=")" | bail("missing )")
- return
n
ode(left, data, right)
+ return
N
ode(left, data, right)
}
end
}
end