#Endif;

!  To protect against a bug in early versions of the "Zip" interpreter:

[ Tokenise__ b p; b->(2 + b->1) = 0; @tokenise b p; ];