X-Git-Url: https://git.distorted.org.uk/~mdw/fringe/blobdiff_plain/721cfbbbd06a1b4ce05fcc279d9b3d94adc461da..7e418f01de41b90e6e1c684d35a9df548855c71e:/icon-fringe.icn

diff --git a/icon-fringe.icn b/icon-fringe.icn
index 8f9a0a0..47f88b0 100644
--- 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