Checkpoint

tests/parser/OperatorParserTests.kt

@@ -26,4 +26,17 @@ class OperatorParserTests {
 
         assertEquals(Structure(Atom(","), listOf(Atom("a"), Atom("b"))), result, "Expected atom 'a, b'")
     }
+
+    class BodyParser : TermsGrammar() {
+        override val rootParser: Parser<Any> by body
+    }
+
+    @Test
+    fun `parse equality`() {
+        val input = "a = b"
+
+        val result = BodyParser().parseToEnd(input)
+
+        assertEquals(Structure(Atom("="), listOf(Atom("a"), Atom("b"))), result, "Expected atom 'a = b'")
+    }
 }

tests/parser/grammars/LogicGrammarTests.kt

@@ -129,4 +129,16 @@ class LogicGrammarTests {
         val conjunction = rule.body as CompoundTerm
         assertEquals("invited/2", (conjunction.arguments[0] as CompoundTerm).functor, "Expected functor 'invited/2'")
     }
+
+    @Test
+    fun `parse constraints`() {
+        val input = ":- a."
+
+        val result = parser.parseToEnd(input)
+
+        assertEquals(1, result.size, "Expected 1 rule")
+        assertTrue(result[0] is Rule, "Expected a rule")
+        val rule = result[0] as Rule
+        assertEquals("/_", rule.head.functor, "Expected a constraint")
+    }
 }

tests/parser/grammars/TermsGrammarTests.kt

@@ -2,9 +2,12 @@ package parser.grammars
 
 import com.github.h0tk3y.betterParse.grammar.Grammar
 import com.github.h0tk3y.betterParse.grammar.parseToEnd
+import com.github.h0tk3y.betterParse.parser.Parser
 import org.junit.jupiter.api.Assertions
+import org.junit.jupiter.api.Assertions.assertTrue
 import org.junit.jupiter.api.BeforeEach
 import org.junit.jupiter.api.Test
+import org.junit.jupiter.api.assertDoesNotThrow
 import org.junit.jupiter.params.ParameterizedTest
 import org.junit.jupiter.params.provider.ValueSource
 import prolog.ast.arithmetic.Float
@@ -14,6 +17,7 @@ import prolog.ast.terms.Structure
 import prolog.ast.terms.Term
 import prolog.ast.terms.Variable
 import prolog.logic.equivalent
+import kotlin.test.assertEquals
 
 class TermsGrammarTests {
     private lateinit var parser: Grammar<Term>
@@ -167,9 +171,12 @@ class TermsGrammarTests {
 
         val result = parser.parseToEnd(input)
 
-        Assertions.assertTrue(
-            equivalent(Float(-42.0f), result, emptyMap()),
-            "Expected float '-42.0'"
-        )
+        assertEquals(Float(-42.0f), result, "Expected float '-42.0'")
+    }
+
+    @ParameterizedTest
+    @ValueSource(strings = ["got_an_a(Student)", "grade(Student, Grade)"])
+    fun `parse unification`(input: String) {
+        assertDoesNotThrow { parser.parseToEnd(input) }
     }
 }