]> gitweb.factorcode.org Git - factor.git/blob - basis/alien/libraries/finder/macosx/macosx-tests.factor
alien.libraries.finder: split into sub-vocabularies and implement macosx better.
[factor.git] / basis / alien / libraries / finder / macosx / macosx-tests.factor
1
2 USING: sequences tools.test ;
3
4 IN: alien.libraries.finder.macosx
5
6 {
7     {
8         f
9         f
10         f
11         f
12         T{ framework-info f "Location" "Name.framework/Name" "Name" f f }
13         T{ framework-info f "Location" "Name.framework/Name_suffix" "Name" f "suffix" }
14         f
15         f
16         T{ framework-info f "Location" "Name.framework/Versions/A/Name" "Name" "A" f }
17         T{ framework-info f "Location" "Name.framework/Versions/A/Name_suffix" "Name" "A" "suffix" }
18     }
19 } [
20     {
21         "broken/path"
22         "broken/path/_suffix"
23         "Location/Name.framework"
24         "Location/Name.framework/_suffix"
25         "Location/Name.framework/Name"
26         "Location/Name.framework/Name_suffix"
27         "Location/Name.framework/Versions"
28         "Location/Name.framework/Versions/A"
29         "Location/Name.framework/Versions/A/Name"
30         "Location/Name.framework/Versions/A/Name_suffix"
31     } [ <framework-info> ] map
32 ] unit-test
33
34 {
35     {
36         "/usr/lib/libSystem.dylib"
37         "/System/Library/Frameworks/System.framework/System"
38     }
39 } [
40     {
41         "libSystem.dylib"
42         "System.framework/System"
43     } [ dyld-find ] map
44 ] unit-test