April 2012 - cmucl-ticket - mailman3.common-lisp.net

[cmucl-ticket] [cmucl] #56: Heap overflow checking fails on darwin/x86
by cmucl 03 Sep '12

03 Sep '12

#56: Heap overflow checking fails on darwin/x86 --------------------+------------------------------------------------------- Reporter: rtoy | Owner: somebody Type: defect | Status: new Priority: major | Milestone: Component: Core | Version: 2012-01 Keywords: | --------------------+------------------------------------------------------- {{{ cmulisp -dynamic-space-size 64 * (defvar *1* (make-list 10000000)) ; [GC threshold exceeded with 35,359,432 bytes in use. Commencing GC.] ; [GC completed with 21,504,336 bytes retained and 13,855,096 bytes freed.] ; [GC will next occur when at least 53,504,336 bytes are in use.] ; [GC threshold exceeded with 53,514,472 bytes in use. Commencing GC.] *A2 gc_alloc_new_region failed, nbytes=8. CMUCL has run out of dynamic heap space (64 MB). You can control heap size with the -dynamic-space-size commandline option. sigbus_handler: Real protection violation at 0xac3, PC = 0x4b3243e3 ... }}} This probably happens in older versions too, but I didn't check. Works ok on linux. -- Ticket URL: <http://trac.common-lisp.net/cmucl/ticket/56> cmucl <http://common-lisp.net/project/cmucl> Cmucl is a high-performance, free Common Lisp implementation.

1 1

[cmucl-ticket] [cmucl] #59: pcl failure
by cmucl 21 Apr '12

21 Apr '12

#59: pcl failure --------------------+------------------------------------------------------- Reporter: rtoy | Owner: rtoy Type: defect | Status: new Priority: major | Milestone: Component: PCL | Version: 20c Keywords: | --------------------+------------------------------------------------------- Mentioned on the asdf-devel page. 1. start cmucl 1. {{{(require :asdf)}}} 1. push my asdf directory onto {{{asdf:*central-registry*}}} 1. {{{(asdf:load-system :asdf)}}} The asdf directory in question is the directory containing the asdf version 2.20.18. The error produced is: {{{ #(11) fell through ETYPECASE expression. Wanted one of (FUNCTION PCL::FAST-INSTANCE-BOUNDP FIXNUM PCL::METHOD-CALL PCL::FAST-METHOD-CALL). [Condition of type CONDITIONS::CASE-FAILURE] Restarts: 0: [TRY-RECOMPILING] Try recompiling asdf 1: [RETRY ] Retry compiling #<CL-SOURCE-FILE "asdf" "asdf">. 2: [ACCEPT ] Continue, treating compiling #<CL-SOURCE-FILE "asdf" "asdf"> as having been successful. 3: [ABORT ] Return to Top-Level. }}} -- Ticket URL: <http://trac.common-lisp.net/cmucl/ticket/59> cmucl <http://common-lisp.net/project/cmucl> Cmucl is a high-performance, free Common Lisp implementation.

1 1

[cmucl-ticket] [cmucl] #58: UTF-16 buffering problem
by cmucl 19 Apr '12

19 Apr '12

#58: UTF-16 buffering problem ---------------------+------------------------------------------------------ Reporter: rtoy | Owner: Type: defect | Status: new Priority: major | Milestone: Component: Unicode | Version: 2012-04 Keywords: | ---------------------+------------------------------------------------------ The following code should not cause errors: {{{ (with-open-file (s "test.txt" :direction :output :external-format :utf-16) (dotimes (i 300) (write-char (code-char i) s))) (with-open-file (s "test.txt" :direction :input :external-format :utf-16) (dotimes (i 300) (let ((ch (read-char s nil nil))) (unless (= i (char-code ch)) (format t "Error at ~D: ~S, ~4X~%" i ch (char-code ch)))))) }}} -- Ticket URL: <http://trac.common-lisp.net/cmucl/ticket/58> cmucl <http://common-lisp.net/project/cmucl> Cmucl is a high-performance, free Common Lisp implementation.

1 2