Function: GO tag Transfer control to the named TAG in the lexically enclosing TAGBODY. This is constrained to be used only within the dynamic extent of the TAGBODY.
Example:
(defunadd-test (l test)
"Put in a test for loop termination."
(push
`(if ,test
(go end))
(loop-body l)))
