@BIF public static EObject halt(EProc proc, EObject value) { int exitCode = 1; String message = null; if (value != null) { ESmall val = value.testSmall(); if (val != null) { exitCode = val.value; } EString str = value.testString(); if (str != null) { message = str.stringValue(); } } /* // TODO: create crash file if (message != null) { log.severe("halting system: " + message); } else { log.info("halting system"); } */ ERT.shutdown(); throw new ErlangHalt(); }