Raymond Toy (RT/EUS) wrote:
> Michel Talon wrote:
>> Second, with both maxima-5.14.0 and maxima-5.15.0, compiled with cmucl
>> on FreeBSD, plot2d doesn't work (it works when maxima is compiled with
>> gcl).
>
> I use cmucl all the time, so this shouldn't be too hard to find.
>
I have just checked that this problem doesn't occur on my Ubuntu laptop.
> Can you start maxima with the -g option. When you give the plot
> command, you should be dropped in the Lisp debugger. At that point,
> enter "back" to get a backtrace and send the backtrace to the list (or
> to me)..
>
Here it is:
niobe% maxima -g
Maxima 5.15.0 http://maxima.sourceforge.net
Using Lisp CMU Common Lisp Snapshot 2008-02 (19E)
Distributed under the GNU Public License. See the file COPYING.
Dedicated to the memory of William Schelter.
The function bug_report() provides bug reporting information.
(%i1) plot2d(sin(x),[x,0,5]);
Arithmetic error DIVISION-BY-ZERO signalled.
[Condition of type DIVISION-BY-ZERO]
Restarts:
0: [MACSYMA-QUIT] Maxima top-level
1: [ABORT ] Skip remaining initializations.
Debug (type H for help)
(X86:SIGFPE-HANDLER #<unused-arg> #<unused-arg> #.(SYSTEM:INT-SAP
#x47FD7130))
Source: Error finding source:
Error in function DEBUG::GET-FILE-TOP-LEVEL-FORM: Source file no longer
exists:
target:code/float-trap.lisp.
0] back
0: (X86:SIGFPE-HANDLER #<unused-arg>
#<unused-arg>
#.(SYSTEM:INT-SAP #x47FD7130))
1: ("Foreign function call land")
2: ("Foreign function call land")
3: ("Foreign function call land")
4: (LOG 0.0 NIL)
5: (KERNEL::LOG2 0.0 1.0)
6: (LOG 0.0 10.0)
7: (LISP::FLONUM-TO-DIGITS 0.0 NIL NIL)
8: (FORMAT::FORMAT-GENERAL-AUX #<String-Output Stream> 0.0 NIL NIL ...)
9: (FORMAT::G-FORMAT-DIRECTIVE-INTERPRETER #<String-Output Stream>
#<~g>
(":" #<~g> "]")
#<unused-arg>
...)
10: (FORMAT::INTERPRET-DIRECTIVE-LIST #<String-Output Stream>
(#<~g> ":" #<~g> "]")
(0.0 5.0)
(0.0 5.0))
11: (FORMAT::%FORMAT #<String-Output Stream> " [~g:~g]" (0.0 5.0) (0.0 5.0))
12: (FORMAT NIL " [~g:~g]" 0.0 5.0)
13: ($PLOT2D ((MLIST) (# $X)) ((MLIST) $X 0.0 5.0))
14: (MEVAL1 (($PLOT2D) (# $X) (# $X 0 5)))
15: (MEVAL (($PLOT2D) (# $X) (# $X 0 5)))
16: (MEVAL* (($PLOT2D) (# $X) (# $X 0 5)))
17: (CONTINUE
#<Two-Way Stream, Input = #<Synonym Stream to SYSTEM:*STDIN*>, Output =
#<Synonym Stream to SYSTEM:*STDOUT*>>
NIL)
18: (MACSYMA-TOP-LEVEL
#<Two-Way Stream, Input = #<Synonym Stream to SYSTEM:*STDIN*>, Output =
#<Synonym Stream to SYSTEM:*STDOUT*>>
NIL)
19: (RUN)
20: (RUN)
21: (RUN)
22: (EXTENSIONS::EVAL-SWITCH-DEMON
#<Command Line Switch "eval" -- ("(cl-user::run)")>)
23: (EXTENSIONS::INVOKE-SWITCH-DEMONS
(#<Command Line Switch "quiet">
#<Command Line Switch "core" --
("/usr/local/lib/maxima/5.15.0/binary-cmucl/maxima.core")>
#<Command Line Switch "eval" -- ("(cl-user::run)")>
#<Command Line Switch "-"> #<Command Line Switch "g">)
(("load" . #) ("eval" . #)))
24: ((LABELS LISP::%RESTART-LISP EXTENSIONS:SAVE-LISP))
25: ((LABELS LISP::RESTART-LISP EXTENSIONS:SAVE-LISP))
> That should contain enough info to debug the issue.
>
I hope so, but i had already done that and wondered wether the problems are
not hidden in the foreign function call.
> Thanks,
>
> Ray
--
Michel Talon