Re: [fricas-devel] FriCAS and GCL

[Camm Maguire]

Greetings!  This seems to work, but not I'm getting "Cannot connect to
FRICAS server" in sman during the doc build stage.  Any suggestions?

Take care,

Camm Maguire <camm@maguirefamily.org> writes:

> Greetings!
>
> Think I've spotted this:
>
> daase.lisp:
>
> ;      #-:GCL
>       (setq nrlibdirs (directory "*.NRLIB/index.KAF"))
>
>       #| directory in GCL (at least gcl-2.6.8) on Windows is buggy,
>       it can not handle pathnames having wildcards in the middle,
>       so we need a workaround.  |#
> ;      #+:GCL
> ;      (setq nrlibdirs
> ;           (mapcar #'(lambda (f)
> ;                          (concatenate 'string (namestring f)
> ;                                         "/index.KAF"))
> ;                   (directory "*.NRLIB")))
>
> Testing now.  Happy to commit when I'm enabled.
>
> Waldek Hebisch <devel@fricas.math.uni.wroc.pl> writes:
>
>> I have now removed part of old GCL-specific code.  This probably
>> means that FriCAS can not be build with GCL versions earlier
>> than GCL-2.6.13.  On plus side, after that one gets sensible
>> error messages and one can do build from Lisp files.  Algebra
>> bootstrap fails, I have tracked problem to missing or wrong
>> DATABASE property on |BasicType|.  This probably indicates
>> some deeper problem.
>>
>> Running testsuite on FriCAS build from Lisp files shows one
>> failure: apparently FriCAS on GCL can not catch numeric errors.
>>
>> Also, FriCAS now uses ANSI Lisp code instead of old GCL-specific
>> code, so this requires enough ANSI support in GCL.  I only tried
>> ANSI GCL, I do not know if "traditional" GCL would work.
>>
>> BTW: The following gets around problem with loading to large
>> heap.  I am not sure if this is right solution:
>>
>> --- trunk/src/lisp/Makefile.in  2022-07-16 14:43:58.443666098 +0200
>> +++ dist/src/lisp/Makefile.in   2023-02-11 15:36:50.248556407 +0100
>> @@ -68,7 +68,8 @@
>>                                         ' (compiler::emit-fn t))' \
>>                                    ' (when (fboundp (quote si::sgc-on))' \
>>                                          ' (si::sgc-on nil))' \
>> -                                  ' (setq compiler::*default-system-p* 
>> t))"' \
>> +                                  ' (setq compiler::*default-system-p* t)' \
>> +                     ' (setq compiler::*default-large-memory-model-p* t))"' 
>> \
>>                        ' si::*system-directory* (quote (list ".lsp")))' \
>>                 '  "$(lisp_c_objects) $(fricas_c_runtime_extra)")' \
>>              | $(FRICAS_LISP)
>>
>> -- 
>>                               Waldek Hebisch
>
> This will work, but might be slower than needed.  Will look at this too.
>
> Take care,
> -- 
> Camm Maguire                                      camm@maguirefamily.org
> ==========================================================================
> "The earth is but one country, and mankind its citizens."  --  Baha'u'llah

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