2013-08-16: docstring works again.

docstring works again.

diff --git a/fib.w b/fib.w
--- a/fib.w
+++ b/fib.w
@@ -4,7 +4,7 @@
 ;; Fibonacci Functions
 
 define : fib n
-;    "Get Fibonacci Elements in Linear Time"
+    . "Get Fibonacci Elements in Linear Time"
     let rek : (i 0) (u 1) (v 1)
         if : >= i : - n 2
             . v
@@ -22,7 +22,7 @@ define-syntax {
 
 ;; Now do the fibonacci again
 define : fibcurl n
-;    "Get Fibonacci Elements in Linear Time"
+    . "Get Fibonacci Elements in Linear Time"
     let rek : (i 0) (u 1) (v 1)
         if : { i >= ({ n - 2 }) }
             . v
@@ -46,7 +46,7 @@ define-syntax {
 
 ;; And a complete infix-fibonacci
 define : fibcurl2 n
-;    "Get Fibonacci Elements in Linear Time"
+    . "Get Fibonacci Elements in Linear Time"
     let rek : (i 0) (u 1) (v 1)
         if : { i >= { n - 2 } }
             . v
@@ -55,6 +55,8 @@ define : fibcurl2 n
                . v 
                { u + v }
 
+;; But to be frank: Prefix looks better.
+
 display : { { 1 + 2 } * { 2 * 3 } }
 ; display : fibcurl2 5
 ; TODO: Make the macro recursive, so it can actually cover arbitrary depths of curly braces.