- ;; the CROSS-FLOAT-INFINITY-KLUDGE: When building a
- ;; compiler which runs under the SBCL runtime, which
- ;; supports floating point infinities, it's safe to
- ;; build with true PROPAGATE-FLOAT-TYPE and
- ;; PROPAGATE-FUN-TYPE features. (It wasn't safe
- ;; when building a cross-compiler to run under the
- ;; cross-compilation host Lisp).
- #+nil ; FIXME: suppressed since 0.6.11.3 has no fp infinities
- (sb-cold:*shebang-features*
- (substitute
- :propagate-float-type
- :will-propagate-float-type
- (substitute
- :propagate-fun-type
- :will-propagate-fun-type
- sb-cold:*shebang-features*)))