; configuration du syste`me Le←Lisp standard modulaire
(progn
  (load-stm #:system:name t t t t t)
  (add-feature (if (eq 0.0 0.0)
                 '31BITFLOATS
                 '64BITFLOATS))
  )