diff options
author | akr <akr@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2010-08-01 20:35:33 +0000 |
---|---|---|
committer | akr <akr@b2dd03c8-39d4-4d8f-98ff-823fe69b080e> | 2010-08-01 20:35:33 +0000 |
commit | 88431b74fcb16e92e67ec3d3abf205793b255772 (patch) | |
tree | 10f49fd1813d12b5b3284bc7e45461de36ed595f | |
parent | 33d848d841a2579febf14b550f0ffe9ff8657065 (diff) | |
download | ruby-88431b74fcb16e92e67ec3d3abf205793b255772.tar.gz |
* ext/pathname/pathname.c (path_realdirpath): Pathname#realdirpath
translated from pathname.rb.
git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@28831 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
-rw-r--r-- | ChangeLog | 5 | ||||
-rw-r--r-- | ext/pathname/lib/pathname.rb | 10 | ||||
-rw-r--r-- | ext/pathname/pathname.c | 16 |
3 files changed, 21 insertions, 10 deletions
@@ -1,3 +1,8 @@ +Mon Aug 2 05:34:48 2010 Tanaka Akira <akr@fsij.org> + + * ext/pathname/pathname.c (path_realdirpath): Pathname#realdirpath + translated from pathname.rb. + Sun Aug 1 23:04:49 2010 Tanaka Akira <akr@fsij.org> * lib/pp.rb: describe superclasses explicitly. 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); } |