(define (main args)
  (write (list main: args)) (newline))

(cond-expand
  (chicken-compile-shared)
  (compiling (main (command-line-arguments)))
  (else))