Changeset 176

Timestamp:

10/24/02 19:40:55 (21 years ago)

Author:

piso

Message:

CMUCL_PROMPT_PATTERN

File:

• trunk/j/src/org/armedbear/j/LispShell.java (modified) (4 diffs)

trunk/j/src/org/armedbear/j/LispShell.java

@@ -3 +3 @@
  *
  * Copyright (C) 2002 Peter Graves
- * $Id: LispShell.java,v 1.3 2002-10-24 17:33:53 piso Exp $
+ * $Id: LispShell.java,v 1.4 2002-10-24 19:40:55 piso Exp $
  *
  * This program is free software; you can redistribute it and/or
@@ -27 +27 @@
         "^[^>\\*\\]]*[>\\*\\]] *";
 
+    private static final String CMUCL_PROMPT_PATTERN =
+        "^\\* |^[0-9]+\\] ";
+
     private LispShell(String shellCommand)
     {
@@ -36 +39 @@
     {
         LispShell shell = new LispShell(shellCommand);
-        shell.setPromptRE(DEFAULT_PROMPT_PATTERN);
         shell.startProcess();
         if (shell.getProcess() == null) {
@@ -48 +50 @@
             return null;
         }
+        if (shellCommand.equals("/usr/bin/lisp"))
+            shell.setPromptRE(CMUCL_PROMPT_PATTERN);
+        else
+            shell.setPromptRE(DEFAULT_PROMPT_PATTERN);
         shell.needsRenumbering = true;
         return shell;