RE: SV: ;;; An error occurred in function GROW-CODE-BUFFER:

Well, the simplest thing looks to be to add an implementation of
GROW-CODE-BUFFER (what do you know?  :-)

You can add this to sys/assembler.lisp (replace the existing function by
that name):

(defun grow-code-buffer () 
    (let* ((buf *compiler-code-buffer*)
           (cbuf (uref buf code-buffer-cbuf-offset))
           (size (uref buf code-buffer-max-code-bytes-offset))
           (new-buf (make-array (+ (* size 2) 16) 
                       :element-type 'byte :initial-element 0))
           (current (uref buf code-buffer-code-index-offset)))
        (dotimes (i current)
            (setf (elt new-buf i) (elt cbuf i)))
        (setf (uref buf code-buffer-cbuf-offset) new-buf)))

And rebuild the image. This will cause the assembler to grow the code
buffer the same way the compiler does during compilation. Incidentally,
the assembler is invoked here because the implementation of (SETF CREF)
uses it to output the code bytes. If it happens to trip to code buffer
overflow routine, rather than the compiler, then this would come up
(although this was the first time I had heard of it).

Roger


-----Original Message-----
From: lcluke [mailto:[email protected]] 
Sent: Friday, April 04, 2003 3:19 PM
To: [email protected]
Subject: Re: SV: [cormanlisp] ;;; An error occurred in function
GROW-CODE-BUFFER:


--- In [email protected], "lcluke" <lcluke@w...> wrote:
> --- In [email protected], Roger Corman <roger@c...> wrote:
> 
> I am using:
> 
> - CCL 2.01 (no patches installed as I just re-installed the whole
> thing)
> - Windows XP Home, with the latest service pack.

I just installed the latest patches for 2.01 but still get the same 
error.

-Luke



To unsubscribe from this group, send an email to:
[email protected]

 

Your use of Yahoo! Groups is subject to
http://docs.yahoo.com/info/terms/ 



------------------------ Yahoo! Groups Sponsor ---------------------~-->
Get 128 Bit SSL Encryption!
http://us.click.yahoo.com/W7NydA/hdqFAA/VygGAA/SyjtlB/TM
---------------------------------------------------------------------~->

To unsubscribe from this group, send an email to:
[email protected]

 

Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/