RosettaCodeData/Task/Command-line-arguments/Scheme/command-line-arguments.scm

 (define (main args)
  (for-each (lambda (arg) (display arg) (newline)) args))
	`(define (main args)`
	`(for-each (lambda (arg) (display arg) (newline)) args))`