Change the definition of the functions in scm_ptobfuns so that