0.0.2

titsuki · Aug 7, 2021 · f49839b · f49839b
1 parent 4470c97
commit f49839b
Show file tree

Hide file tree

Showing 8 changed files with 15 additions and 8 deletions.
diff --git a/.gitignore b/.gitignore
@@ -1,3 +1,5 @@
 .precomp/
 /Algorithm-XGBoost-*
 /resources/libraries/
+/src/xgboost
+/src/xgboost.tar.gz
diff --git a/Changes b/Changes
@@ -2,5 +2,10 @@ Revision history for Algorithm-XGBoost
 
 {{$NEXT}}
 
+0.0.2  2021-08-08T01:36:51+09:00
+    - Use agaricus.txt.train instead of agaricus.txt.test [#5]
+    - Add CustomBuilder [#4]
+    - Add missing auth field [4470c97]
+
 0.0.1  2021-08-06T03:10:23+09:00
     - Initial version
diff --git a/META6.json b/META6.json
@@ -30,5 +30,5 @@
   ],
   "test-depends": [
   ],
-  "version": "0.0.1"
+  "version": "0.0.2"
 }
diff --git a/lib/Algorithm/XGBoost.rakumod b/lib/Algorithm/XGBoost.rakumod
@@ -3,7 +3,7 @@ use Algorithm::XGBoost::Booster;
 use Algorithm::XGBoost::DMatrix;
 use Algorithm::XGBoost::Model;
 
-unit class Algorithm::XGBoost:ver<0.0.1>:auth<cpan:TITSUKI>;
+unit class Algorithm::XGBoost:ver<0.0.2>:auth<cpan:TITSUKI>;
 
 my constant $library = %?RESOURCES<libraries/xgboost>.Str;
 my sub XGBoostVersion(int32 is rw, int32 is rw, int32 is rw) is native($library) { * }

diff --git a/lib/Algorithm/XGBoost/Booster.rakumod b/lib/Algorithm/XGBoost/Booster.rakumod
@@ -1,3 +1,3 @@
 use NativeCall;
 
-unit class Algorithm::XGBoost::Booster:ver<0.0.1>:auth<cpan:TITSUKI> is repr('CPointer');
+unit class Algorithm::XGBoost::Booster:ver<0.0.2>:auth<cpan:TITSUKI> is repr('CPointer');
diff --git a/lib/Algorithm/XGBoost/CustomBuilder.rakumod b/lib/Algorithm/XGBoost/CustomBuilder.rakumod
@@ -4,8 +4,9 @@ use Zef::Fetch;
 use Zef::Extract;
 use Distribution::Builder::MakeFromJSON;
 
-class Algorithm::XGBoost::CustomBuilder:ver<0.0.1>:auth<cpan:TITSUKI> is Distribution::Builder::MakeFromJSON {
+class Algorithm::XGBoost::CustomBuilder:ver<0.0.2>:auth<cpan:TITSUKI> is Distribution::Builder::MakeFromJSON {
     method build(IO() $work-dir = $*CWD) {
+        my $goback = ENTER $*CWD;
         my $workdir = ~$work-dir;
         if $*DISTRO.is-win {
             die "Sorry, this binding doesn't support windows";
@@ -22,9 +23,9 @@ class Algorithm::XGBoost::CustomBuilder:ver<0.0.1>:auth<cpan:TITSUKI> is Distrib
             run 'rm', '-f', "$workdir/resources/libraries/%vars<xgboost>";
         }
         run 'ln', '-s', "$workdir/src/xgboost/lib/%vars<xgboost>", "$workdir/resources/libraries/%vars<xgboost>";
+        LEAVE chdir($goback);
     }
     method !install-xgboost($workdir) {
-        my $goback = $*CWD;
         my $srcdir = "$workdir/src";
         my %vars = get-vars($workdir);
 
@@ -48,7 +49,6 @@ class Algorithm::XGBoost::CustomBuilder:ver<0.0.1>:auth<cpan:TITSUKI> is Distrib
         chdir("xgboost");
         when self!is-osx { shell("brew install libomp && cmake . && make") }
         when self!is-linux { shell("cmake . && make") }
-        chdir($goback);
     }
     method !is-osx(--> Bool) { shell("uname", :out).out.slurp.trim.lc eq "darwin" }
     method !is-linux(--> Bool) { so (self!is-osx, $*DISTRO.is-win).none }

diff --git a/lib/Algorithm/XGBoost/DMatrix.rakumod b/lib/Algorithm/XGBoost/DMatrix.rakumod
@@ -1,6 +1,6 @@
 use NativeCall;
 
-unit class Algorithm::XGBoost::DMatrix:ver<0.0.1>:auth<cpan:TITSUKI> is repr('CPointer');
+unit class Algorithm::XGBoost::DMatrix:ver<0.0.2>:auth<cpan:TITSUKI> is repr('CPointer');
 
 my constant $library = %?RESOURCES<libraries/xgboost>.Str;
 my sub XGDMatrixCreateFromFile(Str, int32, Algorithm::XGBoost::DMatrix is rw --> int32) is native($library) { * }

diff --git a/lib/Algorithm/XGBoost/Model.rakumod b/lib/Algorithm/XGBoost/Model.rakumod
@@ -2,7 +2,7 @@ use NativeCall;
 use Algorithm::XGBoost::DMatrix;
 use Algorithm::XGBoost::Booster;
 
-unit class Algorithm::XGBoost::Model:ver<0.0.1>:auth<cpan:TITSUKI> is repr('CPointer');
+unit class Algorithm::XGBoost::Model:ver<0.0.2>:auth<cpan:TITSUKI> is repr('CPointer');
 
 my constant $library = %?RESOURCES<libraries/xgboost>.Str;
 my sub XGBoosterGetNumFeature(Algorithm::XGBoost::Model, ulong is rw --> int32) is native($library) { * }