MPE/iX tweaks from Mark Bixby.

p4raw-id: //depot/perl@10539

1 files changed, 2 insertions, 0 deletions

diff --git a/util.c b/util.c
index 81f413e966..d9e9c659a6 100644
--- a/util.c
+++ b/util.c
@@ -4980,6 +4980,7 @@ Perl_sv_realpath(pTHX_ SV *sv, char *path, STRLEN len)
 
     return TRUE;
 #else
+    {
     DIR *parent;
     Direntry_t *dp;
     char dotdots[MAXPATHLEN] = { 0 };
@@ -5082,6 +5083,7 @@ Perl_sv_realpath(pTHX_ SV *sv, char *path, STRLEN len)
     SvPOK_only(sv);
 
     return TRUE;
+    }
 #endif
 #else
     return FALSE;