added some type checking stuff. vardecl now works for basictypes and unary operators

[cc1516.git] / spl.icl

diff --git a/spl.icl b/spl.icl
index 240de63..1690d71 100644 (file)
--- a/spl.icl
+++ b/spl.icl
@@ -66,8 +66,7 @@ Start w
                        # stdin = if (not args.parse) stdin (
                                stdin <<<  "//PARSER\n" <<< toString parseOut <<< "//PARSER\n")
                        = case sem parseOut of
-                               (Left e) = snd $ fclose (stdin <<< "SEMERRORS: " <<<
-                                       join "\n" (map toString e)) w
+                               (Left e) = snd $ fclose (stdin <<< join "\n" (map toString e)) w
                                (Right semOut)
                                # stdin = if (not args.sem) stdin (
                                        stdin <<<  "//SEM\n" <<< toString semOut <<< "//SEM\n")