replaced buitin_vector_test to Scheme