asymptote 1.87

git-svn-id: svn://tug.org/texlive/trunk@15535 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 10 insertions, 6 deletions

diff --git a/Build/source/utils/asymptote/process.cc b/Build/source/utils/asymptote/process.cc
index a84505d523c..accf5b4b5a7 100644
--- a/Build/source/utils/asymptote/process.cc
+++ b/Build/source/utils/asymptote/process.cc
@@ -626,7 +626,6 @@ class iprompt : public icore {
     if (cl.simple()) {
       // Don't store exit commands in the history file.
       interact::deleteLastLine();
-
       running=false;
       return true;
     }
@@ -643,9 +642,7 @@ class iprompt : public icore {
       running=false;
       restart=true;
       startline="";
-
       run::purge();
-
       return true;
     }
     else return false;
@@ -659,13 +656,19 @@ class iprompt : public icore {
     else return false;
   }
 
+  bool erase(commandLine cl) {
+    running=false;
+    restart=true;
+    if (cl.simple())
+      startline="erase()";
+    else startline=cl.line;
+    return true;
+  }
 
   bool input(commandLine cl) {
-    string prefix="include ";
-    string line=prefix+cl.rest;
     running=false;
     restart=true;
-    startline=line;
+    startline="include "+cl.rest;
     return true;
   }
 
@@ -679,6 +682,7 @@ class iprompt : public icore {
     ADDCOMMAND(q,q);
     ADDCOMMAND(exit,exit);
     ADDCOMMAND(reset,reset);
+    ADDCOMMAND(erase,erase);
     ADDCOMMAND(help,help);
     ADDCOMMAND(input,input);