added test case for haskell language

CodeEditApp · Oct 3, 2022 · ad60569 · ad60569
1 parent 3ccfd3c
commit ad60569
Showing 1 changed file with 9 additions and 0 deletions.
diff --git a/Tests/CodeEditTextViewTests/CodeEditTextViewTests.swift b/Tests/CodeEditTextViewTests/CodeEditTextViewTests.swift
@@ -125,6 +125,15 @@ final class CodeEditTextViewTests: XCTestCase {
         XCTAssertEqual(language.id, .goMod)
     }
 
+    // MARK: Haskell
+
+    func test_CodeLanguageHaskell() throws {
+        let url = URL(fileURLWithPath: "~/path/to/file.hs")
+        let language = CodeLanguage.detectLanguageFrom(url: url)
+
+        XCTAssertEqual(language.id, .haskell)
+    }
+
     // MARK: HTML
 
     func test_CodeLanguageHTML() throws {