Hi,
I did a cleanup of the file defopt.lisp.
I removed all the unnecessary conditional (old) code and what remains
ist not very much.
--------------------------------------------- cut here --------------------
;;; -*- Mode: Lisp; Package: Maxima; Syntax: Common-Lisp; Base: 10 -*- ;;;;
;;; (c) Copyright 1980 Massachusetts Institute of Technology ;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(in-package :maxima)
(macsyma-module defopt macro)
;; For defining optimizers which run on various systems.
;; Q: What is an optimizer?
;; A: A transformation which takes place in the compiler.
;; ***==> Right now, DEFOPT is used just like you would a DEFMACRO <==***
;; (defopt <name> <arlist> <body-boo>)
(defmacro defopt (&rest other)
`(#-gcl define-compiler-macro #+gcl si::define-compiler-macro , at other))
--------------------------------------------- cut here --------------------
Unfortunately I have no gcl available so I don't know wether the
conditionalization for gcl is still needed.
If not we could just get rid of the whole file and directly replace 'defopt' in the
few places it is used with 'define-compiler-macro'.
Since I have again some free time at hand, I intend to do a few further
cleanups in the code (there are quite a few candidate files).
Where should I send the patches to?
How to get write access to the cvs archive?
I hope someone finds all this useful
'Andreas
--
Wherever I lay my .emacs, there's my $HOME.