I just tested the aldor-interface patch in conjunction with the speed patch I
posted a rather long time ago, with sbcl, ecl and gcl.

I did not encounter *any* problems.

However, I'd still like to give the user the choice to build a "safe" FriCAS.
Maybe somebody could help me out with the following:

In nlib.lisp, I do the following:

-------------------------------------------------------------------------------
#+:AKCL
(defun compile-lib-file (fn &rest opts)
  (unwind-protect
      (progn
        (trace (compiler::fast-link-proclaimed-type-p
                :exitcond nil
                :entrycond (spad-fixed-arg (car system::arglist))))
        (trace (compiler::t1defun :exitcond nil
                :entrycond (spad-fixed-arg (caar system::arglist))))
        (apply #'compile-file fn opts))
    (untrace compiler::fast-link-proclaimed-type-p compiler::t1defun)))
#-:AKCL
(define-function 'compile-lib-file #'(lambda (f)
                                       (locally (proclaim '(optimize (safety 0) 
(speed 3))))
                                       (compile-file f)))
-------------------------------------------------------------------------------

Now, I think it would make sense to have a configure option --with-speed, that
applies the optimization settings "(optimize (safety 0) (speed 3))", and
without, it leaves them untouched, i.e., we should then have just

(define-function 'compile-lib-file #'(lambda (f)
                                       (compile-file f)))

Could somebody send me a patch that accomplishes that?

By the way, I have no idea to which lisps AKCL applies, and what
compile-lib-file does, then.


I'd *really* like to have the speed patch done, it's been sitting around
already an awful long time.

Martin


--~--~---------~--~----~------------~-------~--~----~
You received this message because you are subscribed to the Google Groups 
"FriCAS - computer algebra system" group.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to [EMAIL PROTECTED]
For more options, visit this group at 
http://groups.google.com/group/fricas-devel?hl=en
-~----------~----~----~----~------~----~------~--~---

Reply via email to