+ (depth int))
+
+(defmethod allocate-foreign ((pximap pixmap) &key width height depth window)
+ (%pixmap-new window width height depth))
+
+(defun pixmap-new (width height depth &key window)
+ (warn "PIXMAP-NEW is deprecated, use (make-instance 'pixmap ...) instead")
+ (make-instance 'pixmap :width width :height height :depth depth :window window))
+