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

[armedbear-devel] Working toward the 0.22 release?
by Erik Huelsmann 10 Sep '10

10 Sep '10

Since it's now almost 2 months since we did our last release, it's time to work to the next one again. With regret I propose that we release what we currently have in trunk (unless someone quickly wants to do something about that). Then, after we branched, I'll merge the generic-class-writer branch to trunk meaning it should then be tested enough to be included in 0.23. Like any release, we need: * to update CHANGES * to create a release-notes html file * to make sure our code doesn't have regressions by running it through the Maxima test suite and the ANSI tests Volunteers for any of these steps, or maybe people wanting to perform other steps in addition? Bye, Erik.

2 1

[armedbear-devel] Searching for wild-inferiors
by Theam Yong Chew 03 Sep '10

03 Sep '10

Hi everyone, Does ABCL support wild-inferiors in any way at all? DIRECTORY, which calls SYSTEM::LIST-DIRECTORIES-WITH-WILDCARDS, does not return a list of the whole subtree, although ABCL seems to understand the "**" notation for :wild-inferiors. Notably, asdf's :tree directive won't work, which was how I stumbled onto this. CL-USER(56): (pathname-directory "/home/temp/**/") (:ABSOLUTE "home" "temp" :WILD-INFERIORS) CL-USER(55): (system::list-directories-with-wildcards "/home/temp/**/") NIL CL-USER(60): (system::wild-p :wild) T CL-USER(59): (system::wild-p :wild-inferiors) NIL Also, for the following error, I am running armedbear 0.21.0 on Linux ackbar 2.6.28-19-generic #64-Ubuntu SMP Wed Aug 18 20:55:57 UTC 2010 i686 GNU/Linux and with java: java version "1.6.0_18" OpenJDK Runtime Environment (IcedTea6 1.8.1) (6b18-1.8.1-0ubuntu1~9.04.1) OpenJDK Client VM (build 16.0-b13, mixed mode, sharing) CL-USER(5): (directory #p"/home/*/") #<THREAD "interpreter" {1217E67}>: Debugger invoked on condition of type TYPE-ERROR The value NIL is not of type (OR PATHNAME STRING FILE-STREAM SYSTEM:JAR-STREAM SYSTEM:URL-STREAM). Restarts: 0: TOP-LEVEL Return to top level. [1] CL-USER(4): :bt 0: (SYSTEM:BACKTRACE) 1: (INVOKE-DEBUGGER #<TYPE-ERROR {1D382AB}>) 2: org.armedbear.lisp.Lisp.error(Lisp.java:353) 3: org.armedbear.lisp.Lisp.type_error(Lisp.java:394) 4: org.armedbear.lisp.Lisp.coerceToPathname(Lisp.java:1770) 5: org.armedbear.lisp.Pathname$pf_pathname.execute(Pathname.java:1134) 6: org.armedbear.lisp.Symbol.execute(Symbol.java:776) 7: org.armedbear.lisp.LispThread.execute(LispThread.java:568) Although this works: [1] CL-USER(5): (directory #p"/home/*") (#P"/home/tyc20/" #P"/home/common/") Yong.

4 5

Re: [armedbear-devel] [armedbear-cvs] r12908 - trunk/abcl/examples/pure-lisp-to-java
by Erik Huelsmann 31 Aug '10

31 Aug '10

Hi Ville, You're aware it's 2010 by now? :-) Bye, Erik. On Mon, Aug 30, 2010 at 7:57 PM, Ville Voutilainen < vvoutilainen(a)common-lisp.net> wrote: > Author: vvoutilainen > Date: Mon Aug 30 13:57:43 2010 > New Revision: 12908 > > Log: > Add an example for using a java class with CLASSPATH, invoking java > functions from lisp code and finding the java class automagically > as it's in CLASSPATH. > > > Added: > trunk/abcl/examples/pure-lisp-to-java/ > trunk/abcl/examples/pure-lisp-to-java/Main.java (contents, props > changed) > trunk/abcl/examples/pure-lisp-to-java/README > trunk/abcl/examples/pure-lisp-to-java/lispfunctions.lisp (contents, > props changed) > > Added: trunk/abcl/examples/pure-lisp-to-java/Main.java > > ============================================================================== > --- (empty file) > +++ trunk/abcl/examples/pure-lisp-to-java/Main.java Mon Aug 30 13:57:43 > 2010 > @@ -0,0 +1,39 @@ > +/* > + * Main.java > + * > + * Copyright (C) 2008 Ville Voutilainen > + * $Id$ > + * > + * This program is free software; you can redistribute it and/or > + * modify it under the terms of the GNU General Public License > + * as published by the Free Software Foundation; either version 2 > + * of the License, or (at your option) any later version. > + * > + * This program is distributed in the hope that it will be useful, > + * but WITHOUT ANY WARRANTY; without even the implied warranty of > + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the > + * GNU General Public License for more details. > + * > + * You should have received a copy of the GNU General Public License > + * along with this program; if not, write to the Free Software > + * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, > USA. > + */ > + > +import org.armedbear.lisp.*; > + > +public class Main > +{ > + /** > + * This example creates an Interpreter instance, loads our > + * lisp code from a file and then looks up a function defined > + * in the loaded lisp file and executes the function. > + * > + * The function takes a single parameter and invokes a java method > + * on the object provided. We provide our Main object as the > parameter. > + * > + */ > + public static int addTwoNumbers(int a, int b) > + { > + return a + b; > + } > +} > > Added: trunk/abcl/examples/pure-lisp-to-java/README > > ============================================================================== > --- (empty file) > +++ trunk/abcl/examples/pure-lisp-to-java/README Mon Aug 30 13:57:43 > 2010 > @@ -0,0 +1,38 @@ > +ABCL Examples Building and Running Instructions > +=============================================== > + > +To compile > + > + cmd$ javac -cp ../../dist/abcl.jar Main.java > + > +where the "../../../dist/abcl.jar" represents the path to your > +abcl.jar file, which is built via the Ant based build. This path > +could be slightly different depending on how the system was > +constructed, and possibly due to operating system conventions for > +specifying relative paths. However you resolve this locally, we'll > +refer to this as '$ABCL_ROOT/dist/abcl.jar' for the rest of these > +instructions. > + > +This compiles the Java source file "Main.java" into a JVM runtime or > +class file named "Main.class". > + > +To run the example (Main.class for example) from a Unix-like OS use: > + > + cmd$ export CLASSPATH=. > + cmd$ $ABCL_ROOT/abcl > + > +then, in abcl repl, use: > +(load "lispfunctions") > +(void-function) > + > +or in Windows use: > + > + cmd$ set CLASSPATH=. > + cmd$ $ABCL_ROOT/abcl > + > +then, in abcl repl, use: > +(load "lispfunctions") > +(void-function) > + > +This will result in the Main class being found from the CLASSPATH, and you > +can invoke the functions of the Main class from lisp code. > > Added: trunk/abcl/examples/pure-lisp-to-java/lispfunctions.lisp > > ============================================================================== > --- (empty file) > +++ trunk/abcl/examples/pure-lisp-to-java/lispfunctions.lisp Mon Aug 30 > 13:57:43 2010 > @@ -0,0 +1,34 @@ > +;;; lispfunctions.lisp > +;;; > +;;; Copyright (C) 2008 Ville Voutilainen > +;;; $Id$ > +;;; > +;;; This program is free software; you can redistribute it and/or > +;;; modify it under the terms of the GNU General Public License > +;;; as published by the Free Software Foundation; either version 2 > +;;; of the License, or (at your option) any later version. > +;;; > +;;; This program is distributed in the hope that it will be useful, > +;;; but WITHOUT ANY WARRANTY; without even the implied warranty of > +;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the > +;;; GNU General Public License for more details. > +;;; > +;;; You should have received a copy of the GNU General Public License > +;;; along with this program; if not, write to the Free Software > +;;; Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, > USA. > + > +; we need to get the > +; 1) class (Main) > +; 2) classes of the parameters (int) > +; 3) method reference (getting that requires the class > +; of our object and the classes of the parameters > + > +; After that we can invoke the function with jcall, > +; giving the method reference, the object and the parameters. > +; The result is a lisp object (no need to do jobject-lisp-value), > +; unless we invoke the method > +; with jcall-raw. > +(defun void-function () > + (let* ((result (jstatic "addTwoNumbers" "Main" 2 4))) > + (format t "in void-function, result of calling addTwoNumbers(2, 4): > ~a~%" result))) > + > > _______________________________________________ > armedbear-cvs mailing list > armedbear-cvs(a)common-lisp.net > http://common-lisp.net/cgi-bin/mailman/listinfo/armedbear-cvs >

2 1

[armedbear-devel] ABCL bug report: defstruct :include with :conc-name
by Juliusz Chroboczek 26 Aug '10

26 Aug '10

Hi. The following bug in abcl breaks CL-Yacc. Consider the following: (defstruct item a) (defstruct (item1 (:include item) (:conc-name item-)) b) (defun abcl-bug () (item-a (make-item :a 'a))) According to the last paragraph of the description of the description of :conc-name in the defstruct section of the CLHS, this is legal. However, abcl says: ABCL-BUG(6): (abcl-bug) #<THREAD "interpreter" {108F8E0}>: Debugger invoked on condition of type SIMPLE-TYPE-ERROR The value #<ABCL-BUG::ITEM {537935}> is not of type ABCL-BUG::ITEM1. Restarts: 0: TOP-LEVEL Return to top level. [1] ABCL-BUG(7): Regards, Juliusz

1 0

[armedbear-devel] Can't use ABCL to host SNePS
by David Zhang 26 Aug '10

26 Aug '10

Hello! I just tried to use ABCL to load SNePS, but can't make it anyway. There's always an error message saying "#<THREAD "interpreter" {E1E567}>: Debugger invoked on condition of type PACKAGE-ERROR Package "SNEPS" not found." How can I pass it though? Awaiting David Zhang

2 2

[armedbear-devel] how to load fasls from jar via asdf
by Robert Dodier 26 Aug '10

26 Aug '10

Hi, After looking through various web pages, emails, etc, I gather it's possible to load all the fasls for some program from a jar via asdf. However, I tried the obvious things and I couldn't get it to work. Can someone explain how it's supposed to work? I have all the fasls for Maxima in a subdirectory. (require 'asdf) (asdf:operate 'asdf:load-op :maxima) has the desired effect. So far, so good. I put all the fasls in a jar (either in the subdirectory or without the subdirectory), and then (pushnew "jar:file:/path/to/my.jar" asdf:*central-repository*) But when I try (require 'asdf) (asdf:operate 'asdf:load-op :maxima) I eventually get a message about trying to find the first Lisp file mentioned in the maxima.asd, which I'm pretty sure it didn't find the fasls. Can someone explain how loading all of the fasls from a jar is supposed to work? Or any other method of conglomerating fasls; for example, is it possible to combine multiple fasls into one? Thanks for any info, Robert Dodier

3 5

Re: [armedbear-devel] java/abcl hello-world example
by Robert Dodier 22 Aug '10

22 Aug '10

David, have you seen this page? http://common-lisp.net/project/armedbear/doc/abcl-user.html It has some simple examples of calling from Java to ABCL and vv. Hope this helps, Robert Dodier

3 2

[armedbear-devel] java/abcl hello-world example
by David Dreisigmeyer 21 Aug '10

21 Aug '10

Hi, I'm new to both abcl and java. I was wondering if someone could provide a "hello world" example (the more details the better) where I write the program in java, create a jar file, and then use that from the repl? An example of what I'd like to do using Clojure is (see http://pramode.net/clojure/2010/05/01/clojure-java-interop/ ): 1) counter.java: package demo public class counter{ int c = 0; public void increment() { ++c; } public int get() { return c; } public static int sqr(int x) { return x*x; } } 2) Using in Clojure: ; To get this to run in SLIME do the following (where we're in demo/ to start): ;; ;; > javac counter.java ;; > cd ../ ;; > jar cvf demo.jar demo ;; > mv demo.jar lib/ ;; ;; Remember we were in demo/ to start. The directory lib/ is created when we ;; run lein new. So now we have the jar file we created placed with all of the ;; other jar files on the classpath. So we can continue: ;; ;; > lein swank ;; ;; Now start up emacs and M-x slime-connect (accepting 127.0.0.1 and 4005 defaults). ;; At the repl in emacs do ;; ;; user> (import '(demo counter)) ;; user> (counter/sqr 4) Thanks, I really appreciate any help! -Dave

1 0

[armedbear-devel] jcall jmethod java.lang
by David Dreisigmeyer 20 Aug '10

20 Aug '10

Hi, I don't understand why this doesn't work: (jcall (jmethod "java.lang.Math" "sqrt") 4.0) The error I get is: No such method: java.lang.Math.sqrt() Also, this works: CL-USER> (jcall (jmethod "java.lang.Float" "intValue") 4.0) 4 but when I try this: (jcall (jmethod "java.lang.Float" "compare") 4.0 5.0) I get: No such method: java.lang.Float.compare() I'm not sure if this is the correct forum for these questions. If there's a better place to ask them let me know. Thanks, -Dave

2 4

[armedbear-devel] abcl-contrib.jar
by David Dreisigmeyer 20 Aug '10

20 Aug '10

I downloaded abcl-src-0.21.0 from http://common-lisp.net/project/armedbear/. I ran: ant -f build.xml abcl.conrtib Without creating the directory ./contrib/asdf-install/ 'by hand' the install would not run to completion, complaining that /contrib/asdf-install/ was not a valid directory. -Dave

2 3