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/