Searched refs:is_ebcdic (Results 1 – 12 of 12) sorted by relevance
12 my $is_ebcdic = ($Config{ebcdic} || "undef") eq "define" ? 1 : 0;19 my $out = $out[$is_ebcdic];
259 $is_ebcdic = defined $opt_E && $opt_E;270 if ($is_ebcdic) {909 if ($is_ebcdic) {
262 bool is_ebcdic; member
1260 tctx.is_ebcdic = (cc == 0x15); in cmd_IN()
34 my $is_ebcdic = ord("A") == 193;2596 $ascii_case_change_delta = ($is_ebcdic) ? +64 : -32;2603 $ascii_case_change_delta = ($is_ebcdic) ? -64 : +32;
31 my $is_ebcdic = ord("A") == 193;2594 $ascii_case_change_delta = ($is_ebcdic) ? +64 : -32;2601 $ascii_case_change_delta = ($is_ebcdic) ? -64 : +32;
1033 $is_ebcdic = "A" eq chr(193);1035 $is_ebcdic = ord("A") == 193;1062 $is_ebcdic = $Config{'ebcdic'} eq 'define';