Changeset 4338 for trunk/j/src/org/armedbear/lisp/fixme.lisp
- Timestamp:
- 10/12/03 19:49:28 (20 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/j/src/org/armedbear/lisp/fixme.lisp
r4108 r4338 2 2 ;;; 3 3 ;;; Copyright (C) 2003 Peter Graves 4 ;;; $Id: fixme.lisp,v 1. 7 2003-09-28 18:35:17piso Exp $4 ;;; $Id: fixme.lisp,v 1.8 2003-10-12 19:48:48 piso Exp $ 5 5 ;;; 6 6 ;;; This program is free software; you can redistribute it and/or … … 60 60 (defun copy-readtable (&rest ignored) 61 61 nil) 62 63 (defmacro defgeneric (function-name lambda-list &rest options)64 `(prog165 (sys::%defun ',function-name ',lambda-list nil)))66 67 (defmacro defmethod (&rest args)68 nil)
Note: See TracChangeset
for help on using the changeset viewer.