From: SourceForge.net <no...@so...> - 2006-12-26 22:42:40
|
Bugs item #1602849, was opened at 2006-11-25 15:09 Message generated for change (Comment added) made by robert_dodier You can respond by visiting: https://sourceforge.net/tracker/?func=detail&atid=104933&aid=1602849&group_id=4933 Please note that this message will contain a full copy of the comment thread, including the initial issue submission, for this request, not just the latest update. >Category: Lisp Core Group: None Status: Open Resolution: None Priority: 5 Private: No Submitted By: Barton Willis (willisbl) Assigned to: Nobody/Anonymous (nobody) Summary: apropos Initial Comment: The use documentation for 'apropos' says the input should be a string. That's not right: (%i20) apropos("rat"); (%o20) [rat] (%i21) apropos(rat); (%o21) [rat, ...,ratwtlvl] Alos, apropos should quote its argument: (%i22) apropos(float) (%o22) [false,nill,punt-nil,punt-nil-warnp] <-- not expected (%i23) apropos('float); (%o23)[float,...,dconv-$float] <-- expected Finally, when the input to apropos isn't a Maxima function or option variable, we get sillyness such as (%i28) apropos('larry); (%o28) [larry] <-- There isn't a function "larry" apropos(42); (%o35) [*,**, ... ] <-- might be useful, but... Barton ---------------------------------------------------------------------- >Comment By: Robert Dodier (robert_dodier) Date: 2006-12-26 15:42 Message: Logged In: YES user_id=501686 Originator: NO I'm not all that crazy about apropos -- I wouldn't mind if we just cut it -- but if we do keep it I think it should give some indication of the type of an object. E.g. function vs variable, Lisp vs Maxima, built-in vs user-defined, maybe other categorizations. ---------------------------------------------------------------------- Comment By: Barton Willis (willisbl) Date: 2006-11-25 23:53 Message: Logged In: YES user_id=895922 Originator: YES The first version gives lisp error for apropos(a+b). Let's try: (defmspec $apropos (s) (let ((acc nil)) (setq s (margs s)) (dolist (si s ($listify ($setify (cons '(mlist) acc)))) (setq si (if (op-equalp si 'mquote) (second si) si)) (if (symbolp si) (setq acc (append acc (apropos-list (amperchk si) :maxima))))))) ---------------------------------------------------------------------- Comment By: Barton Willis (willisbl) Date: 2006-11-25 19:40 Message: Logged In: YES user_id=895922 Originator: YES Proposed replacement: (defmspec $apropos (s) (let ((acc nil)) (setq s (margs s)) (dolist (si s ($listify ($setify (cons '(mlist) acc)))) (setq si (amperchk (if (op-equalp si 'mquote) (second si) si))) (if (symbolp si) (setq acc (append acc (apropos-list si :maxima))))))) ---------------------------------------------------------------------- You can respond by visiting: https://sourceforge.net/tracker/?func=detail&atid=104933&aid=1602849&group_id=4933 |