diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 2000-05-28 18:41:12 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 2000-05-28 18:41:12 +0000 |
| commit | bf4acbe410c9fcc2bff9bfa63411be8c6c46902a (patch) | |
| tree | 077f53c9756dde3500e84d80533c3a6a24300200 /util.h | |
| parent | 704ea872433dd6d5a1c650f509289fdea5c037ab (diff) | |
| download | perl-bf4acbe410c9fcc2bff9bfa63411be8c6c46902a.tar.gz | |
MacOS support, part 1 (from Matthias Neeracher
<neeri@iis.ee.ethz.ch>)
p4raw-id: //depot/perl@6143
Diffstat (limited to 'util.h')
| -rw-r--r-- | util.h | 6 |
1 files changed, 5 insertions, 1 deletions
@@ -26,7 +26,11 @@ (*(f) == '/' \ || ((f)[0] && (f)[1] == ':')) /* drive name */ # else /* !DOSISH */ -# define PERL_FILE_IS_ABSOLUTE(f) (*(f) == '/') +# ifdef MACOS_TRADITIONAL +# define PERL_FILE_IS_ABSOLUTE(f) (strchr(f, ':')) +# else /* !MACOS_TRADITIONAL */ +# define PERL_FILE_IS_ABSOLUTE(f) (*(f) == '/') +# endif /* MACOS_TRADITIONAL */ # endif /* DOSISH */ # endif /* WIN32 */ #endif /* VMS */ |