Variables And Helper Functions

A couple of variables and obvious helper functions to be used in the rest of the parser.

<Parser variables>=

MARK_ZU  = Marks.toint.zu
CAT_VINF = Category.toint.vinf

<Parser helper functions>=

fun {GetYield      R} R.yield      end 
fun {GetCats       R} R.cats       end 
fun {GetAgrs       R} R.agrs       end 
fun {GetCompsLo    R} R.comps_lo   end 
fun {GetCompsHi    R} R.comps_hi   end 
fun {GetVpref      R} R.vpref      end 
fun {GetMarks      R} R.marks      end 
fun {GetAux        R} R.aux        end 
fun {GetEntryIndex R} R.entryindex end