* src/channel.c (connection_service_command): Use

DEFINE_COMMAND_SIMPLE macro.
* src/combinators.c (command_K): Likewise.
(command_I): Likewise.

Rev: src/combinators.c:1.10

src/combinators.c

@@ -34,7 +34,7 @@
 
 /* Ix == x */
 
-COMMAND_SIMPLE(command_I) { return a; }
+DEFINE_COMMAND_SIMPLE(command_I, a) { return a; }
 
 
 /* ((K x) y) == x */
@@ -66,7 +66,7 @@ struct command *make_command_K_1(struct lsh_object *x)
   return &res->super.super;
 }
 
-COMMAND_SIMPLE(command_K)
+DEFINE_COMMAND_SIMPLE(command_K, a)
 { return &make_command_K_1(a)->super; }