[armedbear-cvs] r13142 - trunk/abcl/src/org/armedbear/lisp

Erik Huelsmann ehuelsmann at common-lisp.net
Thu Jan 13 22:29:41 UTC 2011


Author: ehuelsmann
Date: Thu Jan 13 17:29:41 2011
New Revision: 13142

Log:
Mark exit() invocations as FIXME. I'll address later.

Modified:
   trunk/abcl/src/org/armedbear/lisp/Interpreter.java

Modified: trunk/abcl/src/org/armedbear/lisp/Interpreter.java
==============================================================================
--- trunk/abcl/src/org/armedbear/lisp/Interpreter.java	(original)
+++ trunk/abcl/src/org/armedbear/lisp/Interpreter.java	Thu Jan 13 17:29:41 2011
@@ -89,7 +89,7 @@
             Stream out = getStandardOutput();
             out._writeString(help());
             out._finishOutput();
-            exit(0);
+            exit(0); // FIXME
         }
         if (noinform)
             _NOINFORM_.setSymbolValue(T);
@@ -253,7 +253,7 @@
                         ++i;
                     } else {
                         System.err.println("No argument supplied to --eval");
-                        exit(1);
+                        exit(1); // FIXME
                     }
                 } else if (arg.equals("--load") ||
                            arg.equals("--load-system-file")) {
@@ -261,7 +261,7 @@
                         ++i;
                     } else {
                         System.err.println("No argument supplied to --load");
-                        exit(1);
+                        exit(1); // FIXME
                     }
                 } else {
                     arglist = new Cons(args[i], arglist);
@@ -301,13 +301,13 @@
                             sb.append(c.getCondition().writeToString());
                             sb.append(separator);
                             System.err.print(sb.toString());
-                            exit(2);
+                            exit(2); // FIXME
                         }
                         ++i;
                     } else {
                         // Shouldn't happen.
                         System.err.println("No argument supplied to --eval");
-                        exit(1);
+                        exit(1); // FIXME
                     }
                 } else if (arg.equals("--load") ||
                            arg.equals("--load-system-file")) {
@@ -322,13 +322,13 @@
                     } else {
                         // Shouldn't happen.
                         System.err.println("No argument supplied to --load");
-                        exit(1);
+                        exit(1);  // FIXME
                     }
                 }
             }
         }
         if (_BATCH_MODE_.getSymbolValue() == T) {
-            exit(0);
+            exit(0); // FIXME
         }
     }
 




More information about the armedbear-cvs mailing list