Re: [Maxima-discuss] GCL pathname bug

[Camm M. <ca...@ma...>]

Greetings!

There are two gcl flavors currently in debian testing:

gcl --   currently Version_2_6_15pre
gcl27 -- currently Version_2_7_2pre

maxima builds using gcl27 automatically, but at least for a while I
would like to have it build with both.

The latest gcl27 C23 support should hit debian testing today or
tomorrow: 

https://qa.debian.org/excuses.php?package=gcl27

I would like to push out the official tarballs of 2.6.15 and 2.7.2 to
the gnu site sometime in the next few weeks.  The principal release goal
for 2.7.2 was mac os arm support, which is strictly C23, and should work
now, but I cannot yet confirm myself as I still have no access to such a
machine.  A volunteer has arisen to offer one, but this is still in
progress.

Take care,


Leo Butler <Leo...@um...> writes:

> Hi Camm,
>
> Thank you for the patch. I applied it during the build process for
> Maxima+GCL and it completed successfully.
>
> Do you have an ETA for the release of 2.6.15 ? or for 2.7.1 to land in
> debian testing.
>
> I am just using the stock GCL package for testing, so I was surprised to
> see that the Maxima package works fine, but one cannot build Maxima
> using the GCL in testing.
>
> Best regards,
> Leo
>
> On Mon, Mar 02 2026, Camm Maguire <ca...@ma...> wrote:
>
>> Greetings, and thanks so much for your report!  I see you are using
>> 2.6.14, and I apologize for having focused solely on current 2.7.1 and
>> forthcoming 2.7.2.  I do want to support the 2.6 series builds for at
>> least a while longer, so I appreciate the report.
>>
>> This patch should fix things for you.  I will be releasing this as a
>> Debian package, and a final 2.6.15 to end the 2.6 series relatively
>> soon.
>>
>> Take care,
>>
>> =============================================================================
>> (in-package :compiler)
>> (defun c2gethash (args)
>>   (cond ((member *value-to-go* '(top return))
>> 	 (let* ((nargs (inline-args args '(t t t)))
>> 		(base *vs*)(*vs* *vs*)
>> 		(r (cdr (vs-push)))(f (cdr (vs-push))))
>> 	   (wt-nl "{ struct htent *_z=gethash" (if *safe-compile* "_with_check" "") "(" (car nargs) "," (cadr nargs) ");")
>> 	   (wt-nl "if (_z->hte_key==OBJNULL) {")
>> 	   (wt-nl "base[" r "]=" (caddr nargs) ";")
>> 	   (wt-nl "base[" f "]=Cnil;")
>> 	   (wt-nl "} else {")
>> 	   (wt-nl "base[" r "]=_z->hte_value;")
>> 	   (wt-nl "base[" f "]=Ct;")
>> 	   (wt-nl "}}")
>> 	   (wt-nl "vs_top=(vs_base=base+" base ")+" (- *vs* base) ";")
>> 	   (unwind-exit 'fun-val nil (cons 'values 2))
>> 	   (close-inline-blocks)))
>> 	((let ((*inline-blocks* 0)
>> 	       (*restore-avma*  *restore-avma*)
>> 	       (fd `((t t t) t #.(flags rfa) 
>> 		     ,(concatenate 'string
>> 				   "({struct htent *_z=gethash"
>> 				   (if *safe-compile* "_with_check" "")
>> 				   "(#0,#1);_z->hte_key==OBJNULL ? (#2) : _z->hte_value;})")))) 
>> 	   (save-avma fd)
>> 	   (unwind-exit (get-inline-loc fd args))
>> 	   (close-inline-blocks)))))
>> =============================================================================           
>>
>> Leo Butler <Leo...@um...> writes:
>>
>>> Camm,
>>>
>>> Attached is the complete output from an attempt to build Maxima with 4
>>> lisps from this morning.
>>>
>>> At line 28291, you will see the initial error that I posted. There are,
>>> I believe, several thousand lines of repetitive errors/warnings above
>>> that.
>>>
>>> Best regards,
>>> Leo
>>>
>>>
>>>

-- 
Camm Maguire			     		    ca...@ma...
==========================================================================
"The earth is but one country, and mankind its citizens."  --  Baha'u'llah