CLIM mail archive



    Date: Mon, 1 Jun 1992 10:01 PDT

    CLIM 1.0, MCL 2.0 (both beta):
    ? (clim:make-rectangle (clim:make-point 1 1) (clim:make-point 2 2))
    > Error: :POINTS is an invalid initarg to INITIALIZE-INSTANCE for
    >        Valid initargs: #(:MAX-Y :MAX-X :MIN-Y :MIN-X).
    > While executing: CCL::CHECK-INITARGS
    > Type Command-. to abort.
    See the RestartsI menu item for further choices.
    1 > 
    Is this another bug?  Is there a patch somewhere?

Yup, it is a bug.  Try compiling the following:

;;; -*- Mode: LISP; Syntax: Common-lisp; Package: CLIM-UTILS; Base: 10; Lowercase: Yes -*-

(in-package "CLIM-UTILS")

(defclass standard-rectangle (rectangle)
    ((min-x :initarg :min-x :reader rectangle-min-x :type real)
     (min-y :initarg :min-y :reader rectangle-min-y :type real)
     (max-x :initarg :max-x :reader rectangle-max-x :type real)
     (max-y :initarg :max-y :reader rectangle-max-y :type real)
     (points :initarg :points :type simple-vector :reader polygon-points)))


Main Index | Thread Index