Lines Matching refs:lcid
83 my($lcid) = @_;
84 return $lcid & $LANGUAGE_MASK_PRIMARY;
89 my($lcid) = @_;
90 return $lcid >> 10;
192 my( $lcid, @parts, $grepdef, $options, $single);
204 $lcid = oct( $ARGV[0]); }
206 $lcid = $ARGV[$options]; }
210 $lcid = 0;
212 $parts[0] = getPrimaryLanguage( $lcid);
213 $parts[1] = getSubLanguage( $lcid);
224 $lcid = makeLangID( $parts[1], $parts[0]);
244 printf( "LangID: 0x%04X (dec %d), primary: 0x%03x, sub 0x%02x\n", $lcid,
245 $lcid, $parts[0], $parts[1]);
246 my $buf = sprintf( "0x%04X", $lcid);