Lines Matching refs:rest
416 $rest = $2;
417 foreach $rest (split (/\s*,\s*/, $rest)) {
418 if ($rest =~ /^($identifier)\s*=\s*($constant)\s*$/) {
469 $rest = $1;
470 if ($rest =~ /^FROM\s+($value)\s*,\s*(WITH|WHEN)\s+($phase)\s*$/i) {
479 } elsif ($rest =~ /^($value)\s*,\s*(PTR\s+|)($value)\s*,\s*(WITH|WHEN)\s+($phase)\s*$/i) {
491 } elsif ($rest =~ /^MEMORY\s+(.*)/i) {
492 $rest = $1;
494 if ($rest =~ /^($value)\s*,\s*($value)\s*,\s*($value)\s*$/) {
517 $rest = $3;
565 if ($rest =~ /^($register)\s*(.*)$/i) {
567 $rest = $2;
571 expected <register>, got $rest
575 if ($rest =~ /^WITH\s+CARRY\s*(.*)/i) {
576 $rest = $1;
587 if ($rest !~ /^\s*$/) {
590 Expected end of line, got $rest
632 $rest = $2;
633 if ($rest =~ /^(ATN|)\s*($value)\s*,\s*($identifier)\s*$/i) {
643 } elsif ($rest =~ /^(ATN|)\s*FROM\s+($value)\s*,\s*($identifier)\s*$/i) {
663 $rest = $1;
664 print STDERR "Parsing WAIT $rest\n" if ($debug);
665 if ($rest =~ /^DISCONNECT\s*$/i) {
669 } elsif ($rest =~ /^(RESELECT|SELECT)\s+($identifier)\s*$/i) {
710 $rest = $2;
718 print STDERR "parsing JUMP, rest = $rest\n" if ($debug);
721 if ($rest =~ /^(REL\s*\(\s*$identifier\s*\))\s*(.*)/i) {
723 $rest = $2;
724 print STDERR "parsing JUMP REL, addr = $addr, rest = $rest\n" if ($debug);
728 } elsif ($rest =~ /^($value)\s*(.*)/) {
730 $rest = $2;
739 if ($rest =~ /^,\s*(.*)/) {
741 } elsif ($rest =~ /^\s*$/) {