uhm
parent
3f3d645f09
commit
659c116898
5
rodo.rkt
5
rodo.rkt
|
@ -1,5 +1,4 @@
|
||||||
#! /usr/bin/env racket
|
#! /usr/bin/env racket #lang racket/base
|
||||||
#lang racket/base
|
|
||||||
|
|
||||||
(require racket/vector)
|
(require racket/vector)
|
||||||
|
|
||||||
|
@ -32,7 +31,7 @@
|
||||||
'item-removed-prefix "> Removed "
|
'item-removed-prefix "> Removed "
|
||||||
'item-removed-suffix " from list\n"
|
'item-removed-suffix " from list\n"
|
||||||
|
|
||||||
'terminating (string-append "> Exiting " program-name "...\n")))
|
'terminating (string-append "> Exiting " program-name " ...\n")))
|
||||||
|
|
||||||
;; some possible user-input related "mistakes" that will be accepted for input
|
;; some possible user-input related "mistakes" that will be accepted for input
|
||||||
(define y/n
|
(define y/n
|
||||||
|
|
Loading…
Reference in New Issue