sub_rule :   /[0-7]/
badrule : /reg1/i '=' sub_rule ',' /reg2/i '=' sub_rule ';'
   {
      $main::machineword = $item[3] << 3 | $item[7];
      1
   }
goodrule : /reg1/i '=' sub_rule ',' /reg2/i '=' sub_rule ';'
   {
      $main::machineword = $item[3] * 8 | $item[7];
      1
   }