guile: add test