You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
10 lines
419 B
Racket
10 lines
419 B
Racket
#lang at-exp racket/base
|
|
(require rackunit pollen/world racket/runtime-path)
|
|
|
|
;; define-runtime-path only allowed at top level
|
|
(define-runtime-path test-dir "data/pollen-mode")
|
|
(define-runtime-path test-source "data/pollen-mode/test-pollen-mode.foo")
|
|
|
|
(parameterize ([current-directory test-dir]
|
|
[world:current-project-root test-dir])
|
|
(check-equal? ((dynamic-require test-source 'proc)) "fooXbarXzam")) |