repo.or.cz
/
maxima.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
Use %%PRETTY-FNAME in more quadpack error messages
[maxima.git]
/
share
/
draw
/
draw.lisp
blob
9f59f3dc4b583da7e3235f436f055d94b4f691f6
1
(
in-package
#:
maxima
)
2
3
(
$put
'
$draw
2
'
$version
)
4
5
#+(
or
ecl abcl
) (
$load
"lisp-utils/defsystem.lisp"
)
6
7
(
load
(
merge-pathnames
(
make-pathname
:
name
"draw"
:
type
"system"
) (
maxima-load-pathname-directory
)))
8
9
(
mk
:
oos
"draw"
:
compile
)