-- ==========================================================--
--
pgEmpty :: a -> Parser a

pgEmpty item env toks
   = POk env toks item
pgEmpty :: a -> Parser a
pgEmpty item env toks
   = POk env toks item
pgEmpty item env toks
   = POk env toks item