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

JP Massar <[email protected]> Fri, 04 Apr 2003 11:03:17 -0800
Newsgroups gmane.lisp.corman
Message-ID <[email protected]>
At 10:46 AM 4/4/03 -0800, Roger Corman wrote:
>This is true, but GROW-CODE-BUFFER is only used by the assembler. Compiled 
>functions (like the one Luke shows) do not use this 4k buffer. Compiled 
>functions can generally grow to 64k bytes (more, I believe, with a setting 
>change). The 4k limitation (which could easily be increased in 
>assembler.lisp) is usually sufficient because normally you don't write 
>assembler functions thousands of lines long.
>
>I just don't understand why the assembler was getting called here. I tried 
>the function, increasing to v7, and did not get that error.


I could not reproduce the error either.

What exact OS and version of Corman are you using?

What is your type definition for vertex-arrayf?

I used

(win:defctype vertex-arrayf (:long *))


> >>
> >> I'm getting a GROW-CODE-BUFFER error when I try to create a specific
> >> function.
> >>
> >> The function itself looks like this:
> >>
> >> (defun create-object ()
> >>         (setf (ct:cref vertex-arrayf v0 0) -1.0)
> >>         (setf (ct:cref vertex-arrayf v0 1) -1.0)
> >>         (setf (ct:cref vertex-arrayf v0 2) 1.0)
> >>
> >>       (format t "v0 [~A, ~A, ~A]~%"
> >>       (ct:cref vertex-arrayf v0 0)
> >>       (ct:cref vertex-arrayf v0 1)
> >>       (ct:cref vertex-arrayf v0 2))
> >>
> >>         (setf (ct:cref vertex-arrayf v1 0) 1.0)
> >>         (setf (ct:cref vertex-arrayf v1 1) -1.0)
> >>         (setf (ct:cref vertex-arrayf v1 2) 1.0)
> >>
> >> ... repeat until v7
> >>



------------------------ 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/