conservatory
/
elk
4
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

* Some bloody K&R function definition were missing. 

git-svn-id: svn://svn.zoy.org/elk/trunk@92 55e467fa-43c5-0310-a8a2-de718669efc6
This commit is contained in:
sam 2003-09-04 14:33:43 +00:00
parent e81273f8a3
commit c85894ea26
2 changed files with 2 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
src/io.c
View File

@ -340,8 +340,7 @@ Object P_Close_Output_Port (Object port) {
return General_Close_Port (port);
}
#define General_With(prim,curr,flags) Object prim (name, thunk)\
Object name, thunk; {\
#define General_With(prim,curr,flags) Object prim (Object name, Object thunk) {\
Object old, ret;\
GC_Node2;\
\

3
src/terminate.c
View File

@ -44,8 +44,7 @@ void Init_Terminate () {
/* Register an object with the given group and termination function;
* object can be marked as LEADER.
*/
void Register_Object (obj, group, term, leader_flag) Object obj; GENERIC group;
PFO term; {
void Register_Object (Object obj, GENERIC group, PFO term, int leader_flag) {
WEAK_NODE *p;
p = (WEAK_NODE *)Safe_Malloc (sizeof (*p));