Editor was made run apostrophe-containing modules from REPL normally.

This commit is contained in:
Denis Buzdalov 2020-11-25 21:27:23 +03:00 committed by G. Allais
parent 9990b5ad29
commit 60c8695a6d
4 changed files with 6 additions and 1 deletions

View File

@ -706,7 +706,7 @@ process Edit
Nothing => pure NoFileLoaded
Just f =>
do let line = maybe "" (\i => " +" ++ show (i + 1)) (errorLine opts)
coreLift $ system (editor opts ++ " " ++ f ++ line)
coreLift $ system (editor opts ++ " \"" ++ f ++ "\"" ++ line)
loadMainFile f
process (Compile ctm outfile)
= compileExp ctm outfile

View File

@ -2,3 +2,6 @@
Module'> 2
Module'> Bye for now!
"5"
Module'> Loaded file Module'.idr
Module'>
Bye for now!

View File

@ -0,0 +1 @@
:e

View File

@ -1,4 +1,5 @@
$1 --no-banner --no-color --console-width 0 "Module'.idr" < input
$1 --exec main --cg ${IDRIS2_TESTS_CG} "Module'.idr"
EDITOR=true $1 --no-banner --no-color --console-width 0 "Module'.idr" < input-ed
rm -rf build