Greetings! I think the below is right. I'll check it in after more
tests. But you might want to scope it out to see if you encounter any
problems:
(in-package :compiler)
(defun wt-ccb-vs (ccb-vs)
(wt "(" (if *closure-p* "fun->cc.cc_turbo" "base0") "[" (- *initial-ccb-vs*
ccb-vs) "]->c.c_car)"))
Take care,
Volker van Nek <volkervan...@gmail.com> writes:
> Hi Camm,
>
> I installed gcl_2.6.12-29_i386.deb from debian sid.
>
> Unfortunately there remains a problem when compiling the attached file.
> GCL doesn't compile the function
> pregexp-match-positions-aux (lines 356 - 539).
>
> pregexp-match-positions-aux uses the macro
> pregexp-recur (lines 29 - 32).
>
> pregexp-recur is applied from line 367 to 536.
> Inside of this call the macro is applied a second time and this seems to
> cause the problems.
> When I comment out the cases
> :one-of-chars
> :seq
> :or
> :between
> where the second macro call occurs, GCL compiles.
>
> Other Lisps compile this file. So I believe it's an error in the GCL
> compiler.
>
> I hope you can help again.
>
> Take care
> Volker
>
> Am 29.10.2015 um 08:39 schrieb Volker van Nek:
>> Hi Camm,
>>
>> thanks a lot for your help.
>>
>> With gcl_2.6.12-28_i386.deb from debian sid compile-file and
>> compile_file now both work again for me.
>>
>> Volker
>>
>> Am 27.10.2015 um 18:52 schrieb Camm Maguire:
>>> Greetings, and thanks so much for the report! I've checked in a fix,
>>> and uploaded to Debian unstable.
>>>
>>> Take care,
>>>
>>> Volker van Nek <volkervan...@gmail.com> writes:
>>>
>>>> Hi Camm,
>>>>
>>>> I hope the following provides enough details.
>>>>
>>>> I put nothing but
>>>> (defun eleven () 11)
>>>> into a file.
>>>>
>>>> volker@uvw32:~/Maxima/test$ gcl
>>>> GCL (GNU Common Lisp) 2.6.12 ANSI Oct 7 2015 16:20:57
>>>>
>>>>> (load "~/Maxima/test/eleven.lisp")
>>>> Loading ~/Maxima/test/eleven.lisp
>>>> Finished loading ~/Maxima/test/eleven.lisp
>>>> T
>>>>
>>>>> (eleven)
>>>> 11
>>>>
>>>>> (compile 'eleven)
>>>> Compiling /tmp/gazonk_5346_0.lsp.
>>>> End of Pass 1.
>>>> End of Pass 2.
>>>> OPTIMIZE levels: Safety=0 (No runtime error checking), Space=0, Speed=3
>>>> Finished compiling /tmp/gazonk_5346_0.lsp.
>>>> Loading /tmp/gazonk_5346_0.o
>>>> start address -T 0x826880 Finished loading /tmp/gazonk_5346_0.o
>>>> #<compiled-function ELEVEN>
>>>> NIL
>>>> NIL
>>>>
>>>>> (compile-file "~/Maxima/test/eleven.lisp")
>>>> Compiling ~/Maxima/test/eleven.lisp.
>>>> End of Pass 1.
>>>> End of Pass 2.
>>>>
>>>> Error:
>>>> Fast links are on: do (si::use-fast-links nil) for debugging
>>>> Signalled by COMPILE-FILE.
>>>> Condition in COMPILE-FILE [or a callee]: INTERNAL-SIMPLE-ERROR: Format
>>>> error: illegal directive.
>>>>
>>>>
>>>> V
>>>> "gcc -c -g -fstack-protector-strong -Wformat -Werror=format-security
>>>> -D_FORTIFY_SOURCE=2 -fsigned-char -Wall -Wno-unused-but-set-variable
>>>> -pipe -I/usr/lib/gcl-2.6.12/unixport/../h -O2 -c
>>>> "~/Maxima/test/eleven.c" -o "~/Maxima/test/eleven.o" "
>>>>
>>>>
>>>> Broken at COMPILE-FILE. Type :H for Help.
>>>> 1 Return to top level.
>>>>>>
>>>>
>>>>
>>>> Take care
>>>>
>>>> Volker
>>>>
>>>> Am 26.10.2015 um 15:58 schrieb Camm Maguire:
>>>>> Greetings!
>>>>>
>>>>> Volker van Nek <volkervan...@gmail.com> writes:
>>>>>
>>>>>> I have coded and tested pregexp-replacements for functions using nregex
>>>>>> in src/commac.lisp and src/cl-info.lisp.
>>>>>>
>>>>>> This time I used sbcl.
>>>>>> (compile_file doesn't work with gcl 2.6.12 in my gcl-Maxima build)
>>>>>>
>>>>>
>>>>> If you'd like to provide the details here I'll try to look into it.
>>>>>
>>>>> Take care,
>>>>>
>>>>
>>>>
>>>>
>>>>
>>>>
>>>
>>
>
>
--
Camm Maguire c...@maguirefamily.org
==========================================================================
"The earth is but one country, and mankind its citizens." -- Baha'u'llah
_______________________________________________
Gcl-devel mailing list
Gcl-devel@gnu.org
https://lists.gnu.org/mailman/listinfo/gcl-devel
