diff --git a/coerce.rkt b/coerce.rkt new file mode 100644 index 0000000..cc3e524 --- /dev/null +++ b/coerce.rkt @@ -0,0 +1,4 @@ +#lang racket/base + +(require "coerce/values.rkt" "coerce/contracts.rkt") +(provide (all-from-out "coerce/values.rkt" "coerce/contracts.rkt")) \ No newline at end of file diff --git a/coercion/contracts.rkt b/coerce/contracts.rkt similarity index 100% rename from coercion/contracts.rkt rename to coerce/contracts.rkt diff --git a/coercion/values.rkt b/coerce/values.rkt similarity index 100% rename from coercion/values.rkt rename to coerce/values.rkt diff --git a/coercion.rkt b/coercion.rkt deleted file mode 100644 index ed283d5..0000000 --- a/coercion.rkt +++ /dev/null @@ -1,4 +0,0 @@ -#lang racket/base - -(require "coercion/values.rkt" "coercion/contracts.rkt") -(provide (all-from-out "coercion/values.rkt" "coercion/contracts.rkt")) \ No newline at end of file diff --git a/container.rkt b/container.rkt index 80b8ee4..ad5ef8b 100644 --- a/container.rkt +++ b/container.rkt @@ -1,6 +1,6 @@ #lang racket/base (require "define/contract.rkt") -(require "coercion.rkt" "len.rkt" racket/list) +(require "coerce.rkt" "len.rkt" racket/list) (define (sliceable-container? x) (ormap (λ(proc) (proc x)) (list list? string? symbol? vector?))) diff --git a/list.rkt b/list.rkt index 66cc4e9..8f666bd 100644 --- a/list.rkt +++ b/list.rkt @@ -1,6 +1,6 @@ #lang racket/base (require racket/list racket/set) -(require "define/contract.rkt" "len.rkt" "coercion/values.rkt") +(require "define/contract.rkt" "len.rkt" "coerce/values.rkt") (define+provide/contract (trim items test-proc) (list? procedure? . -> . list?) diff --git a/main.rkt b/main.rkt index dcc41e5..0cc9359 100644 --- a/main.rkt +++ b/main.rkt @@ -1,7 +1,7 @@ #lang racket/base (require - "coercion.rkt" + "coerce.rkt" "container.rkt" "debug.rkt" "define.rkt" @@ -16,7 +16,7 @@ (provide (all-from-out - "coercion.rkt" + "coerce.rkt" "container.rkt" "debug.rkt" "define.rkt" diff --git a/scribble.rkt b/scribble.rkt index dfd92e3..eb1757b 100644 --- a/scribble.rkt +++ b/scribble.rkt @@ -1,6 +1,6 @@ #lang racket (require (for-syntax racket/base)) -(require "coercion/values.rkt") +(require "coerce/values.rkt") (provide when/block) diff --git a/string.rkt b/string.rkt index 6f84297..4346a45 100644 --- a/string.rkt +++ b/string.rkt @@ -1,5 +1,5 @@ #lang racket/base -(require "define/contract.rkt" "coercion.rkt") +(require "define/contract.rkt" "coerce.rkt") (define+provide/contract (starts-with? str starter)