September 2020 - armedbear-ticket - mailman3.common-lisp.net

[armedbear] #473: IllegalStateException, when reading after rewinding
by armedbear 01 Oct '20

01 Oct '20

#473: IllegalStateException, when reading after rewinding -------------------------------+--------------------- Reporter: Mark Evenson | Type: defect Status: new | Priority: major Milestone: 1.8.0 | Component: streams Version: 1.7.1-dev | Keywords: Parent Tickets: | -------------------------------+--------------------- Robert Munyer reports in <https://mailman.common-lisp.net/pipermail /armedbear-devel/2020-September/004135.html>: {{{ The code below works in CCL, CLISP and SBCL, but not in ABCL. $ echo hello > hello.text $ java -jar abcl-1.7.1.jar Armed Bear Common Lisp 1.7.1 Java 1.8.0_265 Oracle Corporation OpenJDK 64-Bit Server VM Low-level initialization completed in 0.181 seconds. Startup completed in 0.945 seconds. Type ":help" for a list of available commands. CL-USER(1): (with-open-file (in "hello.text") (list (read in) (read in nil) (file-position in :start) (read in))) java.lang.IllegalStateException: Current state = CODING_END, new state = CODING at java.nio.charset.CharsetDecoder.throwIllegalStateException(CharsetDecoder.java:992) at java.nio.charset.CharsetDecoder.decode(CharsetDecoder.java:572) at org.armedbear.lisp.util.RandomAccessCharacterFile.read(RandomAccessCharacterFile.java:392) [ many stack frames elided ] at org.armedbear.lisp.Main$1.run(Main.java:48) at java.lang.Thread.run(Thread.java:748) #<THREAD "interpreter" {2CD58E2}>: Debugger invoked on condition of type ERROR Caught java.lang.IllegalStateException: Current state = CODING_END, new state = CODING. Restarts: 0: TOP-LEVEL Return to top level. [1] CL-USER(2): }}} -- Ticket URL: <https://abcl.org/trac/ticket/473> armedbear <https://abcl.org> armedbear

1 2

[armedbear] #474: Regression, immediately invoked function expressions
by armedbear 01 Oct '20

01 Oct '20

#474: Regression, immediately invoked function expressions -------------------------------+-------------------- Reporter: Mark Evenson | Type: defect Status: new | Priority: major Milestone: 1.8.0 | Component: other Version: 1.7.1-dev | Keywords: Parent Tickets: | -------------------------------+-------------------- Robert Munyer notes in <https://mailman.common-lisp.net/pipermail/armedbear- devel/2020-September/004134.html>: {{{ The function below works in CCL, CLISP, SBCL and ABCL 1.4.0, but not in ABCL 1.7.1. $ java -jar abcl-1.7.1.jar Armed Bear Common Lisp 1.7.1 Java 1.8.0_265 Oracle Corporation OpenJDK 64-Bit Server VM Low-level initialization completed in 0.188 seconds. Startup completed in 0.869 seconds. Type ":help" for a list of available commands. CL-USER(1): (defun add3 (foo) ((lambda (bar) ((lambda (baz) (1+ baz)) (1+ bar))) (1+ foo))) #<THREAD "interpreter" {32B46F86}>: Debugger invoked on condition of type TYPE-ERROR The value (LAMBDA (BAZ) (1+ BAZ)) is not of type SYMBOL. Restarts: 0: TOP-LEVEL Return to top level. [1] CL-USER(2): }}} -- Ticket URL: <https://abcl.org/trac/ticket/474> armedbear <https://abcl.org> armedbear

1 2

Re: [armedbear] #420: Add ability to optimize function calls with lambda in function position. Use it to optimize jss
by armedbear 30 Sep '20

30 Sep '20

#420: Add ability to optimize function calls with lambda in function position. Use it to optimize jss -------------------------------+-------------------------- Reporter: Mark Evenson | Owner: (none) Type: enhancement | Status: closed Priority: major | Milestone: 1.5.0 Component: compiler | Version: 1.5.0-dev Resolution: fixed | Keywords: github-issue Parent Tickets: | -------------------------------+-------------------------- Comment (by Mark Evenson): Should be fixed with <https://github.com/armedbear/abcl/pull/303>. Waiting for the CI tests to complete before merging. -- Ticket URL: <https://abcl.org/trac/ticket/420#comment:5> armedbear <https://abcl.org> armedbear

1 0

[armedbear] #471: LOOP destructures non-conformingly
by armedbear 15 Sep '20

15 Sep '20

#471: LOOP destructures non-conformingly -------------------------------+-------------------- Reporter: Mark Evenson | Type: defect Status: new | Priority: major Milestone: | Component: other Version: 1.7.1-dev | Keywords: Parent Tickets: | -------------------------------+-------------------- {{{ (loop with (a b) = '(1) do (return (list a b))) (loop for (a b) = '(1) do (return (list a b))) }}} These forms should both return {{{ (1 nil) }}} as per http://www.lispworks.com/documentation/HyperSpec/Body/06_aag.htm Problem reported by Steve Losh. c.f. <https://gitlab.com/embeddable-common-lisp/ecl/-/issues/605> -- Ticket URL: <https://abcl.org/trac/ticket/471> armedbear <https://abcl.org> armedbear

1 4