git-svn-id: file:///home/git/hedgehog.fhcrc.org/bioconductor/trunk/madman/Rpacks/preprocessCore@26986 bc3139a8-67e5-0310-9ffc-ced21a209358
... | ... |
@@ -9,6 +9,7 @@ |
9 | 9 |
** History |
10 | 10 |
** May 20, 2007 - Initial version |
11 | 11 |
** May 24-27, 2007 - add in additional registered functions |
12 |
+ ** Sep 9, 2007 - add the R_rlm_rma_default and R_wrlm_rma_default_model as registered functions |
|
12 | 13 |
** |
13 | 14 |
*****************************************************/ |
14 | 15 |
|
... | ... |
@@ -21,6 +22,9 @@ |
21 | 22 |
#include "rlm.h" |
22 | 23 |
#include "rlm_se.h" |
23 | 24 |
|
25 |
+#include "R_rlm_interfaces.h" |
|
26 |
+ |
|
27 |
+ |
|
24 | 28 |
#include <R_ext/Rdynload.h> |
25 | 29 |
#include <Rdefines.h> |
26 | 30 |
#include <Rinternals.h> |
... | ... |
@@ -33,12 +37,14 @@ __declspec(dllexport) |
33 | 37 |
|
34 | 38 |
static const R_CallMethodDef callMethods[] = { |
35 | 39 |
{"R_qnorm_c",(DL_FUNC)&R_qnorm_c,2}, |
36 |
- {"R_qnorm_robust_weights", (DL_FUNC)&R_qnorm_robust_weights, 3}, |
|
37 |
- {"R_qnorm_robust_c",(DL_FUNC)&R_qnorm_robust_c,6}, |
|
38 |
- {"R_qnorm_determine_target",(DL_FUNC)&R_qnorm_determine_target,2}, |
|
39 |
- {"R_qnorm_using_target",(DL_FUNC)&R_qnorm_using_target,3 }, |
|
40 |
- {"R_qnorm_within_blocks",(DL_FUNC)&R_qnorm_within_blocks, 3}, |
|
41 |
- {NULL, NULL, 0} |
|
40 |
+ {"R_qnorm_robust_weights", (DL_FUNC)&R_qnorm_robust_weights, 3}, |
|
41 |
+ {"R_qnorm_robust_c",(DL_FUNC)&R_qnorm_robust_c,6}, |
|
42 |
+ {"R_qnorm_determine_target",(DL_FUNC)&R_qnorm_determine_target,2}, |
|
43 |
+ {"R_qnorm_using_target",(DL_FUNC)&R_qnorm_using_target,3}, |
|
44 |
+ {"R_qnorm_within_blocks",(DL_FUNC)&R_qnorm_within_blocks,3}, |
|
45 |
+ {"R_rlm_rma_default_model",(DL_FUNC)&R_rlm_rma_default_model,3}, |
|
46 |
+ {"R_wrlm_rma_default_model", (DL_FUNC)&R_wrlm_rma_default_model,4}, |
|
47 |
+ {NULL, NULL, 0} |
|
42 | 48 |
}; |
43 | 49 |
|
44 | 50 |
void R_init_preprocessCore(DllInfo *info){ |