icon-fringe.icn: Give record types a capital letter.

[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.
 
-record node(left, data, right)
+record Node(left, data, right)
 ## 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 )")
-    return node(left, data, right)
+    return Node(left, data, right)
   }
 end