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

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
Родитель c8b7862e86
Коммит 6c862db688
2 изменённых файлов: 15 добавлений и 17 удалений

Просмотреть файл

@ -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>
* lib/rdoc/ri/ri_paths.rb (RI::Paths): First attempt at

28
file.c
Просмотреть файл

@ -1015,6 +1015,14 @@ test_R(obj, fname)
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:
* File.world_readable?(file_name) => fixnum or nil
@ -1029,14 +1037,6 @@ test_R(obj, fname)
* 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
test_wr(obj, fname)
VALUE obj, fname;
@ -1044,7 +1044,7 @@ test_wr(obj, fname)
#ifdef S_IROTH
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) {
#ifdef __BORLANDC__
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));
#endif
}
else {
return Qnil;
}
#endif
return Qfalse;
return Qnil;
}
/*
@ -1124,11 +1121,8 @@ test_ww(obj, fname)
return UINT2NUM(st.st_mode & (S_IRUGO|S_IWUGO|S_IXUGO));
#endif
}
else {
return Qnil;
}
#endif
return Qfalse;
return Qnil;
}
/*