* file.c (rb_stat_mode): should not sign-expand, so backout.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@5622 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

ChangeLog

@@ -1,3 +1,7 @@
+Wed Feb  4 22:39:46 2004  Nobuyoshi Nakada  <nobu@ruby-lang.org>
+
+	* file.c (rb_stat_mode): should not sign-expand, so backout.
+
 Wed Feb  4 02:12:06 2004  Tanaka Akira  <akr@m17n.org>
 
 	* file.c (test_l): fix wrong method name in document.

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
 }
 
 /*