another test on cu/sig tags

original commit: 040787a1f699c937b8f4a1c5f2bd9b6612667b3b
1998-03-15 14:27:51 +00:00 · 1998-03-15 14:27:51 +00:00 · 1aa98e5fc9
commit 1aa98e5fc9
parent 5a5a4dd657
1 changed files with 4 additions and 0 deletions
--- a/collects/tests/mzscheme/unitsig.ss
+++ b/collects/tests/mzscheme/unitsig.ss
@ -146,6 +146,10 @@
 (test #t unit/sig? (compound-unit/sig (import)
 		      (link [compound-unit : () ((unit/sig () (import) 10))])
 		      (export)))
+(test #t unit/sig? (compound-unit/sig 
+		    (import)
+		    (link [export : () ((unit/sig () (import) 10))])
+		    (export)))

 ; Include: