diff --git a/racket/src/rktio/rktio_fs.c b/racket/src/rktio/rktio_fs.c
index c0c5010611..2bf6d18c8e 100644
--- a/racket/src/rktio/rktio_fs.c
+++ b/racket/src/rktio/rktio_fs.c
@@ -629,8 +629,10 @@ char *rktio_get_current_directory(rktio_t *rktio)
    } else
      break;
  }
- if (!r)
+ if (!r) {
+   free(s);
    get_posix_error();
+ }
  return r;
 #endif
 }