syndicate-lang
/
hop-2012
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Catch up with ocamlmsg definitions

This commit is contained in:
Tony Garnock-Jones 2012-03-06 16:37:36 -05:00
parent 1e1b70994d
commit 17af172e3d
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
server/main.c
View File

@ -45,7 +45,7 @@ static void factory_handle_message(node_t *n, sexp_t *m) {
sexp_t *error = NULL; sexp_t *error = NULL;
sexp_t *reply; sexp_t *reply;
if (new_node(nc, p.create.arg, &error) != NULL) { if (new_node(nc, p.create.arg, &error) != NULL) {
reply = message_create_ok(); reply = message_create_ok(NULL);
} else { } else {
reply = message_create_failed(error); reply = message_create_failed(error);
} }

2
server/messages.json
View File

@ -5,7 +5,7 @@
}, },
{ {
"selector": "create-ok", "selector": "create-ok",
"args": [] "args": ["info"]
}, },
{ {
"selector": "create-failed", "selector": "create-failed",