Lines Matching refs:identifier
154 $identifier = '[A-Za-z_][A-Za-z_0-9]*';
162 $value = "$identifier|$identifier\\s*[+\-]\\s*$decnum|".
163 "$identifier\\s*[+-]\s*$hexnum|$constant";
235 # an identifier or constant, $word is the word offset relative to
249 if ($value =~ /^REL\s*\(\s*($identifier)\s*\)\s*(.*)/i) {
254 } elsif ($value =~ /^($identifier)\s*(.*)/) {
401 if (/^\s*($identifier)\s*:(.*)/) {
412 # Handle symbol definitions of the form ABSOLUTE or RELATIVE identifier =
418 if ($rest =~ /^($identifier)\s*=\s*($constant)\s*$/) {
434 expected <identifier> = <value>
441 if ($external =~ /\s*($identifier)\s*$/) {
453 expected <identifier>, got $external
457 # Process ENTRY identifier declarations
459 if ($1 =~ /^($identifier)\s*$/) {
464 expected ENTRY <identifier>
633 if ($rest =~ /^(ATN|)\s*($value)\s*,\s*($identifier)\s*$/i) {
643 } elsif ($rest =~ /^(ATN|)\s*FROM\s+($value)\s*,\s*($identifier)\s*$/i) {
669 } elsif ($rest =~ /^(RESELECT|SELECT)\s+($identifier)\s*$/i) {
721 if ($rest =~ /^(REL\s*\(\s*$identifier\s*\))\s*(.*)/i) {
908 if ($code[$i + 1] =~ /\s*($identifier)(.*)$/) {
916 if ($code[$i + 2] =~ /$identifier/) {