1, 0, 1, (SCM str, SCM rest),
"A Scheme callable function to register a warning to be expected"
" and subsequently suppressed. If the warning is not encountered,"
1, 0, 1, (SCM str, SCM rest),
"A Scheme callable function to register a warning to be expected"
" and subsequently suppressed. If the warning is not encountered,"