From: Alfredo Beaumont Date: Thu, 25 Apr 2013 14:42:26 +0000 (+0200) Subject: Remove duplicated symbols in export argument list X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=09d96f5a783f2cbb00465606facf69b7656448d3;p=jscl.git Remove duplicated symbols in export argument list --- diff --git a/ecmalisp.lisp b/ecmalisp.lisp index 3b8f2ee..c94bbb6 100644 --- a/ecmalisp.lisp +++ b/ecmalisp.lisp @@ -2939,8 +2939,8 @@ (export '(&body &key &optional &rest * *gensym-counter* *package* + - / 1+ 1- < <= = = > >= and append apply aref arrayp assoc atom block - boundp boundp butlast caar cadddr caddr cadr car car case - catch cdar cdddr cddr cdr cdr char char-code char= + boundp butlast caar cadddr caddr cadr car case + catch cdar cdddr cddr cdr char char-code char= code-char cond cons consp constantly copy-list decf declaim defconstant define-setf-expander define-symbol-macro defmacro defparameter defun defvar @@ -2948,7 +2948,7 @@ dolist dotimes ecase eq eql equal error eval every export fdefinition find-package find-symbol first flet fourth fset funcall function functionp gensym get-setf-expansion - get-universal-time go identity if in-package incf integerp + get-universal-time go identity if in-package incf integerp intern keywordp labels lambda last length let let* list list* list-all-packages listp loop make-array make-package make-symbol mapcar member minusp mod