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

original commit: 0c0009465ec61cfa09126614b3282ae69dc2b1dd
This commit is contained in:
Robby Findler 2010-06-18 16:19:54 -05:00
parent 7614ac4819
commit 883413b6b2

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.