[Genabel-commits] r1759 - pkg/GenABEL/R

[noreply at r-forge.r-project.org]

Author: maksim
Date: 2014-07-01 06:47:21 +0200 (Tue, 01 Jul 2014)
New Revision: 1759

Modified:
   pkg/GenABEL/R/impute2databel.R
Log:
fixing an issue reported by Erin

Modified: pkg/GenABEL/R/impute2databel.R
===================================================================
--- pkg/GenABEL/R/impute2databel.R	2014-06-25 05:57:28 UTC (rev 1758)
+++ pkg/GenABEL/R/impute2databel.R	2014-07-01 04:47:21 UTC (rev 1759)
@@ -108,13 +108,13 @@
     res <- .Call("iterator", tmp_fv at data, as.integer(0), as.integer(0),
                  as.character("databel_impute_prob_2_databel_mach_dose"),
                  paste(outfile, ".dose", sep=""), as.integer(2),
-                 as.integer(0))
+                 as.integer(0), PACKAGE="DatABEL")
     dosefile <- databel(paste(outfile, ".dose", sep=""), 64, readonly=FALSE)
     if (makeprob) {
       res <- .Call("iterator", tmp_fv at data, as.integer(0), as.integer(0),
                    as.character("databel_impute_prob_2_databel_mach_prob"),
                    paste(outfile, ".prob", sep=""), as.integer(2),
-                   as.integer(0))
+                   as.integer(0), PACKAGE="DatABEL")
       probfile <- databel(paste(outfile, ".prob", sep=""), 64, readonly=FALSE)
     }