(let list '(this is a test case) (all is-a-foo (map make-a-foo list)))
(sym "make-a-foo")
Assuming you mean in the same file with the example foo package:
(<arc>let <arc>list (<axiom>quote (<arc>this <arc>is <foo>a <foo>test <arc>case)) (<arc>all <foo>is-a-foo (<arc>map <foo>make-a-foo <arc>list)))
No, it evaluates to the unpackaged symbol 'make-a-foo.
-----