fixed bug in gen-scm-test-fn macro