X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=util.h;h=ff11b78af8f0ab86c69929ed97ea2aee07790b36;hb=e573f90328e9db84c5405db01c52908bfac9286d;hp=1a1c9ff190209cc2ba48e6e21e9a47357a44e410;hpb=546cd220972dafe91724980b525f77bf080c60b2;p=p5sagit%2Fp5-mst-13.2.git diff --git a/util.h b/util.h index 1a1c9ff..ff11b78 100644 --- a/util.h +++ b/util.h @@ -27,11 +27,11 @@ || ((f)[0] == '\\' && (f)[1] == '\\') /* UNC path */ \ || ((f)[3] == ':')) /* volume name, currently only sys */ # else /* !NETWARE */ -# if defined( DOSISH) || defined(EPOC) +# if defined(DOSISH) || defined(EPOC) || defined(__SYMBIAN32__) # define PERL_FILE_IS_ABSOLUTE(f) \ (*(f) == '/' \ || ((f)[0] && (f)[1] == ':')) /* drive name */ -# else /* NEITHER DOSISH NOR EPOCISH */ +# else /* NEITHER DOSISH NOR EPOCISH NOR SYMBIANISH */ # ifdef MACOS_TRADITIONAL # define PERL_FILE_IS_ABSOLUTE(f) (strchr(f, ':') && *(f) != ':') # else /* !MACOS_TRADITIONAL */