stepan
/
dynare
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

trunk simulate.dll: fixed compilation issue 

git-svn-id: https://www.dynare.org/svn/dynare/dynare_v4@2188 ac1d8469-bf42-47a9-8791-bf33cf982152
time-shift
sebastien 2008-10-22 15:39:40 +00:00
parent 38b2eb42cb
commit 6ad7cc087c
1 changed files with 7 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
mex/sources/simulate/Interpreter.cc
View File

@ -598,10 +598,10 @@ Interpreter::simulate_a_block(int size,int type, string file_name, string bin_ba
//mexPrintf("simulate_a_block size=%d type=%d\n",size,type); //mexPrintf("simulate_a_block size=%d type=%d\n",size,type);
switch (type) switch (type)
{ {
case EVALUATE_FOREWARD : case EVALUATE_FORWARD :
case EVALUATE_FOREWARD_R : case EVALUATE_FORWARD_R :
#ifdef DEBUGC #ifdef DEBUGC
mexPrintf("EVALUATE_FOREWARD\n"); mexPrintf("EVALUATE_FORWARD\n");
#endif #endif
begining=get_code_pointer; begining=get_code_pointer;
for (it_=y_kmin;it_<periods+y_kmin;it_++) for (it_=y_kmin;it_<periods+y_kmin;it_++)
@ -632,9 +632,9 @@ Interpreter::simulate_a_block(int size,int type, string file_name, string bin_ba
#endif #endif
} }
break; break;
case SOLVE_FOREWARD_SIMPLE : case SOLVE_FORWARD_SIMPLE :
#ifdef DEBUGC #ifdef DEBUGC
mexPrintf("SOLVE_FOREWARD_SIMPLE\n"); mexPrintf("SOLVE_FORWARD_SIMPLE\n");
#endif #endif
g1=(double*)mxMalloc(size*size*sizeof(double)); g1=(double*)mxMalloc(size*size*sizeof(double));
r=(double*)mxMalloc(size*sizeof(double)); r=(double*)mxMalloc(size*sizeof(double));
@ -778,9 +778,9 @@ Interpreter::simulate_a_block(int size,int type, string file_name, string bin_ba
Direct_Simulate(Block_Count, symbol_table_endo_nbr, it_, y_kmin, y_kmax,size, periods, true, iter); Direct_Simulate(Block_Count, symbol_table_endo_nbr, it_, y_kmin, y_kmax,size, periods, true, iter);
} }
break; break;
case SOLVE_FOREWARD_COMPLETE : case SOLVE_FORWARD_COMPLETE :
#ifdef DEBUGC #ifdef DEBUGC
mexPrintf("SOLVE_FOREWARD_COMPLETE\n"); mexPrintf("SOLVE_FORWARD_COMPLETE\n");
#endif #endif
is_linear=get_code_bool; is_linear=get_code_bool;
max_lag_plus_max_lead_plus_1=get_code_int; max_lag_plus_max_lead_plus_1=get_code_int;