Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
ecl
ecl
Commits
846cf3f3
Commit
846cf3f3
authored
Oct 20, 2019
by
Marius Gerbershagen
Committed by
Daniel Kochmański
Dec 08, 2019
Browse files
dpp: create correct signature for functions with only required arguments
parent
32b6f021
Changes
2
Hide whitespace changes
Inline
Side-by-side
src/c/dpp.c
View file @
846cf3f3
...
...
@@ -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
...
...
src/h/external.h
View file @
846cf3f3
...
...
@@ -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
);
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment