Changeset 13144


Ignore:
Timestamp:
01/13/11 23:19:22 (11 years ago)
Author:
ehuelsmann
Message:

Stabilize the new way of terminating ABCL.

Location:
trunk/abcl/src/org/armedbear/lisp
Files:
3 edited

Legend:

Unmodified
Added
Removed
  • trunk/abcl/src/org/armedbear/lisp/Interpreter.java

    r13143 r13144  
    407407                reportError(c, thread);
    408408            }
     409            catch (ProcessingTerminated e) {
     410                throw e;
     411            }
     412            catch (IntegrityError e) {
     413                return;
     414            }
    409415            catch (Throwable t) {
    410416                getStandardInput().clearInput();
  • trunk/abcl/src/org/armedbear/lisp/Lisp.java

    r13108 r13144  
    287287          }
    288288        catch (ControlTransfer c)
     289          {
     290            throw c;
     291          }
     292        catch (ProcessingTerminated c)
     293          {
     294            throw c;
     295          }
     296        catch (IntegrityError c)
    289297          {
    290298            throw c;
  • trunk/abcl/src/org/armedbear/lisp/Main.java

    r13143 r13144  
    4343
    4444            public void run() {
    45                 Interpreter interpreter = Interpreter.createDefaultInstance(args);
    46                 if (interpreter != null) {
    47                     try {
    48                         interpreter.run();
    49                     } catch (ProcessingTerminated e) {
    50                         System.exit(e.getStatus());
    51                     }
    52 
     45               try {
     46                    Interpreter interpreter = Interpreter.createDefaultInstance(args);
     47                    if (interpreter != null)
     48                            interpreter.run();
     49                } catch (ProcessingTerminated e) {
     50                    System.exit(e.getStatus());
    5351                }
    5452            }
Note: See TracChangeset for help on using the changeset viewer.