armedbear-devel

armedbear-devel@common-lisp.net

2 participants
1202 discussions

[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

[armedbear-devel] Question about calling Java
by Mark Evenson 04 Feb '10

04 Feb '10

Usually, I can find a way to translate given Java code into the ABCL equivalent. Sometimes it takes quite a while to figure the correct syntax which I attribute to the organically evolved nature of our Java integration, but I have never found something ultimately unexpressable. Until now, although I think this has to do with me trying to debug ABCL internals with the ABCL REPL, but I want to document it. Have I missed some way of making this call? The code: SimpleString h = new SimpleString("FOO"); Pathname.LOGICAL_PATHNAME_TRANSLATIONS.get(h)); LOGICAL_PATHNAME_TRANSLATIONS is a EqualHashTable object whose signature of get() is LispObject get(LispObject key) This fails (jcall "get" (jfield "org.armedbear.lisp.Pathname" "LOGICAL_PATHNAME_TRANSLATIONS) (jnew "org.armedbear.lisp.SimpleString" "FOO")) with the error The value "org.armedbear.lisp.SimpleString" is not of type JAVA-OBJECT Diving into the code shows that the Java.translateMethodArguments() call is always going to translate the SimpleString argument into a instance of java.lang.String as this is what SimpleString.javaInstance() returns. Is there any way to tell JCALL not to perform such translation on its arguments? JCALL-RAW doesn't convert its return value, but maybe we need a JCALL-NAKED that doesn't translate its arguments? I suspect that we don't need JCALL-NAKED for anyone not using Java objects that are descendents of org.armedbear.lisp.LispObject but I'm not exactly sure how to prove this claim. -- "A screaming comes across the sky. It has happened before, but there is nothing to compare to it now."

8 20

Re: [armedbear-devel] translate-logical-pathname and :wild-inferiors regression
by Alan Ruttenberg 04 Feb '10

04 Feb '10

Thanks Mark! A confusing area of common lisp for sure... -Alan On Thursday, February 4, 2010, Mark Evenson <evenson(a)panix.com> wrote: > On 2/3/10 8:22 PM, Alan Ruttenberg wrote: > […] > > pre-r12283 ABCL was buggy in a different way. My best understanding is > that the behavior observed in sbcl and my patched abcl is correct. > > > Ok, now I think I understand the problem Sorry for the confusion on my part. > > Your fix [has been committed in r12147][1]. > > [1]: http://trac.common-lisp.net/armedbear/changeset/12417 > > > -- > "A screaming comes across the sky. It has happened before, but there > is nothing to compare to it now." >

1 0

Jump to page:

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

armedbear-devel