Commit 209ba6b4 authored by Niels Möller's avatar Niels Möller
Browse files

(make_lshg_connect): New argument, resource.

(main): Pass options->super.resources to make_lshg_connect.

Rev: src/lshg.c:1.26
parent b89f8343
......@@ -94,11 +94,12 @@ DEFINE_COMMAND(options2info)
(expr
(name make_lshg_connect)
(params
(resource object resource)
(actions object object_list))
(expr
(lambda (options)
((progn actions)
(gateway_init
(protect resource gateway_init
(connect_local (options2info options)))))))
*/
......@@ -330,7 +331,8 @@ main(int argc, char **argv, const char** envp)
{
CAST_SUBTYPE(command, lshg_connect,
make_lshg_connect(queue_to_list(&options->super.actions)));
make_lshg_connect(&options->super.resources->super,
queue_to_list(&options->super.actions)));
COMMAND_CALL(lshg_connect, options, &discard_continuation,
make_lshg_exception_handler(&default_exception_handler,
......
Supports Markdown
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