Add testcase for sibling modules.

Closes PR 13155.
This commit is contained in:
Eric Dobson 2013-03-25 22:13:41 -07:00
parent df00bbb194
commit ecec724747

View File

@ -0,0 +1,15 @@
#lang racket/base
(module defs typed/racket/base
(provide foo)
(: foo Integer)
(define foo 4)
)
(module private-defs typed/racket/base
(require (submod ".." defs))
(provide foo)
)
(require 'private-defs)
foo