diff --git a/ExprNode.cc b/ExprNode.cc index 6a9f2fa8..ed7c2f64 100644 --- a/ExprNode.cc +++ b/ExprNode.cc @@ -4686,6 +4686,8 @@ FirstDerivExternalFunctionNode::compileExternalFunctionOutput(ostream &CompileCo FCALL_ fcall(nb_output_arguments, nb_add_input_arguments, datatree.symbol_table.getName(first_deriv_symb_id), indx); fcall.set_function_type(ExternalFunctionFirstDerivative); fcall.write(CompileCode, instruction_number); + FSTPTEFD_ fstptefd(indx, inputIndex); + fstptefd.write(CompileCode, instruction_number); } }