Kurt,
When I try what you wrote I get the following:
wspage@suse:~> fricas -nox
Checking for foreign routines
AXIOM="/usr/local/lib/fricas/target/x86_64-suse-linux"
spad-lib="/usr/local/lib/fricas/target/x86_64-suse-linux/lib/libspad.so"
foreign routines found
openServer result 0
FriCAS Computer Algebra System
Version: FriCAS 2014-12-18
Timestamp: Sun Oct 25 21:18:13 EDT 2015
-----------------------------------------------------------------------------
Issue )copyright to view copyright notices.
Issue )summary for a summary of useful system commands.
Issue )quit to leave FriCAS and return to shell.
-----------------------------------------------------------------------------
(1) -> )fin
* (load "~/quicklisp/setup")
While evaluating the form starting at line 129, column 0
of #P"~/quicklisp/setup.lisp":
debugger invoked on a SB-INT:EXTENSION-FAILURE in thread
#<THREAD "main thread" RUNNING {100450CC23}>:
Don't know how to REQUIRE SB-BSD-SOCKETS.
See also:
The SBCL Manual, Variable SB-EXT:*MODULE-PROVIDER-FUNCTIONS*
The SBCL Manual, Function REQUIRE
Type HELP for debugger help, or (SB-EXT:EXIT) to exit from SBCL.
restarts (invokable by number or by possibly-abbreviated name):
0: [TRY-RECOMPILING] Recompile impl and try loading it again
1: [RETRY ] Retry
loading FASL for #<CL-SOURCE-FILE "quicklisp" "impl">.
2: [ACCEPT ] Continue, treating
loading FASL for #<CL-SOURCE-FILE "quicklisp" "impl"> as
having been successful.
3: [RETRY ] Retry EVAL of current toplevel form.
4: [CONTINUE ] Ignore error and continue loading file
"/home/wspage/quicklisp/setup.lisp".
5: [ABORT ] Abort loading file "/home/wspage/quicklisp/setup.lisp".
6: Exit debugger, returning to top level.
(SB-IMPL::REQUIRE-ERROR "Don't know how to ~S ~A." REQUIRE SB-BSD-SOCKETS)
0]
---
I am not sure what is going on - maybe in the wrong default package?
The following recipe does work for me however:
wspage@suse:~> sbcl
This is SBCL 1.2.16, an implementation of ANSI Common Lisp.
More information about SBCL is available at <http://www.sbcl.org/>.
SBCL is free software, provided as is, with absolutely no warranty.
It is mostly in the public domain; some portions are provided under
BSD-style licenses. See the CREDITS and COPYING files in the
distribution for more information.
* (load "~/quicklisp/setup")
T
* (ql:quickload "gsll")
To load "gsll":
Load 1 ASDF system:
gsll
; Loading "gsll"
..............
("gsll")
* (load "load-fricas")
; file: /home/wspage/fricas-build/src/lisp/fricas-package.lisp
; in: DEFMACRO IN-PACKAGE
; (DEFMACRO FRICAS-LISP::IN-PACKAGE (PACKAGE &REST FRICAS-LISP::OPTIONS)
; `(IN-PACKAGE ,PACKAGE))
; --> SB-C::NAMED-DS-BIND SB-INT:BINDING*
; ==>
; (LET* ((#:G0
; (SB-C::CHECK-DS-LIST/&REST (CDR #:EXPR) 1 1
; '(# PACKAGE &REST FRICAS-LISP::OPTIONS)))
; (PACKAGE (POP #:G0))
; (FRICAS-LISP::OPTIONS #:G0))
; (BLOCK FRICAS-LISP::IN-PACKAGE `(IN-PACKAGE ,PACKAGE)))
;
; caught STYLE-WARNING:
; The variable OPTIONS is defined but never used.
;
; compilation unit finished
; caught 1 STYLE-WARNING condition
WARNING: Reference to deprecated function (SB-EXT:QUIT) from EXIT-WITH-STATUS
STYLE-WARNING: Undefined alien: "writeablep"
STYLE-WARNING: Undefined alien: "remove_directory"
STYLE-WARNING: Undefined alien: "open_server"
STYLE-WARNING: Undefined alien: "sock_get_int"
STYLE-WARNING: Undefined alien: "sock_send_int"
STYLE-WARNING: Undefined alien: "sock_get_float"
STYLE-WARNING: Undefined alien: "sock_send_float"
STYLE-WARNING: Undefined alien: "sock_send_string_len"
STYLE-WARNING: Undefined alien: "server_switch"
STYLE-WARNING: Undefined alien: "sock_send_signal"
STYLE-WARNING: Undefined alien: "sock_get_string_buf"
Re-reading compress.daase Re-reading interp.daase
FriCAS initialization: interpreter
FriCAS initialization: database
FriCAS initialization: constructors
FriCAS initialization: history
FriCAS Computer Algebra System
Version: FriCAS 2014-12-18
Timestamp: Sun Oct 25 21:18:13 EDT 2015
-----------------------------------------------------------------------------
Issue )copyright to view copyright notices.
Issue )summary for a summary of useful system commands.
Issue )quit to leave FriCAS and return to shell.
-----------------------------------------------------------------------------
Re-reading compress.daase Re-reading interp.daase
Re-reading operation.daase
Re-reading browse.daase
Re-reading category.daase
Initial getdatabase
preloading /algebra/FR.fasl..skipped.
...
Checking for foreign routines
AXIOM=NIL
spad-lib="/lib/libspad.so"
FriCAS Computer Algebra System
Version: FriCAS 2014-12-18
Timestamp: Sun Oct 25 21:18:13 EDT 2015
-----------------------------------------------------------------------------
Issue )copyright to view copyright notices.
Issue )summary for a summary of useful system commands.
Issue )quit to leave FriCAS and return to shell.
-----------------------------------------------------------------------------
T
* (in-package "BOOT")
#<PACKAGE "BOOT">
* (|spad|)
(1) -> )lisp (gsll:integration-qng (lambda (x) (exp (- (* x x)))) 0.0 1.0)
Value = 0.7468241328124271
---
I guess I can stick this stuff into '.sbclrc' and end up in FriCAS
that way, but would there be an easier and more portable way to
accomplish this if this should ever become a standard part of the
FriCAS distribution? Can the ql:quickload stuff be done during make
and become part of the FriCAS image?
Cheers,
Bill Page.
On 25 October 2015 at 18:25, Kurt Pagani <[email protected]> wrote:
> Hello Alasdair
>
>
> Have you tried the following?
> ---
>
> kfp@helix:~$ fricas -nox
> viewman not present, disabling graphics
> Checking for foreign routines
> AXIOM="/usr/local/lib/fricas/target/x86_64-unknown-linux"
> spad-lib="/usr/local/lib/fricas/target/x86_64-unknown-linux/lib/libspad.so"
> foreign routines found
> openServer result 0
> FriCAS Computer Algebra System
> Version: FriCAS 2014-12-18
> Timestamp: Son Okt 25 19:16:29 CET 2015
> -----------------------------------------------------------------------------
> Issue )copyright to view copyright notices.
> Issue )summary for a summary of useful system commands.
> Issue )quit to leave FriCAS and return to shell.
> -----------------------------------------------------------------------------
>
>
> (1) -> )fin
> * (load "~/quicklisp/setup")
>
> T
> * (ql:quickload "gsll")
> To load "gsll":
> Load 1 ASDF system:
> gsll
> ; Loading "gsll"
> .............
> ("gsll")
> * (gsll:integration-qng (lambda (x) (exp (- (* x x)))) 0.0 1.0)
>
> 0.7468241328124271
> 8.291413475940725e-15
> 21
> * (|spad|)
>
> (1) ->
> Value = 0.7468241328124271
> (1) -> )lisp (gsll:integration-qng (lambda (x) (exp (- (* x x)))) 0.0 1.0)
>
> Value = 0.7468241328124271
> (1) ->
>
> ---
>
> If the above works then next you want to write a SPAD function for
> "gsll:integration-qng". Why we get only one value returned is puzzling,
> but I'll have a look into the code.
>
> Best regards
> Kurt
>
>
--
You received this message because you are subscribed to the Google Groups
"FriCAS - computer algebra system" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to [email protected].
To post to this group, send email to [email protected].
Visit this group at http://groups.google.com/group/fricas-devel.
For more options, visit https://groups.google.com/d/optout.
