1 files changed, 4 insertions, 0 deletions
diff --git a/file.c b/file.c
index d601b26e88..2ae9be98cf 100644
--- a/file.c
+++ b/file.c
@@ -231,7 +231,11 @@ static VALUE
 rb_stat_mode(self)
     VALUE self;
 {
+#ifdef __BORLANDC__
+    return UINT2NUM((unsigned short)(get_stat(self)->st_mode));
+#else
     return UINT2NUM(get_stat(self)->st_mode);
+#endif
 }
 
 /*