Searched refs:dirend (Results 1 – 2 of 2) sorted by relevance
| /openbsd/src/gnu/usr.bin/perl/ext/VMS-Stdio/ |
| D | Stdio.xs | 133 char filespec[NAM$C_MAXRSS], *acmode, *s, *colon, *dirend = NULL; variable
146 else if (*s == ']' || *s == '>') dirend = s;
149 if (s == dirend + 3) {
154 if (dirend == NULL) *(colon+1) = '\0';
155 if (iotype != '-' && (ret = PerlIO_getpos(fp, &pos)) == -1 && dirend)
|
| /openbsd/src/gnu/usr.bin/perl/vms/ |
| D | vms.c | 7023 char *dirend, *cp1, *cp3, *tmp; local
7137 dirend = strrchr(spec,']');
7138 if (dirend == NULL) dirend = strrchr(spec,'>');
7139 if (dirend == NULL) dirend = strchr(spec,':');
7140 if (dirend == NULL) {
7250 for (; cp2 <= dirend; cp2++) {
8409 char *dirend; local
8521 dirend = strrchr(path,'/');
8523 if (dirend == NULL) {
8539 else if (*(dirend+1) == '.') { /* do we have trailing "/." or "/.." or "/..."? */
[all …]
|