Commit 846cf3f3 authored by Marius Gerbershagen's avatar Marius Gerbershagen Committed by Daniel Kochmański
Browse files

dpp: create correct signature for functions with only required arguments

parent 32b6f021
......@@ -693,9 +693,7 @@ put_fhead(void)
fprintf(out, "cl_object %s(cl_narg narg", function_c_name);
for (i = 0; i < nreq; i++)
fprintf(out, ", cl_object %s", required[i]);
if (nopt > 0 || rest_flag || key_flag)
fprintf(out, ", ...");
fprintf(out, ")\n{\n");
fprintf(out, ", ...)\n{\n");
}
void
......
......@@ -533,7 +533,7 @@ extern ECL_API cl_object si_eval_with_env _ECL_ARGS((cl_narg narg, cl_object for
/* interpreter.c */
extern ECL_API cl_object si_interpreter_stack _ECL_ARGS((cl_narg narg));
extern ECL_API cl_object si_interpreter_stack _ECL_ARGS((cl_narg narg, ...));
extern ECL_API cl_object ecl_stack_frame_open(cl_env_ptr env, cl_object f, cl_index size);
extern ECL_API void ecl_stack_frame_push(cl_object f, cl_object o);
extern ECL_API void ecl_stack_frame_push_values(cl_object f);
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment