command_4 is inherited.
(do_command_3): Use CAST_SUBTYPE, in case command_3 is inherited.
(do_command_2): Use CAST_SUBTYPE, command_2 is inherited by
sexp_print_command.

Rev: src/command.c:1.46