armedbear-devel

armedbear-devel@common-lisp.net

1 participants
1200 discussions

[armedbear-devel] Gray streams bugs
by Theam Yong Chew 08 Apr '15

08 Apr '15

Hi all, I inadvertently discovered some bugs in the gray-streams implementation due to a stale flexi-streams that did not get upgraded properly. There were quite a few things that needed tidying - the type checking using EQ is wrong. Also, after trying to hunt around CLHS, I think BYTE is not a CL type (though I may be mistaken). This could be a reflection of some Corman Lisp specific feature in the past (Yes! These bugs seem to have been around ABCL for that long!) Some test examples (avoiding flexi-streams or other dependencies) ;; ----- setup (require 'gray-streams) (defclass test-gray-binary-input-stream (gray-streams:fundamental-binary-input-stream) ()) (defclass test-gray-character-input-stream (gray-streams:fundamental-character-input-stream) ()) (let ((bytes (list 65 66 67 68 69)) (pos -1)) (defmethod gray-streams::stream-read-byte ((stream test-gray-binary-input-stream)) (elt bytes (mod (incf pos) 5)))) (let ((chars (list #\A #\B #\C #\D #\E)) (pos -1)) (defmethod gray-streams::stream-read-char ((stream test-gray-character-input-stream)) (elt chars (mod (incf pos) 5)))) ;; ----- (let ((s (make-instance 'test-gray-binary-input-stream))) (loop repeat 10 collect (read-byte s))) => (65 66 67 68 69 65 66 67 68 69) (let ((arr (make-array 10 :initial-element nil))) (list (read-sequence arr (make-instance 'test-gray-binary-input-stream) :start 2 :end 7) arr)) Expected (7 #(NIL NIL 65 66 67 68 69 NIL NIL NIL)), but got an error instead, ... no applicable method... I guess implementors of gray streams would normally define both read-byte & read-sequence. But ABCL's default/fallback method does try to support binary streams, it just isn't being dispatched on the right class. Also, read-sequence should return the "final" array index, not the number of bytes/characters read. Similarly, write-sequence needs to do its work, then return the sequence itself. Attached is a patch with what I hope are the required fixes, please review. Two additional notes, 1. Even after loading my proposed fixes, I'd would still get this, which is ok, but the error message is not obvious enough. This is actually a method not found error, not a type error. There appears to be some type guessing going on, so perhaps the message should indicate failure to dispatch on STREAM or similar. (gray-streams::stream-element-type (make-instance 'test-gray-binary-input-stream)) The value #<TEST-GRAY-BINARY-INPUT-STREAM {500BBBF9}> is not of type STREAM. [Condition of type TYPE-ERROR] So we just need something like this, (defmethod gray-streams::stream-element-type ((stream test-gray-binary-input-stream)) '(unsigned-byte 8)) 2. I also don't understand this snippet in the original code, converting unsigned-bytes/integers (basically the wrong type) to a character? (#+nil ccl:int-char code-char (elt sequence n)) Of course, after patching the above, I discovered that re-compiling flexi-streams got rid of my particular set of problems :-) Yong

3 6

[armedbear-devel] CLtL2 Environment functions
by Marco Antoniotti 08 Apr '15

08 Apr '15

Hello it looks like ABCL does not implement CLtL2 environment functions. (CLtL chapter 8.5). Would you guys consider putting them in (if not in yet?) Thanks -- Marco Antoniotti

2 2

[armedbear-devel] Performance of eq hash tables
by Alan Ruttenberg 08 Apr '15

08 Apr '15

Hi, Has anyone looked at this? I'm traversing a large structure and using an eq (tried eql too) hash table to record where I've been so that I don't get caught in circularities. There are about 1.5M nodes, but what I see is that adding entries to the hash table slows down (a lot) over time, even when I give an initial size of 4,000,000. That would be max occupancy of 30%, lower than anyone would typically rehash. What I see is that it rapidly starts to fill. At 300k entries I'm getting about 2.5K new entries per second. By the time I get to 600k entries it is down to 750 new entries/sec. At 900k (where it stands now) it's about 500 entries/sec. That makes me suspect that the hash isn't distributing well over the size of the underlying vector and that the slowdown is due to buckets getting long. I'm not sure how to probe this - any ideas? Or to fix it. I suppose I could look for an alternative hash implementation, but I thought I would check first with the list to see if anyone else can shed some light. Thanks, Alan

2 1

[armedbear-devel] Source repository has moved?
by Eric Marsden 08 Apr '15

08 Apr '15

Hi, I have long been tracking the source code repository at svn://common-lisp.net/project/armedbear/svn/trunk/abcl/ (as indicated at http://common-lisp.net/project/armedbear/faq.shtml) but the last update is r14462 from 2013-04-05. What is the new location of the repository? Thanks, -- Eric Marsden

2 1

[armedbear-devel] ELS 2014 Registration now open / 2nd Call for papers
by Didier Verna 08 Apr '15

08 Apr '15

ELS'14 - 7th European Lisp Symposium IRCAM, Paris, France May 5-6, 2014 http://www.european-lisp-symposium.org/ Latest News: * Registration is now open. Early registration fee until April 13. See http://www.european-lisp-symposium.org/content-registration-full.html * Submission deadline is approaching. Still one month to submit a paper! * Thanks to our new sponsors, Lispworks and Franz Inc.! http://www.lispworks.com/ http://franz.com/ 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 and Lisp-inspired dialects, including Common Lisp, Scheme, Emacs Lisp, AutoLisp, ISLISP, Dylan, Clojure, ACL2, ECMAScript, Racket, SKILL, Hop and so on. We encourage everyone interested in Lisp to participate. The 7th European Lisp Symposium 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. Topics include but are 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 Please note that IRCAM, the conference venue, is a French institute for research on music and acoustics. Submissions relating Lisp to music or other acoustical matters will hence be particularly welcome, although given no heightened favor during the review process. We invite submissions in the following forms: Papers: Technical papers of up to 8 pages that describe original results or explain known ideas in new and elegant ways. Demonstrations: Abstracts of up to 2 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. The symposium will also provide slots for lightning talks, to be registered on-site every day. 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 and http://www.acm.org/about/class/1998. Important dates: - TODAY: Mark your calendar. Start planning now! - 09 Mar 2014: Submission deadline - 31 Mar 2014: Notification of acceptance - 13 Apr 2014: Early registration deadline - 21 Apr 2014: Final Papers due - 05 May 2014: Symposium. Join us there! Programme chair: Kent Pitman, Hypermeta Inc., U.S.A. Local chairs: Didier Verna, EPITA Research Lab, France Gérard Assayag, IRCAM, Paris, France Programme committee: To be announced later Local organizers: Daniela Becker, EPITA Research Lab, France Sylvie Benoit, IRCAM, Paris, France Search Keywords: #els2014, ELS 2014, ELS '14, European Lisp Symposium 2014, European Lisp Symposium '14, 7th ELS, 7th European Lisp Symposium, European Lisp Conference 2014, European Lisp Conference '14 Ircam STMS Lab, IRCAM / CNRS / UPMC -- Please help crowdfund my next Jazz quartet album !! http://www.kisskissbankbank.com/quartet-the-second-album Lisp, Jazz, Aïkido: http://www.didierverna.info

1 0

[armedbear-devel] Ticket 240: Support 3-arg FIND-CLASS and (SETF FIND-CLASS)
by Erik Huelsmann 08 Apr '15

08 Apr '15

Hi Rudi, Some time ago, I promissed I'd look at implementing the three argument version of FIND-CLASS. I can't really test it, but I've finally managed to hack up my proposed solution. Find the patch included below and attached to the ticket. Also, I'm not sure the compiler sets up a global compilation environment. I think that if it doesn't, you want to bind a new environment somewhere in the COMPILE-FROM-STREAM to *compile-file-environment*. HTH, -- Bye, Erik. http://efficito.com -- Hosted accounting and ERP. Robust and Flexible. No vendor lock-in. The patch: Index: Environment.java =================================================================== --- Environment.java (revision 14552) +++ Environment.java (working copy) @@ -42,6 +42,7 @@ private Binding blocks; private Binding tags; public boolean inactive; //default value: false == active + private static final ConcurrentHashMap<Symbol, LispObject> classMap; public Environment() {} @@ -53,7 +54,11 @@ lastFunctionBinding = parent.lastFunctionBinding; blocks = parent.blocks; tags = parent.tags; + classMap = parent.classMap; } + else + classMap = new ConcurrentHashMap<Symbol, LispObject>(); + } // Construct a new Environment extending parent with the specified symbol- @@ -217,6 +222,36 @@ return null; } + final public LispObject addClass(LispObject name, LispObject c) + { + classMap.put(checkSymbol(name), c); + return c; + } + + final public LispObject findClass(LispObject name, boolean errorp) + { + final Symbol symbol = checkSymbol(name); + final LispObject c = classMap.get(symbol); + + if (c != null) + return c; + + if (errorp) + { + StringBuilder sb = + new StringBuilder("There is no class named "); + sb.append(name.princToString()); + sb.append('.'); + return error(new LispError(sb.toString())); + } + return NIL; + } + + final public void removeClass(LispObject name) + { + classMap.remove(checkSymbol(name)); + } + // Returns body with declarations removed. public LispObject processDeclarations(LispObject body) Index: LispClass.java =================================================================== --- LispClass.java (revision 14552) +++ LispClass.java (working copy) @@ -328,8 +328,7 @@ LispObject third) { - // FIXME Use environment! - return findClass(first, second != NIL); + return checkEnvironment(third).findClass(first, second != NIL); } }; @@ -339,7 +338,6 @@ { @Override public LispObject execute(LispObject first, LispObject second) - { final Symbol name = checkSymbol(first); if (second == NIL) @@ -350,6 +348,18 @@ addClass(name, second); return second; } + + @Override + public LispObject execute(LispObject first, LispObject second, + LispObject third, LispObject fourth) + { + if (second == NIL) + { + checkEnvironment.removeClass(first); + return second; + } + + return checkEnvironment(fourth).addCleass(first, second); }; // ### subclassp

1 0

[armedbear-devel] ASDF 3.0.0
by Faré 08 Apr '15

08 Apr '15

Dear ABCL hackers, I'm proud to announce the release of release ASDF 3.0.0. Please test it and include it in ABCL. I'll have to produce some document explaining the innovations since ASDF 2.26, 2.000 and/or 1.369, but for now here are just the changes since 2.33. As you can see, it's very minor stuff, and ASDF has been mostly stable these last two months, which is a good sign and the reason why I'm making an official 3.0.0 release. I'm also inserting a new digit in the version, so releases will have three digits: 3.0.0, 3.0.1, etc. will be minor continuations of 3.0. 3.1.0 will be the next "major" milestone in a series that preserves backward compatibility, and 4.0 (if ever) will be the next major release that doesn't. But I probably won't be there to see it, because I'm moving away from my Common Lisp job in Cambridge MA to some new as yet undetermined opportunities in NYC that are unlikely to see me do Common Lisp for a living, and I plan to try out different Lisps for a hobby (Racket, Maru, etc.). * Portability: have *uninteresting-conditions* be empty by default. Move stuff to *usual-uninteresting-conditions*, unused by default. Will make the SBCL team happy. Also, fix tests on ABCL. Fix regression of program-op on ECL, by implicitly linking in UIOP or ASDF. * UIOP: improvements to slurp-input-stream and thus run-program, notably accepting T as alias for *standard-output*, for better backward-compatibility of the deprecated run-shell-command. New macro with-output-file. * POIU support enhanced with various tweaks. * Build cleanup so make and concatenate-source-op create the same asdf.lisp —♯ƒ • François-René ÐVB Rideau •Reflection&Cybernethics• http://fare.tunes.org Reason isn't about not having prejudices, it's about having (appropriate) postjudices. — Faré

1 0

[armedbear-devel] Re: [quicklisp] ABCL vs SBCL quicklisp load time in .rc files
by Mark Evenson 08 Apr '15

08 Apr '15

On 05/11/13 1428 , Zach Beane wrote: > Dave Tenny <dave.tenny(a)gmail.com> writes: > >> This may be more of an ABCL question than a Quicklisp question I guess, >> but I haven't yet found a good place to ask ABCL questions of this type. >> I'll post this in the common-lisp group too. >> >> I have the following code in my SBCL and ABCL rc files for quicklisp: >> >> #-quicklisp >> (let ((quicklisp-init (merge-pathnames "quicklisp/setup.lisp" >> (user-homedir-pathname)))) >> (when (probe-file quicklisp-init) >> (load quicklisp-init))) >> >> >> It executes in negligible time in SBCL, but takes about 12-13 seconds every >> time in ABCL (beyond the prior 2 seconds for normal jvm/abcl startup time). >> >> In both cases there's no obvious compilation or other stuff going on (as >> in, no output to console of things being compiled). >> >> Any idea why it takes so long in ABCL? >> >> Thanks, and ABCL discussion forum pointers welcome. > > I'm not sure why it takes so long, sorry. I don't think that's typical, > but I could be mistaken. I don't use ABCL very much. > > armedbear-devel(a)common-lisp.net is a good place for ABCL questions. I'm > not sure how you subscribe, but there are a lot of helpful ABCL hackers > answering questions there. Unfortunately, I believe that the long startup time for Quicklisp in ABCL is typical In order to save on raw startup time, the ABCL implementation has an autoload mechanism by which the compilation unit ("file") containing a given function is not loaded until first one is executed. Among other things, this means that we don't have to load CLOS to get to the bare "CL-USER>" REPL prompt. Since Quicklisp is intimately connected to ASDF which in turn is wedded at the hip to CLOS, loading Quicklisp in `~/.abclrc` effectively means that there are no time savings incurred by the autoload mechanism. Note that I "believe" this to be the case, not having actually verified by appropriate profiling, which would probably be easy to do by some combination of setting the [`abcl.autoload.verbose`][1]: Java property to collect various profiles of with/without Quicklisp/ASDF. [1]: http://abcl.org/trac/wiki/AbclJavaProperties We would welcome any suggestions for strategies to decrease our this time. -- "A screaming comes across the sky. It has happened before, but there is nothing to compare to it now."

1 1

[armedbear-devel] [CfP] DEADLINE EXTENSION - 7th European Lisp Symposium
by Didier Verna 08 Apr '15

08 Apr '15

ELS'14 - 7th European Lisp Symposium IRCAM, Paris, France May 5-6, 2014 http://www.european-lisp-symposium.org/ Sponsored by IRCAM, CNRS, UPMC, EPITA, LispWorks, Franz Inc. Latest News: * SUBMISSION DEADLINE EXTENDED. You have two more week to submit! * Registration is now open. Early registration fee until April 13. See http://www.european-lisp-symposium.org/content-registration-full.html 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 and Lisp-inspired dialects, including Common Lisp, Scheme, Emacs Lisp, AutoLisp, ISLISP, Dylan, Clojure, ACL2, ECMAScript, Racket, SKILL, Hop and so on. We encourage everyone interested in Lisp to participate. The 7th European Lisp Symposium 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. Topics include but are 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 Please note that IRCAM, the conference venue, is a French institute for research on music and acoustics. Submissions relating Lisp to music or other acoustical matters will hence be particularly welcome, although given no heightened favor during the review process. We invite submissions in the following forms: Papers: Technical papers of up to 8 pages that describe original results or explain known ideas in new and elegant ways. Demonstrations: Abstracts of up to 2 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. The symposium will also provide slots for lightning talks, to be registered on-site every day. 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 and http://www.acm.org/about/class/1998. Important dates: - TODAY: Mark your calendar. Start planning now! - 23 Mar 2014: Submission deadline **** EXTENDED **** - 31 Mar 2014: Notification of acceptance - 13 Apr 2014: Early registration deadline - 21 Apr 2014: Final Papers due - 05 May 2014: Symposium. Join us there! Programme chair: Kent Pitman, Hypermeta Inc., U.S.A. Local chairs: Didier Verna, EPITA Research Lab, France Gérard Assayag, IRCAM, Paris, France Programme committee: Marie Beurton-Aimar — LaBRI, University of Bordeaux, France Pierre Parquier — IBM France Lab, Paris, France Rainer Joswig — Hamburg, Germany Guiseppe Attardi — Università di Pisa, Italy Taiichi Yuasa — Kyoto University, Japan António Leitão — IST/Universidade de Lisboa, Portugal Christophe Rhodes — Goldsmiths, University of London, UK Olin Shivers — Northeastern University, USA Charlotte Herzeel — IMEC, ExaScience Life Lab, Leuven, Belgium Local organizers: Daniela Becker, EPITA Research Lab, France Sylvie Benoit, IRCAM, Paris, France Search Keywords: #els2014, ELS 2014, ELS '14, European Lisp Symposium 2014, European Lisp Symposium '14, 7th ELS, 7th European Lisp Symposium, European Lisp Conference 2014, European Lisp Conference '14 Ircam STMS Lab, IRCAM / CNRS / UPMC -- Resistance is futile. You will be jazzimilated. Lisp, Jazz, Aïkido: http://www.didierverna.info

1 0

[armedbear-devel] loading maven snapshot repositories?
by Cyrus Harmon 08 Apr '15

08 Apr '15

It seems that there’s a maven convention where repositories get version “numbers” like 1.5.6-SNAPSHOT. This doesn’t seem to be supported by the current acbl-asdf contrib. Before I try to track this down, has anyone else run into this and, if so, any suggestions for working around this? thanks, Cyrus

1 0

Jump to page:

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

armedbear-devel