Changeset 4338

Timestamp:

10/12/03 19:49:28 (19 years ago)

Author:

piso

Message:

DEFGENERIC and DEFMETHOD are now implemented in defclass.lisp.

Location:

trunk/j/src/org/armedbear/lisp

Files:

• autoloads.lisp (modified) (2 diffs)
• fixme.lisp (modified) (2 diffs)

trunk/j/src/org/armedbear/lisp/autoloads.lisp

@@ -2 +2 @@
 ;;;
 ;;; Copyright (C) 2003 Peter Graves
-;;; $Id: autoloads.lisp,v 1.46 2003-10-09 16:42:19 piso Exp $
+;;; $Id: autoloads.lisp,v 1.47 2003-10-12 19:49:28 piso Exp $
 ;;;
 ;;; This program is free software; you can redistribute it and/or
@@ -103 +103 @@
 (autoload-macro 'check-type)
 (autoload-macro 'deftype)
-(autoload-macro 'defclass)
+(autoload-macro '(defclass defgeneric defmethod) "defclass.lisp")
 (autoload-macro 'with-standard-io-syntax)
 (autoload-macro 'psetf)

trunk/j/src/org/armedbear/lisp/fixme.lisp

@@ -2 +2 @@
 ;;;
 ;;; Copyright (C) 2003 Peter Graves
-;;; $Id: fixme.lisp,v 1.7 2003-09-28 18:35:17 piso Exp $
+;;; $Id: fixme.lisp,v 1.8 2003-10-12 19:48:48 piso Exp $
 ;;;
 ;;; This program is free software; you can redistribute it and/or
@@ -60 +60 @@
 (defun copy-readtable (&rest ignored)
   nil)
-
-(defmacro defgeneric (function-name lambda-list &rest options)
-  `(prog1
-    (sys::%defun ',function-name ',lambda-list nil)))
-
-(defmacro defmethod (&rest args)
-  nil)