* src/channel.c (connection_service_command): Use

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

Rev: src/command.c:1.36

src/command.c

@@ -361,7 +361,7 @@ struct command *make_parallell_progn(struct object_list *body)
   }
 }
 
-COMMAND_SIMPLE(progn_command)
+DEFINE_COMMAND_SIMPLE(progn_command, a)
 {
   CAST(object_list, body, a);
   return LIST_LENGTH(body) ? &make_parallell_progn(body)->super