suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

.

Browse Source 
original commit: 452b4a2f208d1537aa707936d38c2c5f1e1af87c
This commit is contained in:
Robby Findler 2004-04-04 14:49:09 +00:00
parent c87684a141
commit a1d43601c2
1 changed files with 7 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
collects/tests/mzscheme/net.ss
View File

@ -108,6 +108,13 @@
(test-c-u/r (string->url "http://www.drscheme.org/a/b/c/d/index.html")
(string->url "http://www.drscheme.org/a/b/c/")
"d/index.html")
(test-c-u/r (string->url "file:///a/b/c/d/index.html")
(string->url "file:///a/b/c/")
"d/index.html")
(test-c-u/r (string->url "file:///a/b/d/index.html")
(string->url "file:///a/b/c")
"d/index.html")
)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;