@@ -199,34 +199,47 @@ final class TripleTests: XCTestCase {
199199
200200 T = Triple ( " arm-none-none-eabi " )
201201 XCTAssertEqual ( T . arch, Triple . Arch. arm)
202+ XCTAssertEqual ( T . subArch, nil )
202203 XCTAssertEqual ( T . vendor, nil )
203204 XCTAssertEqual ( T . os, . noneOS)
204205 XCTAssertEqual ( T . environment, Triple . Environment. eabi)
205206
206207 T = Triple ( " arm-none-unknown-eabi " )
207208 XCTAssertEqual ( T . arch, Triple . Arch. arm)
209+ XCTAssertEqual ( T . subArch, nil )
208210 XCTAssertEqual ( T . vendor, nil )
209211 XCTAssertEqual ( T . os, nil )
210212 XCTAssertEqual ( T . environment, Triple . Environment. eabi)
211213
212214 T = Triple ( " arm-none-linux-musleabi " )
213215 XCTAssertEqual ( T . arch, Triple . Arch. arm)
216+ XCTAssertEqual ( T . subArch, nil )
214217 XCTAssertEqual ( T . vendor, nil )
215218 XCTAssertEqual ( T . os, Triple . OS. linux)
216219 XCTAssertEqual ( T . environment, Triple . Environment. musleabi)
217220
218221 T = Triple ( " armv6hl-none-linux-gnueabi " )
219222 XCTAssertEqual ( T . arch, Triple . Arch. arm)
223+ XCTAssertEqual ( T . subArch, nil )
220224 XCTAssertEqual ( T . os, Triple . OS. linux)
221225 XCTAssertEqual ( T . vendor, nil )
222226 XCTAssertEqual ( T . environment, Triple . Environment. gnueabi)
223227
224228 T = Triple ( " armv7hl-none-linux-gnueabi " )
225229 XCTAssertEqual ( T . arch, Triple . Arch. arm)
230+ XCTAssertEqual ( T . subArch, nil )
226231 XCTAssertEqual ( T . os, Triple . OS. linux)
227232 XCTAssertEqual ( T . vendor, nil )
228233 XCTAssertEqual ( T . environment, Triple . Environment. gnueabi)
229234
235+ T = Triple ( " armv7em-apple-none-macho " )
236+ XCTAssertEqual ( T . arch, Triple . Arch. arm)
237+ XCTAssertEqual ( T . subArch, Triple . SubArch. arm ( . v7em) )
238+ XCTAssertEqual ( T . vendor, . apple)
239+ XCTAssertEqual ( T . os, Triple . OS. noneOS)
240+ XCTAssertEqual ( T . environment, nil )
241+ XCTAssertEqual ( T . objectFormat, Triple . ObjectFormat. macho)
242+
230243 T = Triple ( " amdil-unknown-unknown " )
231244 XCTAssertEqual ( T . arch, Triple . Arch. amdil)
232245 XCTAssertEqual ( T . vendor, nil )
0 commit comments