1berry/ruby
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

* file.c (test_wr): Rdoc fix. [ruby-core:02225]

Browse Source 
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@5450 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
matz 2004-01-12 16:26:05 +00:00
parent c8b7862e86
commit 6c862db688
2 changed files with 15 additions and 17 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
ChangeLog
View File

@ -1,3 +1,7 @@
Tue Jan 13 01:24:17 2004 Yukihiro Matsumoto <matz@ruby-lang.org>
* file.c (test_wr): Rdoc fix. [ruby-core:02225]
Tue Jan 13 01:04:37 2004 Dave Thomas <dave@pragprog.com> Tue Jan 13 01:04:37 2004 Dave Thomas <dave@pragprog.com>
* lib/rdoc/ri/ri_paths.rb (RI::Paths): First attempt at * lib/rdoc/ri/ri_paths.rb (RI::Paths): First attempt at

28
file.c
View File

@ -1015,6 +1015,14 @@ test_R(obj, fname)
return Qtrue; return Qtrue;
} }
#ifndef S_IRUGO
# define S_IRUGO (S_IRUSR | S_IRGRP | S_IROTH)
#endif
#ifndef S_IWUGO
# define S_IWUGO (S_IWUSR | S_IWGRP | S_IWOTH)
#endif
/* /*
* call-seq: * call-seq:
* File.world_readable?(file_name) => fixnum or nil * File.world_readable?(file_name) => fixnum or nil
@ -1029,14 +1037,6 @@ test_R(obj, fname)
* sprintf("%o", m) # => "644" * sprintf("%o", m) # => "644"
*/ */
#ifndef S_IRUGO
# define S_IRUGO (S_IRUSR | S_IRGRP | S_IROTH)
#endif
#ifndef S_IWUGO
# define S_IWUGO (S_IWUSR | S_IWGRP | S_IWOTH)
#endif
static VALUE static VALUE
test_wr(obj, fname) test_wr(obj, fname)
VALUE obj, fname; VALUE obj, fname;
@ -1044,7 +1044,7 @@ test_wr(obj, fname)
#ifdef S_IROTH #ifdef S_IROTH
struct stat st; struct stat st;
if (rb_stat(fname, &st) < 0) return Qfalse; if (rb_stat(fname, &st) < 0) return Qnil;
if ((st.st_mode & (S_IROTH)) == S_IROTH) { if ((st.st_mode & (S_IROTH)) == S_IROTH) {
#ifdef __BORLANDC__ #ifdef __BORLANDC__
return UINT2NUM((unsigned short)(st.st_mode & return UINT2NUM((unsigned short)(st.st_mode &
@ -1053,11 +1053,8 @@ test_wr(obj, fname)
return UINT2NUM(st.st_mode & (S_IRUGO|S_IWUGO|S_IXUGO)); return UINT2NUM(st.st_mode & (S_IRUGO|S_IWUGO|S_IXUGO));
#endif #endif
} }
else {
return Qnil;
}
#endif #endif
return Qfalse; return Qnil;
} }
/* /*
@ -1124,11 +1121,8 @@ test_ww(obj, fname)
return UINT2NUM(st.st_mode & (S_IRUGO|S_IWUGO|S_IXUGO)); return UINT2NUM(st.st_mode & (S_IRUGO|S_IWUGO|S_IXUGO));
#endif #endif
} }
else {
return Qnil;
}
#endif #endif
return Qfalse; return Qnil;
} }
/* /*