Mercurial > octave
comparison src/utils.cc @ 1104:3535aa4d38c6
[project @ 1995-02-14 22:12:34 by jwe]
author | jwe |
---|---|
date | Tue, 14 Feb 1995 22:20:16 +0000 |
parents | 75fc98220389 |
children | 22741d6ed818 |
comparison
equal
deleted
inserted
replaced
1103:a6f341c1b47c | 1104:3535aa4d38c6 |
---|---|
232 { | 232 { |
233 nelem++; | 233 nelem++; |
234 char *ptr = tmp_path; | 234 char *ptr = tmp_path; |
235 while (*ptr != '\0') | 235 while (*ptr != '\0') |
236 { | 236 { |
237 if (*ptr == ':') | 237 if (*ptr == SEPCHAR) |
238 nelem++; | 238 nelem++; |
239 ptr++; | 239 ptr++; |
240 } | 240 } |
241 } | 241 } |
242 | 242 |
250 | 250 |
251 int i = 0; | 251 int i = 0; |
252 char *ptr = tmp_path; | 252 char *ptr = tmp_path; |
253 while (i < nelem) | 253 while (i < nelem) |
254 { | 254 { |
255 char *end = strchr (ptr, ':'); | 255 char *end = strchr (ptr, SEPCHAR); |
256 if (end) | 256 if (end) |
257 *end = '\0'; | 257 *end = '\0'; |
258 char *result = tilde_expand (ptr); | 258 char *result = tilde_expand (ptr); |
259 path[i] = strsave (result); | 259 path[i] = strsave (result); |
260 free (result); | 260 free (result); |