fix handling of macros at EOF (resolves #62)

src/Language/SystemVerilog/Parser/Lex.x

@@ -787,6 +787,11 @@ peekChar = do
         then lexicalError "unexpected end of input"
         else return $head str
 
+atEOF :: Alex Bool
+atEOF = do
+    (_, _, _, str) <- alexGetInput
+    return $ null str
+
 takeMacroDefinition :: Alex (String, [(String, Maybe String)])
 takeMacroDefinition = do
     leadCh <- peekChar
@@ -1068,7 +1073,11 @@ handleDirective (posOrig, _, _, strOrig) len = do
         "define" -> do
             dropSpaces
             name <- takeString
-            defn <- takeMacroDefinition
+            defn <- do
+                eof <- atEOF
+                if eof
+                    then return ("", [])
+                    else takeMacroDefinition
             modify $ \s -> s { lsEnv = Map.insert name defn env }
             alexMonadScan
         "undef" -> do

test/lex/no_newline.sv

@@ -0,0 +1,6 @@
+`include "no_newline.vh"
+module top;
+`ifdef A
+    initial $display("A is defined!");
+`endif
+endmodule

test/lex/no_newline.v

@@ -0,0 +1,6 @@
+`include "no_newline.vh"
+module top;
+`ifdef A
+    initial $display("A is defined!");
+`endif
+endmodule

test/lex/no_newline.vh

@@ -0,0 +1 @@
+`define A