- armedbear-devel - mailman3.common-lisp.net

[armedbear-devel] [PATCH] Access command line arguments
by Dennis Lambe Jr. 12 Feb '10

12 Feb '10

I've written a small patch to ABCL that copies unrecognized command line arguments into ext:*command-line-argument-list*. This is analogous to SBCL's sb-ext:*posix-argv* or CLISP's ext:*argv* (but without the executable name that heads up those variables, since that's not passed in to the Java main() function). I hope you find it useful enough to merge in. --Dennis Lambe Jr. malsyned(a)malsyned.net

2 1

[armedbear-devel] Building with Netbeans
by Paul Griffioen 12 Feb '10

12 Feb '10

Hi everybody I'm having trouble building the latest version of ABCL from Netbeans. Can you help me out? I work with Netbeans 6.8 (just upgraded for ANT) and run the build from the menu. Running the generated jar with 'java -jar abcl.jar geeft' gives the following message: Failed to load Main-Class manifest attribute from abcl.jar I noticed that the manifest.mf just contains the following: Manifest-Version: 1.0 Ant-Version: Apache Ant 1.7.1 Created-By: 1.6.0_0-b11 (Sun Microsystems Inc.) Class-Path: Is the Netbeans build supposed to work? Does anybody have any idea why the Main is not in the generated manifest? A second question is what the best way is to include the jna library. I'm trying to compile CFFI with ABCL but that required jna as the following quote from CFFI's code shows: ;;; This implementation requires the Java Native Access (JNA) library. ;;; <http://jna.dev.java.net/> I downloaded the required jna.jar and figured that I could include it somehow in abcl.jar after building that. Unfortunately that build failed but I would like to be able to use it from Netbeans anyway. Does anybody know how to do that? My knowledge of the Java ecosystem is limited so figuring this out for ABCL specifically is not easy. Finally I would appreciate feedback on the following patch for TRIVIAL-FEATURES I needed to write to get CFFI to compile. It turned out that the endianess feature wasn't set. diff -rN old-trivial-features/src/tf-abcl.lisp new-trivial-features/src/tf-abcl.lisp 31c31,38 < ;;; TODO --- > (pushnew (let ((order (jcall "toString" > (jstatic "nativeOrder" "java.nio.ByteOrder")))) > (cond ((string-equal order "LITTLE_ENDIAN") > :little-endian) > ((string-equal order "BIG_ENDIAN") > :big-endian) > (t (error "Byte order ~A unknown" order)))) > *features*) Like I said, I'm no Java expert and feedback would be helpful. Any comment, help or pointers would be appreciated. Paul

2 3

[armedbear-devel] Passing lisp objects from java to lisp
by Blake McBride 11 Feb '10

11 Feb '10

Greetings, If I have a lisp function as follows: (defun myfun (a b) (+ a b)) I want to be able to call it from lisp or java. In other words I don't want the lisp side to have to use jobject-lisp-value. Therefore, from the java side, how do I take a java object and translate into a lisp object so that when I call the execute method the lisp function doesn't need jobject-lisp-value? Thanks. Blake McBride

2 1

[armedbear-devel] [PATCH] Access command line arguments
by Dennis Lambe Jr. 11 Feb '10

11 Feb '10

I've written a small patch to ABCL that copies unrecognized command line arguments into ext:*command-line-argument-list*. This is analogous to SBCL's sb-ext:*posix-argv* or CLISP's ext:*argv* (but without the executable name that heads up those variables, since that's not passed in to the Java main() function). I hope you find it useful enough to merge in. --Dennis Lambe Jr. malsyned(a)malsyned.net P.S. I tried to send this e-mail before my mailing list registration was complete. Moderators, please feel free to disregard that in-limbo copy.

1 0

[armedbear-devel] How to access Java fields?
by Blake McBride 10 Feb '10

10 Feb '10

Greetings, I know how to gain access to and execute Java methods via jmethod and jcall, however, I don't know how to get and set instance and static fields (or variables) within a Java class. Any help would be greatly appreciated. BTW, I've now got a Lisp macro that maps all the methods in a Java class into a corresponding CLOS class. Thanks. Blake McBride

3 7

[armedbear-devel] compiler problem?
by Alan Ruttenberg 10 Feb '10

10 Feb '10

So I'm getting intermittent compiler errors, which reduce to this case. Unfortunately just putting these forms in a file and executing or compiling them doesn't trigger the bug - so I don't have a repeatable case for you yet. Here's minimal code required to trigger it, assuming jss is loaded. I haven't seen this in the past, fwiw, and I've been using this code for a long time. This has been present in the last couple of trunk builds. (defun regex-replace-all (regex string replacement) (#"replaceAll" string regex replacement)) (define-compiler-macro regex-replace-all (&whole form regex string replacement) "Compile constant regex to pattern at compile time" (cond ((stringp regex) `(#"replaceAll" (#0"matcher" (load-time-value (#0"compile" 'java.util.regex.Pattern ,regex)) ,string) ,replacement)) (t form))) (defun foo (value) (regex-replace-all "\\s*" value "")) (compile 'foo) After the compile I get java backtrace in the repl, and the following after "&&&" in the slime debugger. java.lang.VerifyError: (class: abcl_0f7a315e_ee1b_47ea_a29c_3f6403dd238b, method: execute signature: (Lorg/armedbear/lisp/LispObject;)Lorg/armedbear/lisp/LispObject;) Illegal local variable number at java.lang.Class.getDeclaredConstructors0(Native Method) at java.lang.Class.privateGetDeclaredConstructors(Class.java:2357) at java.lang.Class.getConstructor0(Class.java:2671) at java.lang.Class.newInstance0(Class.java:321) at java.lang.Class.newInstance(Class.java:303) at org.armedbear.lisp.Lisp.makeCompiledFunctionFromClass(Lisp.java:1266) at org.armedbear.lisp.Lisp.loadClassBytes(Lisp.java:1327) at org.armedbear.lisp.Lisp.loadClassBytes(Lisp.java:1320) at org.armedbear.lisp.CompiledClosure$1.execute(CompiledClosure.java:236) at org.armedbear.lisp.Symbol.execute(Symbol.java:775) at org.armedbear.lisp.compiler_pass2_596.execute(compiler-pass2.lisp:8737) at org.armedbear.lisp.compiler_pass2_582.execute(compiler-pass2.lisp:8692) at org.armedbear.lisp.LispThread.execute(LispThread.java:546) at org.armedbear.lisp.Java$23.execute(Java.java:1007) at org.armedbear.lisp.Symbol.execute(Symbol.java:775) at org.armedbear.lisp.compiler_pass2_578.execute(compiler-pass2.lisp:8692) at org.armedbear.lisp.CompiledClosure.execute(CompiledClosure.java:101) at org.armedbear.lisp.Symbol.execute(Symbol.java:775) at org.armedbear.lisp.compiler_pass2_595.execute(compiler-pass2.lisp:8737) at org.armedbear.lisp.Symbol.execute(Symbol.java:810) at org.armedbear.lisp.compiler_pass2_601.execute(compiler-pass2.lisp:8754) at org.armedbear.lisp.LispThread.execute(LispThread.java:546) at org.armedbear.lisp.Java$23.execute(Java.java:1007) at org.armedbear.lisp.Symbol.execute(Symbol.java:775) at org.armedbear.lisp.compiler_pass2_597.execute(compiler-pass2.lisp:8754) at org.armedbear.lisp.CompiledClosure.execute(CompiledClosure.java:112) at org.armedbear.lisp.Symbol.execute(Symbol.java:786) at org.armedbear.lisp.compiler_pass2_602.execute(compiler-pass2.lisp:8825) at org.armedbear.lisp.CompiledClosure.execute(CompiledClosure.java:101) at org.armedbear.lisp.LispThread.execute(LispThread.java:562) at org.armedbear.lisp.Lisp.evalCall(Lisp.java:494) at org.armedbear.lisp.Lisp.eval(Lisp.java:459) at org.armedbear.lisp.Primitives$16.execute(Primitives.java:307) at org.armedbear.lisp.LispThread.execute(LispThread.java:562) at org.armedbear.lisp.Lisp.evalCall(Lisp.java:494) at org.armedbear.lisp.Lisp.eval(Lisp.java:459) at org.armedbear.lisp.Lisp.progn(Lisp.java:628) at org.armedbear.lisp.Primitives$141.execute(Primitives.java:3579) at org.armedbear.lisp.Lisp.eval(Lisp.java:449) at org.armedbear.lisp.Lisp.progn(Lisp.java:628) at org.armedbear.lisp.Closure.bindParametersAndExecute(Closure.java:446) at org.armedbear.lisp.Closure.execute(Closure.java:479) at org.armedbear.lisp.Symbol.execute(Symbol.java:775) at org.armedbear.lisp.LispThread.execute(LispThread.java:562) at org.armedbear.lisp.swank_412.execute(swank.lisp:2030) at org.armedbear.lisp.Symbol.execute(Symbol.java:775) at org.armedbear.lisp.LispThread.execute(LispThread.java:562) at org.armedbear.lisp.swank_429.execute(swank.lisp:2107) at org.armedbear.lisp.LispThread.execute(LispThread.java:546) at org.armedbear.lisp.swank_430.execute(swank.lisp:2120) at org.armedbear.lisp.Symbol.execute(Symbol.java:775) at org.armedbear.lisp.LispThread.execute(LispThread.java:562) at org.armedbear.lisp.swank_428.execute(swank.lisp:2107) at org.armedbear.lisp.LispThread.execute(LispThread.java:546) at org.armedbear.lisp.swank_149.execute(swank.lisp:433) at org.armedbear.lisp.Symbol.execute(Symbol.java:786) at org.armedbear.lisp.LispThread.execute(LispThread.java:579) at org.armedbear.lisp.swank_427.execute(swank.lisp:2107) at org.armedbear.lisp.LispThread.execute(LispThread.java:546) at org.armedbear.lisp.Primitives$112.execute(Primitives.java:2539) at org.armedbear.lisp.LispThread.execute(LispThread.java:562) at org.armedbear.lisp.Lisp.evalCall(Lisp.java:494) at org.armedbear.lisp.Lisp.eval(Lisp.java:459) at org.armedbear.lisp.Lisp.progn(Lisp.java:628) at org.armedbear.lisp.Closure.bindParametersAndExecute(Closure.java:446) at org.armedbear.lisp.Closure.execute(Closure.java:479) at org.armedbear.lisp.LispThread.execute(LispThread.java:562) at org.armedbe; Caught STYLE-WARNING: ; The variable LAMBDAS::G13 is defined but never used. ; Caught STYLE-WARNING: ; The variable LAMBDAS::G14 is defined but never used. ; Caught STYLE-WARNING: ; The variable LAMBDAS::G15 is defined but never used. ; Caught STYLE-WARNING: ; The variable LAMBDAS::G16 is defined but never used. ar.lisp.Lisp.funcall(Lisp.java:163) at org.armedbear.lisp.Primitives$113.execute(Primitives.java:2686) at org.armedbear.lisp.Symbol.execute(Symbol.java:798) at org.armedbear.lisp.LispThread.execute(LispThread.java:596) at org.armedbear.lisp.swank_backend_41.execute(swank-backend.lisp:382) at org.armedbear.lisp.Symbol.execute(Symbol.java:775) at org.armedbear.lisp.LispThread.execute(LispThread.java:562) at org.armedbear.lisp.swank_370.execute(swank.lisp:1774) at org.armedbear.lisp.Symbol.execute(Symbol.java:786) at org.armedbear.lisp.LispThread.execute(LispThread.java:579) at org.armedbear.lisp.swank_426.execute(swank.lisp:2107) at org.armedbear.lisp.Symbol.execute(Symbol.java:775) at org.armedbear.lisp.LispThread.execute(LispThread.java:562) at org.armedbear.lisp.swank_425.execute(swank.lisp:2102) at org.armedbear.lisp.LispThread.execute(LispThread.java:562) at org.armedbear.lisp.Lisp.evalCall(Lisp.java:494) at org.armedbear.lisp.Lisp.eval(Lisp.java:459) at org.armedbear.lisp.Primitives$16.execute(Primitives.java:307) at org.armedbear.lisp.LispThread.execute(LispThread.java:562) at org.armedbear.lisp.Lisp.evalCall(Lisp.java:494) at org.armedbear.lisp.Lisp.eval(Lisp.java:459) at org.armedbear.lisp.Lisp.progn(Lisp.java:628) at org.armedbear.lisp.Primitives$141.execute(Primitives.java:3579) at org.armedbear.lisp.Lisp.eval(Lisp.java:449) at org.armedbear.lisp.Lisp.progn(Lisp.java:628) at org.armedbear.lisp.Closure.bindParametersAndExecute(Closure.java:446) at org.armedbear.lisp.Closure.execute(Closure.java:479) at org.armedbear.lisp.Symbol.execute(Symbol.java:775) at org.armedbear.lisp.LispThread.execute(LispThread.java:562) at org.armedbear.lisp.swank_400.execute(swank.lisp:1979) at org.armedbear.lisp.LispThread.execute(LispThread.java:596) at org.armedbear.lisp.Primitives$113.execute(Primitives.java:2655) at org.armedbear.lisp.Symbol.execute(Symbol.java:786) at org.armedbear.lisp.LispThread.execute(LispThread.java:579) at org.armedbear.lisp.swank_222.execute(swank.lisp:905) at org.armedbear.lisp.Symbol.execute(Symbol.java:775) at org.armedbear.lisp.LispThread.execute(LispThread.java:562) at org.armedbear.lisp.swank_218.execute(swank.lisp:892) at org.armedbear.lisp.LispThread.execute(LispThread.java:546) at org.armedbear.lisp.Primitives$112.execute(Primitives.java:2539) at org.armedbear.lisp.LispThread.execute(LispThread.java:562) at org.armedbear.lisp.Lisp.evalCall(Lisp.java:494) at org.armedbear.lisp.Lisp.eval(Lisp.java:459) at org.armedbear.lisp.Lisp.progn(Lisp.java:628) at org.armedbear.lisp.SpecialOperators._let(SpecialOperators.java:167) at org.armedbear.lisp.SpecialOperators.access$000(SpecialOperators.java:40) at org.armedbear.lisp.SpecialOperators$3.execute(SpecialOperators.java:96) at org.armedbear.lisp.Lisp.eval(Lisp.java:449) at org.armedbear.lisp.Lisp.progn(Lisp.java:628) at org.armedbear.lisp.Closure.bindParametersAndExecute(Closure.java:446) at org.armedbear.lisp.Closure.execute(Closure.java:493) at org.armedbear.lisp.LispThread.execute(LispThread.java:579) at org.armedbear.lisp.Lisp.funcall(Lisp.java:165) at org.armedbear.lisp.Primitives$113.execute(Primitives.java:2707) at org.armedbear.lisp.Primitive.execute(Primitive.java:143) at org.armedbear.lisp.Symbol.execute(Symbol.java:810) at org.armedbear.lisp.LispThread.execute(LispThread.java:614) at org.armedbear.lisp.swank_backend_74.execute(swank-backend.lisp:663) at org.armedbear.lisp.Symbol.execute(Symbol.java:786) at org.armedbear.lisp.LispThread.execute(LispThread.java:579) at org.armedbear.lisp.swank_148.execute(swank.lisp:423) at org.armedbear.lisp.LispThread.execute(LispThread.java:546) at org.armedbear.lisp.swank_1.execute(swank.lisp:174) at org.armedbear.lisp.Symbol.execute(Symbol.java:786) at org.armedbear.lisp.LispThread.execute(LispThread.java:579) at org.armedbear.lisp.swank_147.execute(swank.lisp:423) at org.armedbear.lisp.LispThread.execute(LispThread.java:546) at org.armedbear.lisp.Java$23.execute(Java.java:1007) at org.armedbear.lisp.Symbol.execute(Symbol.java:775) at org.armedbear.lisp.LispThread.execute(LispThread.java:562) at org.armedbear.lisp.swank_145.execute(swank.lisp:423) at org.armedbear.lisp.LispThread.execute(LispThread.java:546) at org.armedbear.lisp.Java$23.execute(Java.java:1007) at org.armedbear.lisp.Symbol.execute(Symbol.java:775) at org.armedbear.lisp.LispThread.execute(LispThread.java:562) at org.armedbear.lisp.swank_143.execute(swank.lisp:423) at org.armedbear.lisp.Symbol.execute(Symbol.java:786) at org.armedbear.lisp.LispThread.execute(LispThread.java:579) at org.armedbear.lisp.swank_217.execute(swank.lisp:892) at org.armedbear.lisp.CompiledClosure.execute(CompiledClosure.java:101) at org.armedbear.lisp.AutoloadedFunctionProxy.execute(AutoloadedFunctionProxy.java:145) at org.armedbear.lisp.Symbol.execute(Symbol.java:775) at org.armedbear.lisp.LispThread.execute(LispThread.java:562) at org.armedbear.lisp.swank_272.execute(swank.lisp:1173) at org.armedbear.lisp.AutoloadedFunctionProxy.execute(AutoloadedFunctionProxy.java:145) at org.armedbear.lisp.Symbol.execute(Symbol.java:775) at org.armedbear.lisp.LispThread.execute(LispThread.java:562) at org.armedbear.lisp.swank_254.execute(swank.lisp:1031) at org.armedbear.lisp.LispThread.execute(LispThread.java:546) at org.armedbear.lisp.swank_1.execute(swank.lisp:174) at org.armedbear.lisp.Symbol.execute(Symbol.java:786) at org.armedbear.lisp.LispThread.execute(LispThread.java:579) at org.armedbear.lisp.swank_253.execute(swank.lisp:1031) at org.armedbear.lisp.LispThread.execute(LispThread.java:546) at org.armedbear.lisp.Primitives$112.execute(Primitives.java:2539) at org.armedbear.lisp.LispThread.execute(LispThread.java:562) at org.armedbear.lisp.Lisp.evalCall(Lisp.java:494) at org.armedbear.lisp.Lisp.eval(Lisp.java:459) at org.armedbear.lisp.Lisp.progn(Lisp.java:628) at org.armedbear.lisp.Closure.execute(Closure.java:421) at org.armedbear.lisp.LispThread.execute(LispThread.java:546) at org.armedbear.lisp.Lisp.funcall(Lisp.java:161) at org.armedbear.lisp.LispThread$2.run(LispThread.java:88) at java.lang.Thread.run(Thread.java:613) ; Compilation unit finished ; Caught 4 STYLE-WARNING conditions ; Evaluation aborted. CL-USER> &&& Unable to load #<jarray [B@7811a1 {CD8218}> [Condition of type ERROR] Restarts: 0: [RETRY] Retry SLIME REPL evaluation request. 1: [ABORT] Return to SLIME's top level. Backtrace: 0: org.armedbear.lisp.CompiledClosure$1.execute(CompiledClosure.java:239) 1: org.armedbear.lisp.Symbol.execute(Symbol.java:775) 2: org.armedbear.lisp.compiler_pass2_596.execute(compiler-pass2.lisp:8737) 3: org.armedbear.lisp.compiler_pass2_582.execute(compiler-pass2.lisp:8692) 4: org.armedbear.lisp.Java$23.execute(Java.java:1007) 5: org.armedbear.lisp.Symbol.execute(Symbol.java:775) 6: org.armedbear.lisp.compiler_pass2_578.execute(compiler-pass2.lisp:8692) 7: org.armedbear.lisp.CompiledClosure.execute(CompiledClosure.java:101) 8: org.armedbear.lisp.Symbol.execute(Symbol.java:775) 9: org.armedbear.lisp.compiler_pass2_595.execute(compiler-pass2.lisp:8737) 10: org.armedbear.lisp.Symbol.execute(Symbol.java:810) 11: org.armedbear.lisp.compiler_pass2_601.execute(compiler-pass2.lisp:8754) 12: org.armedbear.lisp.Java$23.execute(Java.java:1007) 13: org.armedbear.lisp.Symbol.execute(Symbol.java:775) 14: org.armedbear.lisp.compiler_pass2_597.execute(compiler-pass2.lisp:8754) 15: org.armedbear.lisp.CompiledClosure.execute(CompiledClosure.java:112) 16: org.armedbear.lisp.Symbol.execute(Symbol.java:786) 17: org.armedbear.lisp.compiler_pass2_602.execute(compiler-pass2.lisp:8825) 18: org.armedbear.lisp.CompiledClosure.execute(CompiledClosure.java:101) 19: (#<FUNCTION {50EF1A}>) 20: (#<FUNCTION {81CF9E}>) 21: (#<FUNCTION {65C63C}> FOO) 22: (SYSTEM::%EVAL (COMPILE 'FOO)) 23: (EVAL (COMPILE 'FOO)) 24: (SWANK::EVAL-REGION "(compile 'foo) ") 25: (#<FUNCTION {B9C125}>) 26: (SWANK::TRACK-PACKAGE #<FUNCTION {B9C125}>) 27: (#<FUNCTION {37A41C}>) 28: (SWANK::CALL-WITH-RETRY-RESTART "Retry SLIME REPL evaluation request." #<FUNCTION {37A41C}>) 29: (#<FUNCTION {F72DF7}>) 30: (FUNCALL #<FUNCTION {F72DF7}>) 31: (#<FUNCTION (LAMBDA (SWANK-BACKEND::FN)) {EADF38}> #<FUNCTION {F72DF7}>) 32: (APPLY #<FUNCTION (LAMBDA (SWANK-BACKEND::FN)) {EADF38}> #<FUNCTION {F72DF7}> NIL) 33: (SWANK-BACKEND:CALL-WITH-SYNTAX-HOOKS #<FUNCTION {F72DF7}>) 34: (SWANK::CALL-WITH-BUFFER-SYNTAX NIL #<FUNCTION {F72DF7}>) 35: (SWANK::REPL-EVAL "(compile 'foo) ") 36: (SWANK:LISTENER-EVAL "(compile 'foo) ") 37: (SYSTEM::%EVAL (SWANK:LISTENER-EVAL "(compile 'foo) ")) 38: (EVAL (SWANK:LISTENER-EVAL "(compile 'foo) ")) 39: (SWANK::EVAL-FOR-EMACS (SWANK:LISTENER-EVAL "(compile 'foo) ") "COMMON-LISP-USER" 42) 40: (APPLY #<FUNCTION SWANK::EVAL-FOR-EMACS {E5021C}> ((SWANK:LISTENER-EVAL "(compile 'foo) ") "COMMON-LISP-USER" 42)) 41: (SWANK::PROCESS-REQUESTS NIL) 42: (#<FUNCTION {EDA852}>) 43: (FUNCALL #<FUNCTION {EDA852}>) 44: (#<FUNCTION (LAMBDA (SWANK-BACKEND::HOOK SWANK-BACKEND::FUN)) {C5B70C}> #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK {749CB7}> #<FUNCTION {EDA852}>) 45: (APPLY #<FUNCTION (LAMBDA (SWANK-BACKEND::HOOK SWANK-BACKEND::FUN)) {C5B70C}> #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK {749CB7}> #<FUNCTION {EDA852}> NIL) 46: (SWANK-BACKEND:CALL-WITH-DEBUGGER-HOOK #<FUNCTION SWANK:SWANK-DEBUGGER-HOOK {749CB7}> #<FUNCTION {EDA852}>) 47: (#<FUNCTION {DCEB8B}>) 48: (SWANK::CALL-WITH-BINDINGS ((*STANDARD-OUTPUT* . #S(SLIME-OUTPUT-STREAM)) (*STANDARD-INPUT* . #S(SLIME-INPUT-STREAM)) (*TRACE-OUTPUT* . #S(SLIME-OUTPUT-STREAM)) (*ERROR-OUTPUT* . #S(SLIME-OUTPUT-STREA.. 49: (#<FUNCTION {230AB0}>) 50: (JRUN-EXCEPTION-PROTECTED #<FUNCTION {230AB0}>) 51: (#<FUNCTION {92B531}>) 52: (JRUN-EXCEPTION-PROTECTED #<FUNCTION {92B531}>) 53: (SWANK::CALL-WITH-CONNECTION #S(SWANK::CONNECTION :SOCKET-IO #<TWO-WAY-STREAM {B5B6B9}> :DEDICATED-OUTPUT NIL :USER-INPUT #S(SLIME-INPUT-STREAM) :USER-OUTPUT #S(SLIME-OUTPUT-STREAM) :USER-IO #<TWO-WAY.. 54: (SWANK::CALL-WITH-RETRY-RESTART "Retry SLIME REPL evaluation request." #<FUNCTION {EF39E5}>) 55: (#<FUNCTION {C20590}>) 56: (FUNCALL #<FUNCTION {C20590}>) 57: (#<FUNCTION (LAMBDA (SWANK-BACKEND::FN)) {EADF38}> #<FUNCTION {C20590}>) 58: (APPLY #<FUNCTION (LAMBDA (SWANK-BACKEND::FN)) {EADF38}> #<FUNCTION {C20590}> NIL) 59: (SWANK-BACKEND:CALL-WITH-SYNTAX-HOOKS #<FUNCTION {C20590}>) --more--

1 0

[armedbear-devel] Small problem with DESCRIBE
by Blake McBride 09 Feb '10

09 Feb '10

Below there is a line that reads "IV3 unboundThe following slots have :CLASS allocation:" There should be a carriage return before the "The". $ java -jar abcl.jar Armed Bear Common Lisp 0.19.0-dev Java 1.6.0_17 Apple Inc. Java HotSpot(TM) 64-Bit Server VM Low-level initialization completed in 0.374 seconds. Startup completed in 1.086 seconds. Type ":help" for a list of available commands. CL-USER(1): (defclass myclass () (iv1 iv2 iv3 (cv1 :allocation :class))) #<STANDARD-CLASS MYCLASS {5EE04FD}> CL-USER(2): (setq i1 (make-instance 'myclass)) #<MYCLASS {195B6AAD}> CL-USER(3): i1 #<MYCLASS {195B6AAD}> CL-USER(4): (describe i1) #<MYCLASS {195B6AAD}> is an instance of #<STANDARD-CLASS MYCLASS {5EE04FD}>. The following slots have :INSTANCE allocation: IV1 unbound IV2 unbound IV3 unboundThe following slots have :CLASS allocation: CV1 unbound CL-USER(5):

2 1

[armedbear-devel] ABCL -r12424 fails ANSI-TESTS with ClassCastException
by dmiles＠users.sourceforge.net 07 Feb '10

07 Feb '10

FYI: Test COMPILE-FILE.18 failed Form: (LET ((FILE (LOGICAL-PATHNAME "CLTEST:COMPILE-FILE-TEST-LP.OUT"))) (WITH-OPEN-FILE (S FILE :DIRECTION :OUTPUT :IF-EXISTS :SUPERSEDE :IF-DOES-NOT-EXIST :CREATE)) (COMPILE-FILE-TEST "compile-file-test-file.lsp" (QUOTE COMPILE-FILE-TEST-FUN.1) :OUTPUT-FILE FILE)) Expected values: T NIL Actual value: #<READER-ERROR {C13538}> [Invalid character #\Backspace] "/development/ABCL/ansi-tests/compile-file-test-file.abcl" "/development/ABCL/ansi-tests/compile-file-test-file.abcl" COMPILE-FILE.19 "/development/ABCL/ansi-tests/compile-file-test-file.abcl" "/development/ABCL/ansi-tests/compile-file-test-file.abcl" COMPILE-FILE.20 COMPILE-FILE-PATHNAME.1 COMPILE-FILE-TRUENAME.1 COMPILE-FILE.ERROR.1 COMPILE-FILE.ERROR.2 LOAD.1 LOAD.2 309.52 seconds real time 302546363 cons cells java.lang.ClassCastException: org.armedbear.lisp.Nil cannot be cast to org.armedbear.lisp.Pathname at org.armedbear.lisp.Load.loadFileFromStream(Load.java:409) at org.armedbear.lisp.Load.load(Load.java:592) at org.armedbear.lisp.Load.access$200(Load.java:54) at org.armedbear.lisp.Load$_load.execute(Load.java:555) at org.armedbear.lisp.Symbol.execute(Symbol.java:810) at org.armedbear.lisp.LispThread.execute(LispThread.java:614) at org.armedbear.lisp.load_1.execute(load.lisp:33) at org.armedbear.lisp.CompiledClosure.execute(CompiledClosure.java:124) at org.armedbear.lisp.LispThread.execute(LispThread.java:596) at org.armedbear.lisp.Lisp.funcall(Lisp.java:167) at org.armedbear.lisp.Primitives$113.execute(Primitives.java:2707) at org.armedbear.lisp.Primitive.execute(Primitive.java:158) at org.armedbear.lisp.LispThread.execute(LispThread.java:632) at org.armedbear.lisp.Lisp.evalCall(Lisp.java:522) at org.armedbear.lisp.Lisp.eval(Lisp.java:459) at org.armedbear.lisp.Primitives$145.execute(Primitives.java:3686) at org.armedbear.lisp.Lisp.eval(Lisp.java:449) at org.armedbear.lisp.Lisp.progn(Lisp.java:628) at org.armedbear.lisp.SpecialOperators._let(SpecialOperators.java:167) at org.armedbear.lisp.SpecialOperators.access$000(SpecialOperators.java:40) at org.armedbear.lisp.SpecialOperators$3.execute(SpecialOperators.java:96) at org.armedbear.lisp.Lisp.eval(Lisp.java:449) at org.armedbear.lisp.Primitives$152.execute(Primitives.java:3953) at org.armedbear.lisp.Lisp.eval(Lisp.java:449) at org.armedbear.lisp.SpecialOperators._let(SpecialOperators.java:141) at org.armedbear.lisp.SpecialOperators.access$000(SpecialOperators.java:40) at org.armedbear.lisp.SpecialOperators$4.execute(SpecialOperators.java:110) at org.armedbear.lisp.Lisp.eval(Lisp.java:449) at org.armedbear.lisp.Lisp.progn(Lisp.java:628) at org.armedbear.lisp.Primitives$141.execute(Primitives.java:3579) at org.armedbear.lisp.Lisp.eval(Lisp.java:449) at org.armedbear.lisp.Lisp.progn(Lisp.java:628) at org.armedbear.lisp.Closure.bindParametersAndExecute(Closure.java:446) at org.armedbear.lisp.Closure.execute(Closure.java:493) at org.armedbear.lisp.LispThread.execute(LispThread.java:579) at org.armedbear.lisp.Lisp.evalCall(Lisp.java:501) at org.armedbear.lisp.Lisp.eval(Lisp.java:459) at org.armedbear.lisp.Lisp.progn(Lisp.java:628) at org.armedbear.lisp.SpecialOperators$8.execute(SpecialOperators.java:270) at org.armedbear.lisp.Lisp.eval(Lisp.java:449) at org.armedbear.lisp.Primitives$148.execute(Primitives.java:3819) at org.armedbear.lisp.Lisp.eval(Lisp.java:449) at org.armedbear.lisp.Primitives$145.execute(Primitives.java:3686) at org.armedbear.lisp.Lisp.eval(Lisp.java:449) at org.armedbear.lisp.Lisp.progn(Lisp.java:628) at org.armedbear.lisp.SpecialOperators._let(SpecialOperators.java:167) at org.armedbear.lisp.SpecialOperators.access$000(SpecialOperators.java:40) at org.armedbear.lisp.SpecialOperators$3.execute(SpecialOperators.java:96) at org.armedbear.lisp.Lisp.eval(Lisp.java:449) at org.armedbear.lisp.Lisp.eval(Lisp.java:452) at org.armedbear.lisp.Primitives$16.execute(Primitives.java:307) at org.armedbear.lisp.LispThread.execute(LispThread.java:562) at org.armedbear.lisp.Lisp.evalCall(Lisp.java:494) at org.armedbear.lisp.Lisp.eval(Lisp.java:459) at org.armedbear.lisp.Lisp.progn(Lisp.java:628) at org.armedbear.lisp.Primitives$141.execute(Primitives.java:3579) at org.armedbear.lisp.Lisp.eval(Lisp.java:449) at org.armedbear.lisp.Lisp.progn(Lisp.java:628) at org.armedbear.lisp.Closure.bindParametersAndExecute(Closure.java:446) at org.armedbear.lisp.Closure.execute(Closure.java:479) at org.armedbear.lisp.Symbol.execute(Symbol.java:775) at org.armedbear.lisp.LispThread.execute(LispThread.java:562) at org.armedbear.lisp.rt_72.execute(rt.lsp:228) at org.armedbear.lisp.LispThread.execute(LispThread.java:546) at org.armedbear.lisp.Java$23.execute(Java.java:1007) at org.armedbear.lisp.Symbol.execute(Symbol.java:775) at org.armedbear.lisp.LispThread.execute(LispThread.java:562) at org.armedbear.lisp.rt_71.execute(rt.lsp:228) at org.armedbear.lisp.rt_75.execute(rt.lsp:228) at org.armedbear.lisp.LispThread.execute(LispThread.java:546) at org.armedbear.lisp.Java$23.execute(Java.java:1007) at org.armedbear.lisp.Symbol.execute(Symbol.java:775) at org.armedbear.lisp.LispThread.execute(LispThread.java:562) at org.armedbear.lisp.rt_70.execute(rt.lsp:228) at org.armedbear.lisp.CompiledClosure.execute(CompiledClosure.java:112) at org.armedbear.lisp.Symbol.execute(Symbol.java:786) at org.armedbear.lisp.LispThread.execute(LispThread.java:579) at org.armedbear.lisp.rt_86.execute(rt.lsp:348) at org.armedbear.lisp.AutoloadedFunctionProxy.execute(AutoloadedFunctionProxy.java:145) at org.armedbear.lisp.Symbol.execute(Symbol.java:775) at org.armedbear.lisp.LispThread.execute(LispThread.java:562) at org.armedbear.lisp.rt_85.execute(rt.lsp:335) at org.armedbear.lisp.CompiledClosure.execute(CompiledClosure.java:92) at org.armedbear.lisp.AutoloadedFunctionProxy.execute(AutoloadedFunctionProxy.java:139) at org.armedbear.lisp.LispThread.execute(LispThread.java:546) at org.armedbear.lisp.Lisp.evalCall(Lisp.java:488) at org.armedbear.lisp.Lisp.eval(Lisp.java:459) at org.armedbear.lisp.Lisp.progn(Lisp.java:628) at org.armedbear.lisp.Closure.execute(Closure.java:421) at org.armedbear.lisp.Time$1.execute(Time.java:56) at org.armedbear.lisp.LispThread.execute(LispThread.java:562) at org.armedbear.lisp.Lisp.evalCall(Lisp.java:494) at org.armedbear.lisp.Lisp.eval(Lisp.java:459) at org.armedbear.lisp.Lisp.eval(Lisp.java:452) at org.armedbear.lisp.Load.loadStream(Load.java:496) at org.armedbear.lisp.Load.loadFileFromStream(Load.java:459) at org.armedbear.lisp.Load.load(Load.java:187) at org.armedbear.lisp.Load.load(Load.java:605) at org.armedbear.lisp.Load.access$200(Load.java:54) at org.armedbear.lisp.Load$_load.execute(Load.java:555) at org.armedbear.lisp.Symbol.execute(Symbol.java:810) at org.armedbear.lisp.LispThread.execute(LispThread.java:614) at org.armedbear.lisp.load_1.execute(load.lisp:33) at org.armedbear.lisp.CompiledClosure.execute(CompiledClosure.java:101) at org.armedbear.lisp.AutoloadedFunctionProxy.execute(AutoloadedFunctionProxy.java:145) at org.armedbear.lisp.LispThread.execute(LispThread.java:562) at org.armedbear.lisp.Lisp.evalCall(Lisp.java:494) at org.armedbear.lisp.Lisp.eval(Lisp.java:459) at org.armedbear.lisp.Lisp.eval(Lisp.java:457) at org.armedbear.lisp.Primitives$16.execute(Primitives.java:307) at org.armedbear.lisp.LispThread.execute(LispThread.java:562) at org.armedbear.lisp.Lisp.evalCall(Lisp.java:494) at org.armedbear.lisp.Lisp.eval(Lisp.java:459) at org.armedbear.lisp.Lisp.progn(Lisp.java:628) at org.armedbear.lisp.Primitives$141.execute(Primitives.java:3579) at org.armedbear.lisp.Lisp.eval(Lisp.java:449) at org.armedbear.lisp.Lisp.progn(Lisp.java:628) at org.armedbear.lisp.Closure.bindParametersAndExecute(Closure.java:446) at org.armedbear.lisp.Closure.execute(Closure.java:479) at org.armedbear.lisp.LispThread.execute(LispThread.java:562) at org.armedbear.lisp.Lisp$1.execute(Lisp.java:275) at org.armedbear.lisp.Symbol.execute(Symbol.java:775) at org.armedbear.lisp.LispThread.execute(LispThread.java:562) at org.armedbear.lisp.top_level_50.execute(top-level.lisp:407) at org.armedbear.lisp.CompiledClosure.execute(CompiledClosure.java:92) at org.armedbear.lisp.AutoloadedFunctionProxy.execute(AutoloadedFunctionProxy.java:139) at org.armedbear.lisp.Symbol.execute(Symbol.java:765) at org.armedbear.lisp.LispThread.execute(LispThread.java:546) at org.armedbear.lisp.top_level_51.execute(top-level.lisp:415) at org.armedbear.lisp.AutoloadedFunctionProxy.execute(AutoloadedFunctionProxy.java:139) at org.armedbear.lisp.LispThread.execute(LispThread.java:546) at org.armedbear.lisp.Interpreter.run(Interpreter.java:310) at org.armedbear.lisp.Main$1.run(Main.java:50) at java.lang.Thread.run(Thread.java:619) Debugger invoked on condition of type ERROR: Caught java.lang.ClassCastException: org.armedbear.lisp.Nil cannot be cast to org.armedbear.lisp.Pathname. Restarts: 0: TOP-LEVEL Return to top level. [1] CL-USER(2):

2 5

[armedbear-devel] ABCL -r12425 cannot load ANSI-TESTS both compied and interpreted
by dmiles＠users.sourceforge.net 07 Feb '10

07 Feb '10

FYI: [root@titan ansi-tests]# java -jar /development/ABCL/abcl-trunk/dist/abcl.jar Armed Bear Common Lisp 0.19.0-dev Java 1.6.0_10 Sun Microsystems Inc. Java HotSpot(TM) 64-Bit Server VM Low-level initialization completed in 0.287 seconds. Startup completed in 0.888 seconds. Type ":help" for a list of available commands. CL-USER(1): (load "compileit.lsp") WARNING: ABCL doesn't support the long form of DEFINE-METHOD-COMBINATION; randomized testing disabled. WARNING: Redefining test LOOP.10.106 Error loading /development/ABCL/ansi-tests/defclass-01.lsp at line 799 (offset 18177) Debugger invoked on condition of type PROGRAM-ERROR: Invalid initarg :NAME. Restarts: 0: TOP-LEVEL Return to top level. [1] CL-TEST(2): (quit) [root@titan ansi-tests]# java -jar /development/ABCL/abcl-trunk/dist/abcl.jar Armed Bear Common Lisp 0.19.0-dev Java 1.6.0_10 Sun Microsystems Inc. Java HotSpot(TM) 64-Bit Server VM Low-level initialization completed in 0.29 seconds. Startup completed in 0.895 seconds. Type ":help" for a list of available commands. CL-USER(1): (load "doit.lsp") ; Compilation unit finished ; The following functions were used but not defined: ; REGRESSION-TEST::COPY-ENTRY WARNING: ABCL doesn't support the long form of DEFINE-METHOD-COMBINATION; randomized testing disabled. WARNING: Redefining test LOOP.10.106 ; in (DEFMACRO DEFCLASS-WITH-TESTS ...) ; Caught STYLE-WARNING: ; The variable INITARG-LIST is defined but never used. ; Caught STYLE-WARNING: ; The variable ALLOCATION is defined but never used. ; Compilation unit finished ; Caught 2 STYLE-WARNING conditions Error loading /development/ABCL/ansi-tests/defclass-01.lsp at line 799 (offset 18177) Debugger invoked on condition of type PROGRAM-ERROR: Invalid initarg :NAME. Restarts: 0: TOP-LEVEL Return to top level. [1] CL-TEST(2): (quit)

1 0

[armedbear-devel] JAR file support patches
by Mark Evenson 06 Feb '10

06 Feb '10

Implementing true support for JAR files in ABCL has taken quite a bit more time and effort as can be seen by the rejection of my mail of few minutes ago to the list for being too long. I've posted my [patches with explanation to the web][1], as I am not sure when or if the moderator will let the original message through. [1]: http://slack.net/~evenson/abcl/jar-file About the only disadvantage for the current patch is that I had to remove the use of ZipCache for entries as I was developing as it didn't make much sense. I haven't really noticed too much of a time difference for loading or compiling ABCL. Comments? Once I get things tested under Windows, and play around with the loading from http support, I intend to commit to trunk. -- "A screaming comes across the sky. It has happened before, but there is nothing to compare to it now."

6 16