anchor.diff:  	  ]+
   	;
   
  -pokestmt { int exp1,exp2 ; }
  +pokestmt { int exp1; int exp2 ; }
   	: POKESYM
   	  expression(&exp1)
   	  ','
  
positive.code: 	: variable(&var)	{ readelm(var); }
  	;
  
  lsetstmt { int var,exp; }
  	:	LSETSYM variable(&var) '=' expression(&exp)
  				{ notyetimpl(); }
  	;
  
negative.code: 		',' fieldlist		{ notyetimpl(); }
          ;
  
  fieldlist { int intv; int var; }
  	:	intvalue(&intv) ASSYM variable(&var)
  		[ ',' intvalue(&intv) ASSYM variable(&var) ]*
  	;
  