Skip to content
This repository has been archived by the owner on Jul 17, 2024. It is now read-only.

Commit

Permalink
Merge branch 'main' into 68-use-new-steady-state-for-lincmt
Browse files Browse the repository at this point in the history
  • Loading branch information
mattfidler authored Oct 27, 2023
2 parents 68fc48f + 36dd96c commit 7e0e812
Show file tree
Hide file tree
Showing 2 changed files with 8 additions and 4 deletions.
1 change: 1 addition & 0 deletions inst/include/rxode2parseStruct.h
Original file line number Diff line number Diff line change
@@ -1,3 +1,4 @@

#ifndef __RXODE2PARSESTRUCT_H__
#define __RXODE2PARSESTRUCT_H__

Expand Down
11 changes: 7 additions & 4 deletions src/etTran.cpp
Original file line number Diff line number Diff line change
Expand Up @@ -52,10 +52,10 @@ static inline CharacterVector asCv(SEXP in, const char *what) {
#ifdef asError
REprintf(_("'%s' needs to be a vector of strings"), what);
abort();
#else
#else
Rcpp::stop(_("'%s' needs to be a vector of strings"), what);
#endif
}
}
return as<CharacterVector>(in);
}

Expand Down Expand Up @@ -489,7 +489,7 @@ bool rxode2parseIsIntegerish(SEXP in) {
//' @param ssAtDoseTime Boolean that when `TRUE` back calculates the
//' steady concentration at the actual time of dose, otherwise when
//' `FALSE` the doses are shifted
//'
//'
//' @return Object for solving in rxode2
//'
//' @keywords internal
Expand Down Expand Up @@ -799,6 +799,8 @@ List etTransParse(List inData, List mv, bool addCmt=false,
idxOutput.reserve(resSize);
std::vector<int> cens;
cens.reserve(resSize);
std::vector<int> nObsId;


#ifdef rxSolveT
REprintf(" Time3: %f\n", ((double)(clock() - _lastT0))/CLOCKS_PER_SEC);
Expand Down Expand Up @@ -977,7 +979,8 @@ List etTransParse(List inData, List mv, bool addCmt=false,
double camt;
int curIdx=0;
double cdv, climit;
int nobs=0, ndose=0;
int nobs=0, nobsCur=0, ndose=0;

int ccens=0;
bool warnCensNA=false;
bool censNone=true;
Expand Down

0 comments on commit 7e0e812

Please sign in to comment.