Update test_put.scm