mirror of
https://github.com/ashinn/chibi-scheme.git
synced 2025-05-18 21:29:19 +02:00
13 lines
300 B
Scheme
Executable file
13 lines
300 B
Scheme
Executable file
#! /usr/bin/env chibi-scheme
|
|
|
|
(import (scheme base) (scheme write) (srfi 193))
|
|
|
|
(define-syntax pp
|
|
(syntax-rules ()
|
|
((_ expr) (begin (write 'expr) (display " => ") (write expr) (newline)))))
|
|
|
|
(pp (command-line))
|
|
(pp (command-name))
|
|
(pp (command-args))
|
|
(pp (script-file))
|
|
(pp (script-directory))
|