Searched refs:retstr (Results 1 – 3 of 3) sorted by relevance
| /mirbsd/src/gnu/usr.bin/perl/os2/ |
| D | perlrexx.c | 30 ULONG PERLEXPORTALL(PCSZ name, LONG rargc, const RXSTRING *rargv, PCSZ queuename, PRXSTRING retstr);
31 ULONG PERLDROPALL(PCSZ name, LONG rargc, const RXSTRING *rargv, PCSZ queuename, PRXSTRING retstr);
32 …NG PERLDROPALLEXIT(PCSZ name, LONG rargc, const RXSTRING *rargv, PCSZ queuename, PRXSTRING retstr);
111 PCSZ queuename, PRXSTRING retstr) in PERL() argument
143 sprintf(retstr->strptr, "%s", "ok"); in PERL()
144 retstr->strlength = strlen (retstr->strptr); in PERL()
151 PCSZ queuename, PRXSTRING retstr) in PERLEXIT() argument
160 PCSZ queuename, PRXSTRING retstr) in PERLTERM() argument
170 sprintf(retstr->strptr, "%s", "ok"); in PERLTERM()
171 retstr->strlength = strlen (retstr->strptr); in PERLTERM()
[all …]
|
| /mirbsd/src/gnu/usr.bin/perl/os2/OS2/REXX/ |
| D | REXX.xs | 241 PRXSTRING retstr ) /* return code */ in SubCommandPerlEval() argument
270 || !DosAllocMem((PPVOID)&retstr->strptr, len, in SubCommandPerlEval()
272 memcpy(retstr->strptr, str, len); in SubCommandPerlEval()
273 retstr->strlength = len; in SubCommandPerlEval()
276 strcpy(retstr->strptr, "Not enough memory for the return string of Perl-in-REXX"); in SubCommandPerlEval()
277 retstr->strlength = strlen(retstr->strptr); in SubCommandPerlEval()
|
| /mirbsd/src/lib/libedit/ |
| D | readline.c | 1634 char **match_list = NULL, *retstr, *prevstr; in completion_matches() local
1643 while ((retstr = (*genfunc) (text, (int)matches)) != NULL) { in completion_matches()
1658 match_list[++matches] = retstr; in completion_matches()
1675 retstr = malloc(max_equal + 1); in completion_matches()
1676 if (retstr == NULL) { in completion_matches()
1680 (void)strncpy(retstr, match_list[1], max_equal); in completion_matches()
1681 retstr[max_equal] = '\0'; in completion_matches()
1682 match_list[0] = retstr; in completion_matches()
|