diff --git a/xenomorph/xenomorph/private/base.rkt b/xenomorph/xenomorph/base.rkt similarity index 98% rename from xenomorph/xenomorph/private/base.rkt rename to xenomorph/xenomorph/base.rkt index d62377b9..c30e843a 100644 --- a/xenomorph/xenomorph/private/base.rkt +++ b/xenomorph/xenomorph/base.rkt @@ -1,5 +1,5 @@ #lang racket/base -(require racket/class sugar/unstable/class racket/generic racket/private/generic-methods "generic.rkt" racket/port racket/dict racket/function) +(require racket/class sugar/unstable/class racket/generic racket/private/generic-methods "private/generic.rkt" racket/port racket/dict racket/function) (require sugar/debug) (provide (all-defined-out)) (define-generics posable diff --git a/xenomorph/xenomorph/main.rkt b/xenomorph/xenomorph/main.rkt index fd6e7b5f..f2076528 100644 --- a/xenomorph/xenomorph/main.rkt +++ b/xenomorph/xenomorph/main.rkt @@ -2,6 +2,7 @@ (require "private/racket.rkt") (r+p "array.rkt" + "base.rkt" "bitfield.rkt" "buffer.rkt" "enum.rkt" diff --git a/xenomorph/xenomorph/private/helper.rkt b/xenomorph/xenomorph/private/helper.rkt index a2e84375..eb9e01ae 100644 --- a/xenomorph/xenomorph/private/helper.rkt +++ b/xenomorph/xenomorph/private/helper.rkt @@ -1,6 +1,6 @@ #lang racket/base -(require (for-syntax racket/base br/syntax) racket/class br/define "base.rkt") -(provide (all-defined-out) (all-from-out "base.rkt")) +(require (for-syntax racket/base br/syntax) racket/class br/define "../base.rkt") +(provide (all-defined-out) (all-from-out "../base.rkt")) (define-macro (test-module . EXPRS)