Searched refs:pib (Results 1 – 5 of 5) sorted by relevance
| /mirbsd/src/gnu/usr.bin/perl/os2/OS2/REXX/t/ |
| D | rx_tieydb.t | 21 tie @pib, OS2::REXX, "IB.P"; # bind array to REXX stem variable
28 defined $pib[6] ? print "ok 6\n" : print "not ok 6\n# pib\n";
31 print "# Process status is ", unpack("I", $pib[6]),
|
| /mirbsd/src/gnu/usr.bin/perl/os2/ |
| D | os2.c | 661 PIB *pib; in my_type() local
664 if (CheckOSError(DosGetInfoBlocks(&tib, &pib))) in my_type()
667 return (pib->pib_ultype); in my_type()
675 PIB *pib; in my_type_set() local
679 if (CheckOSError(DosGetInfoBlocks(&tib, &pib))) in my_type_set()
681 pib->pib_ultype = type; in my_type_set()
2441 PPIB pib; in Perl_Register_MQ() local
2445 DosGetInfoBlocks(&tib, &pib); in Perl_Register_MQ()
2447 Perl_os2_initial_mode = pib->pib_ultype; in Perl_Register_MQ()
2449 if (pib->pib_ultype != 3) /* 2 is VIO */ in Perl_Register_MQ()
[all …]
|
| /mirbsd/src/gnu/usr.bin/lynx/src/ |
| D | UCAuto.c | 706 PIB *pib; in _Switch_Display_Charset() local
718 && (DosGetInfoBlocks(&tib, &pib) || pib->pib_ultype != 0)) { in _Switch_Display_Charset()
|
| D | LYUtils.c | 7439 static PPIB pib; variable
7449 DosGetInfoBlocks(&tib, &pib); in morph_PM()
7450 proc_type = pib->pib_ultype; in morph_PM()
7453 if (pib->pib_ultype != 3) /* 2 is VIO */ in morph_PM()
7454 pib->pib_ultype = 3; /* 3 is PM */ in morph_PM()
7465 pib->pib_ultype = proc_type; in unmorph_PM()
|
| /mirbsd/src/gnu/usr.bin/perl/os2/OS2/Process/ |
| D | Process.xs | 221 PIB *pib; in my_type() local
224 if (CheckOSError(DosGetInfoBlocks(&tib, &pib))) in my_type()
227 return (pib->pib_ultype <= 4 ? (char*)ptypes[pib->pib_ultype] : "UNKNOWN"); in my_type()
|