pantry/projects/practical-scheme.net/gauche/test.scm