Merge branch 'master' of git@github.com:mzp/scheme-abc

[happyabc/happyabc.git] / src / lisp.ml

diff --git a/src/lisp.ml b/src/lisp.ml
index 2761629..74e7d30 100644 (file)
--- a/src/lisp.ml
+++ b/src/lisp.ml
@@ -5,9 +5,10 @@ open Parsec
 
 exception Syntax_error
 
-let symbol = function
-    Symbol n -> n
-  | _ -> failwith "expected symbol"
+let symbol = 
+  function
+      Symbol n -> n
+    | _ -> failwith "expected symbol"
 
 let qname symbol =
   try