1i\
(declare (block)\
\         (standard-bindings)\
\         (extended-bindings)\
\         (not safe)\
\         (not interrupts-enabled))
\+;;; begin Stalin+,\+;;; end Stalin+d
\+;;; begin Scheme->C+,\+;;; end Scheme->C+d
\+;;; begin Gambit-C+,\+;;; end Gambit-C+d
\+;;; begin Bigloo+,\+;;; end Bigloo+d
\+;;; begin Chez+,\+;;; end Chez+d
\+;;; begin Chicken+d
\+;;; end Chicken+d
