- Apr 20, 2003
-
-
gerd authored
-
- Apr 19, 2003
-
-
gerd authored
-
gerd authored
by Paul Dietz' ANSI tests. * src/code/defmacro.lisp (parse-defmacro-lambda-list): Add &parse-body, replacing &body (<body> <decls> <doc>). Add destructuring support to &rest, &body, &whole. * src/code/eval.lisp (lambda-list-keywords): Add &parse-body. * src/code/exports.lisp ("EXTENSIONS"): Export &parse-body. * src/hemlock/table.lisp (do-words, with-folded-string): * src/hemlock/macros.lisp (with-pop-up-display): * src/compiler/macros.lisp (deftransform): * src/compiler/ir1tran.lisp (symbol-macrolet, let, locally) (let*, flet, labels) <ir1-translator>: * src/code/package.lisp (do-symbols, do-external-symbols) (do-all-symbols): * src/code/macros.lisp (defun, prog, prog*, with-open-file) (with-open-stream, with-input-from-string) (with-output-to-string, do, do*): * src/code/mach.lisp (gr-bind): * src/code/extensions.lisp (do-anonymous, do-hash, defun-cached): Use &parse-body instead of &body.
-
toy authored
-
gerd authored
test cases. * src/compiler/locall.lisp (convert-more-call): Handle the case of a null arglist.
-
- Apr 18, 2003
-
-
gerd authored
used to return different results than SET-EXCLUSIVE-OR, and its algorithm doesn't appear to be easily fixable. Wait for someone who cares enough to fix the algorithm. * src/code/list.lisp (nset-exclusive-or): Implement in terms of SET-EXCLUSIVE-OR.
-
gerd authored
ANSI. Detected by Paul Dietz' ANSI test suite. * src/tools/worldcom.lisp: Set conditions::*make-condition-accessor-methods* to nil. * src/tools/pclcom.lisp: Convert condition accessor gfs back to normal functions. * src/code/error.lisp (*make-condition-accessor-methods*) (*early-condition-accessors*): New variables. (make-early-condition-accessors-generic) (make-condition-accessor): New functions. (%define-condition): Use make-condition-accessor. (define-condition): Define methods if *make-condition-accessor-methods*. * src/pcl/fixup.lisp (toplevel): Call conditions::make-early-condition-accessors-generic.
-
gerd authored
classes. * src/pcl/std-class.lisp (make-preliminary-layout): Map over subclasses, updating preliminary cpl info. * src/pcl/rt/defclass.lisp (defclass-types.6): New test.
-
gerd authored
* src/pcl/macros.lisp (class-predicate, slot-accessor) <function names>: Return block names. * src/pcl/ctor.lisp (ctor) <function name>: Return a block name.
-
- Apr 17, 2003
-
-
toy authored
-
gerd authored
-
gerd authored
test cases. * src/code/error.lisp (munge-restart-case-expression) Add environment parameter. (restart-case): Add &environment and pass it to munge-restart-case-expression.
-
gerd authored
* src/code/error.lisp (%find-restarts): New function. (munge-restart-case-expression): Use it instead of find-restart which returns only one restart object for restarts with equal names.
-
emarsden authored
- improved the example to load the CLM subsystem and to set up packages correctly - added pdfinfo LaTeX commands
-
- Apr 16, 2003
-
-
gerd authored
Dietz' test suite. From SBCL. * src/code/error.lisp (define-nil-returning-restart): Invoke the restart returned from find-restart.
-
gerd authored
* src/code/symbol.lisp (get-properties, getf): Signal type-error instead of program-error.
-
toy authored
ansi-tests.
-
gerd authored
The type system is now as fast as it were before. * src/code/type.lisp: Collect type-class and structure definitions at the beginning of the file to avoid compiler notes and get slot accessor inlining. (with-types-array, *ctype-arrays*): Removed. (simplify-unions): Rewritten simplify-union-types. (simplify-intersections): Rewritten simplify-intersection-types. (%type-union2): Removed, inlined in type-union2. (%type-intersection2): Removed, inlined in type-intersection2.
-
- Apr 15, 2003
-
-
gerd authored
* src/code/type.lisp (*ctype-arrays*): New variable. (with-types-array): New macro. (simplify-union-types, simplify-intersection-types): Use it, return lists. (%type-union, %type-intersection): Handle lists instead of vectors returned by the simplification functionts.
-
emarsden authored
via SBCL.
-
gerd authored
-
- Apr 14, 2003
-
-
gerd authored
for accessors. * src-head/pcl/rt/defmethod.lisp (defmethod-metacircle.0): New test. * src-head/pcl/rt/defgeneric.lisp (method-class.0): Call the method with the non-standard method class. * src-head/pcl/rt/pkg.lisp ("PCL-TEST"): Don't shadowing-import from PCL.
-
toy authored
posted to cmucl-imp by Fredrik Kuivinen and the implementation in SBCL. A catch tag is wrapped around the function to which the debugger can throw to to return a new value. This is enabled only if debug is more important than both speed and space.
-
toy authored
operation and operands that signalled the floating-point exception so we can report it.
-
- Apr 13, 2003
-
-
gerd authored
Declaim inline.
-
emarsden authored
-
gerd authored
Push wrappers on *cmv-stack* instead of classes. * src/pcl/rt/defgeneric.lisp (method-class.0): New test. * src/pcl/gf-call-optimization.lisp (compute-calls): Simplify. * src/pcl/cache.lisp (probe-cache): Remove version in #+nil.
-
gerd authored
* src-types/code/error.lisp (condition-reader-function): Loop over actual initargs first because these determine how slots are initialized. (compute-effective-slots): Don't duplicate slots of the class whose effective slots are computed.
-
gerd authored
ALL-EXPORTED-CL-CLASS-NAMES-ARE-VALID. * src-types/code/unix.lisp (%directory): Struct renamed from directory, give it a :conc-name and :constructor for compatibility. * src-types/code/unix-glibc2.lisp: Likewise.
-
gerd authored
C::SEQUENCE-COUNT /= KERNEL::SEQUENCE-COUNT, it was an unknown type. Please read boot4.lisp. * src/code/exports.lisp ("KERNEL"): Export sequence-count. * src-types/bootfiles/18e/boot4.lisp: New file. Make compute-effective-slot-definition AMOP compliant. Patch from Kevin Rosenberg. * src/pcl/std-class.lisp (compute-slots): Pass slot name to compute-effective-slot-definition. (compute-slots): Likewise. (compute-effective-slot-definition): Add parameter slot-name. * src/pcl/generic-functions.lisp (compute-effective-slot-definition): Add second parameter slot-name. Allow non-keyword keyword names in lambda lists. This fixes test cases STRUCTURE-BOA-TEST-15/[1-8], and FLET.30. * src/compiler/node.lisp (arg-info): Accept non-keyword keyword names. * src/code/type.lisp (key-info): Likewise. Fix type system bugs detected by Paul Dietz' test suite This is to a large extent a port from SBCL. * src/code/type.lisp: Mostly rewritten with code ported from SBCL. * src/compiler/typetran.lisp (ir1-transform-type-predicate): Return nil if type is *empty-type*. (source-transform-negation-typep) (source-transform-intersection-typep): New functions. (source-transform-array-typep): Handle unknown array element types. (typep): Add handling of negation and intersection types. * src/compiler/srctran.lisp (make-canonical-union-type): Simplify, now that #'type-union is smarter. (ir1-transform-<-helper): Give up on non-numeric, non-member types. * src/compiler/checkgen.lisp (type-test-cost): Add a case for intersection-type. (values-types-asserted): Don't use coerce-to-values, see the comment there. * src/compiler/array-tran.lisp (array-dimension): Accept :maybe as array-type-complexp. * src/code/pred.lisp (%%typep): Add handling of negation-types and intersection-types. Change cases of hairy-types, union-types, and arrays with unknown element type. * src/code/exports.lisp ("KERNEL"): Export negation-type, negation-type-type, intersection-type, intersection-type-types. * src/code/class.lisp (sealed-class-intersection): Return one value. (class :simple-intersection): Return one value, return nil in the default case. (class :complex-subtypep-arg2): New type method.
-
- Apr 11, 2003
-
-
emarsden authored
that it's a valid subtype of character (then ignore it).
-
emarsden authored
The LAMBDA-ENVIRONMENT of a node is sometimes nil.
-
emarsden authored
- the :new-compiler and :hash-new features were announced as being deprecated in 18e; remove them and make code that depended on them enabled unconditionally. - if CMUCL is built with the :no-docstrings feature, docstrings are discarded while building. This is intended for embedded-type images.
-
pmai authored
-
emarsden authored
lexical environment to take into account generalized function names, and in particular inline declarations for FLET or LABELS functions. New function called FUNCTION-NAME-EQV-P that knows that a name like (FLET INNER OUTER) is equivalent to a name like INNER. * Include any context information in undefined-function warnings. Forms like (defun bogus (x) (declare (ftype (function (t) *) no-ftype)) (flet ((foo (x) (random (1+ x)))) (declare (inline almost-foo)) (foo (+ x 1)))) will now generate warnings of the form Warning: Undefined function almost-foo in an inline or notinline declaration Warning: Undefined function no-ftype in a function type declaration
-
emarsden authored
Noted by Thomas Huehn.
-
pmai authored
Aleksandr Skobelev.
-
pmai authored
-
- Apr 08, 2003
-
-
gerd authored
(process-ignore-declaration): Find local functions differently.
-
- Apr 07, 2003
-
-
gerd authored
(update-slots): Slightly rewritten; don't use the old wrapper if the class isn't finalized. * pcl/rt/defclass.lisp (defclass-forward-referenced-class.1): New test.
-