diff options
author | Masaya Tojo <masaya@tojo.tokyo> | 2024-03-24 20:35:18 +0900 |
---|---|---|
committer | Masaya Tojo <masaya@tojo.tokyo> | 2024-03-24 21:10:26 +0900 |
commit | db4487272c42f73be62a63740ef1733dd4de3f52 (patch) | |
tree | 72f549730f63e6ea5c67ff91c5b4dc086e0d4284 /main.rkt | |
parent | 773c25464788fbb9efc32b48934034e8a82a7761 (diff) |
Remove main.rkt file.
Diffstat (limited to 'main.rkt')
-rw-r--r-- | main.rkt | 50 |
1 files changed, 0 insertions, 50 deletions
diff --git a/main.rkt b/main.rkt deleted file mode 100644 index 7e16dd4..0000000 --- a/main.rkt +++ /dev/null @@ -1,50 +0,0 @@ -#lang racket/base - -(module+ test - (require rackunit)) - -;; Notice -;; To install (from within the package directory): -;; $ raco pkg install -;; To install (once uploaded to pkgs.racket-lang.org): -;; $ raco pkg install <<name>> -;; To uninstall: -;; $ raco pkg remove <<name>> -;; To view documentation: -;; $ raco docs <<name>> -;; -;; For your convenience, we have included LICENSE-MIT and LICENSE-APACHE files. -;; If you would prefer to use a different license, replace those files with the -;; desired license. -;; -;; Some users like to add a `private/` directory, place auxiliary files there, -;; and require them in `main.rkt`. -;; -;; See the current version of the racket style guide here: -;; http://docs.racket-lang.org/style/index.html - -;; Code here - - - -(module+ test - ;; Any code in this `test` submodule runs when this file is run using DrRacket - ;; or with `raco test`. The code here does not run when this file is - ;; required by another module. - - (check-equal? (+ 2 2) 4)) - -(module+ main - ;; (Optional) main submodule. Put code here if you need it to be executed when - ;; this file is run using DrRacket or the `racket` executable. The code here - ;; does not run when this file is required by another module. Documentation: - ;; http://docs.racket-lang.org/guide/Module_Syntax.html#%28part._main-and-test%29 - - (require racket/cmdline) - (define who (box "world")) - (command-line - #:program "my-program" - #:once-each - [("-n" "--name") name "Who to say hello to" (set-box! who name)] - #:args () - (printf "hello ~a~n" (unbox who)))) |