removed a bogus case in the definition of np-atomic-shape predicate

This commit is contained in:
Robby Findler 2010-06-18 16:19:54 -05:00
parent 132867518c
commit 0c0009465e

View File

@ -429,9 +429,7 @@ has been moved out).
(text? shape)
(and (flip? shape)
(boolean? (flip-flipped? shape))
(bitmap? (flip-shape shape)))
(point? shape))) ;; does this belong here?
(bitmap? (flip-shape shape)))))
;; normalize-shape : shape (atomic-shape -> atomic-shape) -> normalized-shape
;; normalizes 'shape', calling 'f' on each atomic shape in the normalized shape.