Commit ef32ff0a authored by simonmar's avatar simonmar

[project @ 2001-08-16 09:59:38 by simonmar]

Set the SrcLoc for expressions typed on the command line to
<interactive>:1 rather than <no file>:0.
parent 1a4ea2e4
......@@ -576,7 +576,7 @@ hscParseStmt dflags str
case parseStmt buf PState{ bol = 0#, atbol = 1#,
context = [], glasgow_exts = glaexts,
loc = mkSrcLoc SLIT("<no file>") 0 } of {
loc = mkSrcLoc SLIT("<interactive>") 1 } of {
PFailed err -> do { hPutStrLn stderr (showSDoc err);
-- Not yet implemented in <4.11 freeStringBuffer buf;
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment