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

[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

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

04 Feb '10

A recent commit (dec 2009) seems to have changed the behavior of wild-inferiors. Prior to the change :wild-inferiors would match 0 or more pathname components. After the change 1 or more. e.g. (TRANSLATE-PATHNAME #P"IDO:IMMUNOLOGY;" #P"IDO:IMMUNOLOGY;**;*.*" #P"/Users/alanr/repos/infectious-disease-ontology/trunk/src/ontology/**/*.*") Used to work, but now fails. Unsupported case in TRANSLATE-DIRECTORY-COMPONENTS. -Alan

3 12

[armedbear-devel] Lisp / Java interface utilities and examples
by Blake McBride 03 Feb '10

03 Feb '10

Greetings, Enclosed are the completed Lisp and Java utilities designed to make Lisp / Java interaction easier. It also includes an example / tutorial program. If it is appropriate, I'd like to have these added as one of the ABCL examples in the distribution. Also, if it is advantageous, perhaps we can move the Lisp and Java utilities to be part of ABCL. Thanks. Blake McBride

4 10

[armedbear-devel] Maxima status: performance measurement
by Erik Huelsmann 01 Feb '10

01 Feb '10

Hi Robert, hi all, Today, I ran Maxima through ABCL's profiler to see what's our current status. With our combined changes, we seem to have reduced the throughput time of the Maxima tests on my system from 2200 secs to roughly 1800 secs between October and now. These are the hotest spots now: 3.0 4352336 SIGN01 3.0 4354363 $SIGN 3.1 4531219 MEVALARGS 3.2 4633287 MREAD-RAW 3.2 4633902 MREAD 3.3 4740203 SIGN1 3.7 5402701 SIMPEXPT 4.4 6365392 $FLOAT 4.5 6469447 RECUR-APPLY 4.5 6521950 TEST-BATCH 5.8 8452081 SIMPLIFYA 8.4 12224550 NUD-CALL 11.3 16314266 DLSF 11.3 16362213 DLS 12.2 17658492 PRSMATCH 12.4 17982535 DGRF 12.5 18054353 DGR 20.6 29854294 PARSE-INFIX 22.3 32246473 MEVAL* 22.4 32372076 MEVALN 54.5 78912363 LED-CALL 55.5 80291167 PARSE 59.5 86114793 MEVAL1 60.7 87813616 MEVAL 64.2 92947288 MHEADER 65.2 94346436 STREAM-NAME 65.2 94346559 INSTREAM-NAME 65.2 94346854 PATHNAME 65.2 94347835 ADD-LINEINFO As you can see, the DGR(F) functions which relate to the integrator tests have now been removed from being the main bottle necks. It looks like some evaluator is now our 'hottest' spot. Robert, could you help us to see what we should do to optimize the functions which are now our main performance issue? Thanks in advance! Bye, Erik.

2 1