to foo { p "Foo" } foo p "OK" exit 0 .