Newsgroups: comp.lang.clos Path: utzoo!utgpu!watserv1!watdragon!violet.waterloo.edu!dganglin From: dganglin@violet.waterloo.edu (Greg Anglin) Subject: May Day (Rev 4b): eql-specializer bug Message-ID: <1991Jun13.204003.9517@watdragon.waterloo.edu> Sender: news@watdragon.waterloo.edu (News Owner) Organization: University of Waterloo Distribution: na Date: Thu, 13 Jun 1991 20:40:03 GMT Lines: 66 Hi there -- Following is a dribble of a bug I encountered in May Day PCL (Rev 4b) in Franz Allegro Common Lisp. There is no such problem in either of: 1. Allegro Common Lisp 3.1 with the Victoria Day PCL distributed with ACL. 2. Macintosh Allegro Common Lisp 1.3.2 with May Day (Rev 2). I haven't tried MACL with May Day (Rev 4b), nor have I tried ACL with May Day (Rev 2). Greg Anglin Department of Statistics University of Waterloo dganglin@violet.waterloo.edu ------------------------------------------------------------------------- LISP-IMPLEMENTATION-TYPE: Allegro CL LISP-IMPLEMENTATION-VERSION: 3.1.15.4 [Silicon Graphics Iris 4D] (9/18/90) MACHINE-TYPE: Silicon Graphics Iris 4D MACHINE-VERSION: SOFTWARE-TYPE: IRIX System V SOFTWARE-VERSION: 3.1 SHORT-SITE-NAME: versicolor *features*: (:LOOP LOOP :PORTABLE-COMMONLOOPS :COMPOSER :FAKE-ACTIVE-REGIONS :PCL :CLOS :BIG-ENDIAN :GSGC :ALLEGRO-V3.1 :FRANZ-INC :EXCL :ALLEGRO :COMMON-LISP :CONFORMING-IEEE :IEEE :FLAVORS :MIPS :R2000 :UNIX :SGI :SGI4D :IRIS4D :MULTIPROCESSING :CLX :XLIB :CLX-MIT-R4 :CLX-CL-ERROR :CW-X) *modules*: ("LOOP" "COMPOSER" "GPROF" "GR" "PROF" "TTYPROF" "MENU" "CLOS" "PCL" "XVARS" "XCW" "XLIB" "CLX" "CLXEXCLDEP" "CSTRUCTS" "SIGIO" "ADVISE" "TRACE" "MDPROC" "PROCESS" "FOREIGN" "FOREIGN-FUNCTIONS" "QSTRUCTS") PATCH::*XCW-PATCHES*: (12 . "process interference caused text glitches on sgi") (11 . "bitblt fore/background colors") (10 . "'move' on the subwindow right button frame menu broke") (9 . "error when draw to a window while window manager is flushing it") (8 . "draw-polygon add closing line; draw-filled-polygon include last vertex") (7 . "don't ignore pre-initialize-cw open-font pixel-size arg") loop: $Header: loop.cl,v 1.2 89/07/22 18:56:13 layer Rel $ Allegro Composer: Composer Final 1.0.17.3 (6/25/90 20:00) disassmip: $Header: disassmip.cl,v 1.1 89/08/10 12:26:22 layer Rel $ X Common Windows: X-CW 1.3.final.15.1 (6/25/90 20:00) cstructs: $Header: cstructs.cl,v 1.18 89/08/22 11:42:07 layer Rel $ sigio: $Header: sigio.cl,v 1.3 89/08/24 14:03:01 layer Rel $ trace: $Header: trace.cl,v 1.35 89/07/22 18:56:24 layer Rel $ mdproc: $Header: mdproc.cl,v 1.20 89/07/22 18:56:29 layer Rel $ process: $Header: process.cl,v 1.44 89/08/17 18:45:20 layer Rel $ foreign: $Header: foreign.cl,v 1.49 89/08/28 14:45:00 layer Rel $ NIL (in-package :pcl) # *pcl-system-date* "5/1/90 May Day PCL (REV 4b)" (defmethod foo ((x1 symbol) x2) (list x1 x2)) # (defmethod foo ((x1 (eql :bar)) x2) (list x2)) Error: No matching method for the generic-function #, when called with arguments (# #). Restart actions (select using :continue): 0: Retry call to # [1c]