[Pomp-commits] r622 - pkg/src
noreply at r-forge.r-project.org
noreply at r-forge.r-project.org
Thu Mar 8 17:13:35 CET 2012
Author: kingaa
Date: 2012-03-08 17:13:35 +0100 (Thu, 08 Mar 2012)
New Revision: 622
Modified:
pkg/src/euler.c
Log:
- fix incorrect comment
Modified: pkg/src/euler.c
===================================================================
--- pkg/src/euler.c 2012-03-07 23:41:42 UTC (rev 621)
+++ pkg/src/euler.c 2012-03-08 16:13:35 UTC (rev 622)
@@ -296,7 +296,7 @@
LENGTH(ans),NVAR);
}
PROTECT(nm = GET_NAMES(ans)); nprotect++;
- if (!isNull(nm)) { // match names against names from data slot
+ if (!isNull(nm)) {
PROTECT(idx = matchnames(VNAMES,nm)); nprotect++;
op = INTEGER(idx);
for (k = 0; k < NVAR; k++) VINDEX[k] = op[k];
More information about the pomp-commits
mailing list