META ((export #t) (peephole (hole 2 "new sc_Pair(" car ", " cdr ")")))

META ((export #t))

META ((export #t) (peephole (id)))

META ((export #t) (type bool))

META ((export make-vector make-array))

META ((export #t))

META ((export #t) (type bool) (peephole (postfix " instanceof sc_Pair")))

META ((export #t) (peephole (id)))

META ((export #t) (type bool))

META ((export #t))

META ((export #t))

META ((export #t))

META ((export #t))

META ((export #t))

META ((export vector? array?) (type bool) (peephole (postfix " instanceof sc_Vector")))

META ((export #t) (peephole (prefix "'\\u1E9C' +")))

META ((export list->vector list->array))

META ((export #t))

META ((export vector->list array->list))

META ((export #t))

META ((export #t))

* This is the standard DeltaBlue benchmark. A long chain of equality * constraints is constructed with a stay constraint on one end. An * edit const

* This test constructs a two sets of variables related to each * other by a simple linear transformation (scale and offset). The * time is measured