fix for non-futures build

svn: r18680
This commit is contained in:
Matthew Flatt 2010-03-30 21:48:13 +00:00
parent 164e998cbd
commit f7afbfa207

View File

@ -123,6 +123,7 @@ define_ts_siS_v(wrong_argument_count, FSRC_MARKS)
# define ts_scheme_checked_set_mcar scheme_checked_set_mcar
# define ts_scheme_checked_set_mcdr scheme_checked_set_mcdr
# define ts_scheme_unbox scheme_unbox
# define ts_scheme_set_box scheme_set_box
# define ts_scheme_vector_length scheme_vector_length
# define ts_scheme_flvector_length scheme_flvector_length
# define ts_scheme_struct_ref scheme_struct_ref