diff options
Diffstat (limited to 'ext/pathname')
-rw-r--r-- | ext/pathname/lib/pathname.rb | 10 | ||||
-rw-r--r-- | ext/pathname/pathname.c | 16 |
2 files changed, 16 insertions, 10 deletions
diff --git a/ext/pathname/lib/pathname.rb b/ext/pathname/lib/pathname.rb index 760277e640..a89b740638 100644 --- a/ext/pathname/lib/pathname.rb +++ b/ext/pathname/lib/pathname.rb @@ -179,16 +179,6 @@ class Pathname end private :cleanpath_conservative - # - # Returns the real (absolute) pathname of +self+ in the actual filesystem. - # The real pathname doesn't contain symlinks or useless dots. - # - # The last component of the real pathname can be nonexistent. - # - def realdirpath(basedir=nil) - self.class.new(File.realdirpath(@path, basedir)) - end - # #parent returns the parent directory. # # This is same as <tt>self + '..'</tt>. diff --git a/ext/pathname/pathname.c b/ext/pathname/pathname.c index 273ecee07c..d4fd502674 100644 --- a/ext/pathname/pathname.c +++ b/ext/pathname/pathname.c @@ -216,6 +216,21 @@ path_realpath(int argc, VALUE *argv, VALUE self) } /* + * Returns the real (absolute) pathname of +self+ in the actual filesystem. + * The real pathname doesn't contain symlinks or useless dots. + * + * The last component of the real pathname can be nonexistent. + */ +static VALUE +path_realdirpath(int argc, VALUE *argv, VALUE self) +{ + VALUE basedir, str; + rb_scan_args(argc, argv, "01", &basedir); + str = rb_funcall(rb_cFile, rb_intern("realdirpath"), 2, get_strpath(self), basedir); + return rb_class_new_instance(1, &str, rb_obj_class(self)); +} + +/* * == Pathname * * Pathname represents a pathname which locates a file in a filesystem. @@ -414,4 +429,5 @@ Init_pathname() rb_define_method(rb_cPathname, "sub", path_sub, -1); rb_define_method(rb_cPathname, "sub_ext", path_sub_ext, 1); rb_define_method(rb_cPathname, "realpath", path_realpath, -1); + rb_define_method(rb_cPathname, "realdirpath", path_realdirpath, -1); } |