From d823b0b00e4b643b3bd7a14e87490d8a4f96fb86 Mon Sep 17 00:00:00 2001
From: nobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Wed, 4 Feb 2004 13:39:49 +0000
Subject: * file.c (rb_stat_mode): should not sign-expand, so backout.

git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@5622 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 file.c | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'file.c')

diff --git a/file.c b/file.c
index d601b26e8..2ae9be98c 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
 }
 
 /*
-- 
cgit