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

Re: [armedbear-devel] [armedbear-cvs] r12918 - in trunk/abcl: . src/org/armedbear/lisp test/lisp/abcl test/lisp/ansi
by Erik Huelsmann 25 Sep '10

25 Sep '10

Hi Alessio, Thanks! Great to see the branch on trunk now! Bye, Erik. On Sat, Sep 25, 2010 at 12:35 AM, Alessio Stalla <astalla(a)common-lisp.net>wrote: > Author: astalla > Date: Fri Sep 24 18:35:02 2010 > New Revision: 12918 > > Log: > generic-class-file branch merged. > > > Added: > trunk/abcl/src/org/armedbear/lisp/jvm-class-file.lisp > - copied unchanged from r12917, > /branches/generic-class-file/abcl/src/org/armedbear/lisp/jvm-class-file.lisp > trunk/abcl/src/org/armedbear/lisp/jvm-instructions.lisp > - copied unchanged from r12917, > /branches/generic-class-file/abcl/src/org/armedbear/lisp/jvm-instructions.lisp > trunk/abcl/test/lisp/abcl/class-file.lisp > - copied unchanged from r12917, > /branches/generic-class-file/abcl/test/lisp/abcl/class-file.lisp > Removed: > trunk/abcl/src/org/armedbear/lisp/opcodes.lisp > Modified: > trunk/abcl/abcl.asd > trunk/abcl/src/org/armedbear/lisp/compile-file.lisp > trunk/abcl/src/org/armedbear/lisp/compile-system.lisp > trunk/abcl/src/org/armedbear/lisp/compiler-pass2.lisp > trunk/abcl/src/org/armedbear/lisp/jvm.lisp > trunk/abcl/src/org/armedbear/lisp/known-symbols.lisp > trunk/abcl/test/lisp/ansi/parse-ansi-errors.lisp > >

1 0

[armedbear-devel] generic-class-file branch landed on trunk: who re-enables runtime-class.lisp/RuntimeClass.java?
by Erik Huelsmann 25 Sep '10

25 Sep '10

Finally, the branch which is about implementing a generic class file generator (en rewriting the compiler output generator in terms of it) has landed on trunk. These are the next steps: 1. Devise an api for external users - there are currently *no* exported symbols 2. Rewrite runtime-class.lisp in terms of this API, instead of the old ASM bytecode modifier library. Any takers? Next to the re-enabling of runtime-class.lisp, the other benefit of the branch is that it's now possible to create Java class files from the compiler which contain much more complicated (but hopefully better performing) method patterns. Regards, Erik.

1 0

[armedbear-devel] How to use JARRAY-SET to fill a byte array?
by Chun Tian (binghe) 14 Sep '10

14 Sep '10

Hi again ... ABCL I want to fill a Java byte[] array. But I don't know how to correctly use JARRAY-SET (I should use it, right?): CL-USER(1): (defvar $*byte (jclass "byte")) $*BYTE CL-USER(2): (setf array (jnew-array $*byte 10)) #<jarray [B@7a2ee7e5 {1D7AAA0E}> CL-USER(3): (jarray-set array 1 0) #<THREAD "interpreter" {6E61A414}>: Debugger invoked on condition of type JAVA-EXCEPTION Java exception 'java.lang.IllegalArgumentException: argument type mismatch'. Restarts: 0: TOP-LEVEL Return to top level. [1] CL-USER(4): 0 CL-USER(5): (jarray-ref array 0) 0 So, a plain number "1" cannot work, but what else I can do? a object of java.lang.Byte? And, is there any quick way I can fill a byte array using contents from a Lisp array? Regards, Chun Tian (binghe)

3 5

[armedbear-devel] How to declare a jconstructor/jmethod which has array arguments?
by Chun Tian (binghe) 14 Sep '10

14 Sep '10

Hi, ABCL I already know how to declare a jconstructor or jmethod which has primitives as arguments: For example, for java.net.DatagramSocket, I have following declarations which works fine: (defvar $*int (jclass "int")) (defvar $*DatagramSocket (jclass "java.net.DatagramSocket")) (defvar $*InetAddress (jclass "java.net.InetAddress")) (defvar $%DatagramSocket/2 (jconstructor $*DatagramSocket $*int $*InetAddress)) (defvar $@close/DatagramSocket/0 (jmethod $*DatagramSocket "close")) ... But how can I declare java.net.DatagramPacket, whose constructor has a byte[] argument: public DatagramPacket (byte[] buf, int offset, int length) Just don't know how to represent "byte[]" ... Regards, Chun Tian (binghe)

3 3

[armedbear-devel] [CfP] 4th European Lisp Symposium, Hamburg, March 31 - April 1st, 2011
by Didier Verna 13 Sep '10

13 Sep '10

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ 4th European Lisp Symposium Special Focus on Parallelism & Efficiency March 31 - April 1st, 2011 TUHH, Hamburg University of Technology Hamburg, Germany http://www.european-lisp-symposium.org/ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Important Dates ~~~~~~~~~~~~~~~~ + Submission Deadline: January 09, 2011 + Author Notification: February 06, 2011 + Final Paper Due: February 28, 2011 + Symposium: March 31 - April 1st, 2011 Authors of accepted research contributions will be invited to submit an extended version of their papers for journal publication. Scope ~~~~~~ The purpose of the European Lisp Symposium is to provide a forum for the discussion and dissemination of all aspects of design, implementation and application of any of the Lisp dialects, including Common Lisp, Scheme, Emacs Lisp, AutoLisp, ISLISP, Dylan, Clojure, ACL2, ECMAScript, Racket and so on. We encourage everyone interested in Lisp to participate. The European Lisp Symposium 2011 invites high quality papers about novel research results, insights and lessons learned from practical applications, and educational perspectives. We also encourage submissions about known ideas as long as they are presented in a new setting and/or in a highly elegant way. This year's focus will be directed towards "Parallelism & Efficiency". We especially invite submissions in the following areas: + Parallel and distributed computing + Code generation for multi-core architectures + Code generation for HTM + Large and ultra-large systems + Optimization techniques + Embedded applications Contributions are also welcome in other areas, including but not limited to: + Context-, aspect-, domain-oriented and generative programming + Macro-, reflective-, meta- and/or rule-based development approaches + Language design and implementation + Language integration, inter-operation and deployment + Development methodologies, support and environments + Educational approaches and perspectives + Experience reports and case studies Technical Program: ~~~~~~~~~~~~~~~~~~ We invite submissions in the following forms: * Papers: Technical papers of up to 15 pages that describe original results or explain known ideas in new and elegant ways. * Demonstrations: Abstracts of up to 4 pages for demonstrations of tools, libraries, and applications. * Tutorials: Abstracts of up to 4 pages for in-depth presentations about topics of special interest for at least 90 minutes and up to 180 minutes. * Lightning talks: Abstracts of up to one page for talks to last for no more than 5 minutes. All submissions should be formatted following the ACM SIGS guidelines and include ACM classification categories and terms. For more information on the submission guidelines and the ACM keywords, see: http://www.acm.org/sigs/publications/proceedings-templates http://www.acm.org/about/class/1998 Submissions should be uploaded to Easy Chair, at the following address: http://www.easychair.org/conferences/?conf=els2011 Programme Chair ~~~~~~~~~~~~~~~~ Didier Verna - EPITA Research and Development Laboratory, France Local Chair ~~~~~~~~~~~~ Ralf Moeller - Hamburg University of Technology, Germany Programme Committee ~~~~~~~~~~~~~~~~~~~~ Antonio Leitao - Instituto Superior Tecnico/INESC-ID, Portugal Christophe Rhodes - Goldsmiths College, University of London, UK David Edgar Liebke - Relevance Inc., USA Didier Verna - EPITA Research and Development Laboratory, France Henry Lieberman - MIT Media Laboratory, USA Jay McCarthy - Brigham Young University, USA Jose Luis Ruiz Reina - Universidad de Sevilla, Spain Marco Antoniotti - Universita Milano Bicocca, Italy Manuel Serrano - INRIA, France Michael Sperber - DeinProgramm, Germany Pascal Costanza - Vrije Universiteit of Brussel, Belgium Scott McKay - ITA Software, USA -- Resistance is futile. You will be jazzimilated. Scientific site: http://www.lrde.epita.fr/~didier Music (Jazz) site: http://www.didierverna.com

1 0

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

11 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