Add case-insensitive testing option to $lt, $lte, $gt and $gte

This commit is contained in:
Bob Swift
2022-05-26 11:59:40 -06:00
parent ea4ab0d993
commit 6e61ac6ce4
2 changed files with 48 additions and 12 deletions

View File

@@ -658,6 +658,12 @@ class ScriptParserTest(PicardTestCase):
self.assertScriptResultEquals("$gt(A,a,text)", "", context)
self.assertScriptResultEquals("$gt(a,A,text)", "1", context)
# Test case insensitive arguments ("nocase" processing)
self.assertScriptResultEquals("$gt(a,B,nocase)", "", context)
self.assertScriptResultEquals("$gt(A,b,nocase)", "", context)
self.assertScriptResultEquals("$gt(B,a,nocase)", "1", context)
self.assertScriptResultEquals("$gt(b,A,nocase)", "1", context)
# Test unknown processing type
self.assertScriptResultEquals("$gt(2,1,unknown)", "", context)
@@ -742,6 +748,14 @@ class ScriptParserTest(PicardTestCase):
self.assertScriptResultEquals("$gte(A,a,text)", "", context)
self.assertScriptResultEquals("$gte(a,A,text)", "1", context)
# Test case insensitive arguments ("nocase" processing)
self.assertScriptResultEquals("$gte(a,B,nocase)", "", context)
self.assertScriptResultEquals("$gte(A,b,nocase)", "", context)
self.assertScriptResultEquals("$gte(B,a,nocase)", "1", context)
self.assertScriptResultEquals("$gte(b,A,nocase)", "1", context)
self.assertScriptResultEquals("$gte(a,A,nocase)", "1", context)
self.assertScriptResultEquals("$gte(A,a,nocase)", "1", context)
# Test unknown processing type
self.assertScriptResultEquals("$gte(2,1,unknown)", "", context)
@@ -827,6 +841,12 @@ class ScriptParserTest(PicardTestCase):
self.assertScriptResultEquals("$lt(A,a,text)", "1", context)
self.assertScriptResultEquals("$lt(a,A,text)", "", context)
# Test case insensitive arguments ("nocase" processing)
self.assertScriptResultEquals("$lt(a,B,nocase)", "1", context)
self.assertScriptResultEquals("$lt(A,b,nocase)", "1", context)
self.assertScriptResultEquals("$lt(B,a,nocase)", "", context)
self.assertScriptResultEquals("$lt(b,A,nocase)", "", context)
# Test unknown processing type
self.assertScriptResultEquals("$lt(1,2,unknown)", "", context)
@@ -908,6 +928,14 @@ class ScriptParserTest(PicardTestCase):
self.assertScriptResultEquals("$lte(A,a,text)", "1", context)
self.assertScriptResultEquals("$lte(a,A,text)", "", context)
# Test case insensitive arguments ("nocase" processing)
self.assertScriptResultEquals("$lte(a,B,nocase)", "1", context)
self.assertScriptResultEquals("$lte(A,b,nocase)", "1", context)
self.assertScriptResultEquals("$lte(B,a,nocase)", "", context)
self.assertScriptResultEquals("$lte(b,A,nocase)", "", context)
self.assertScriptResultEquals("$lte(a,A,nocase)", "1", context)
self.assertScriptResultEquals("$lte(A,a,nocase)", "1", context)
# Test unknown processing type
self.assertScriptResultEquals("$lte(1,2,unknown)", "", context)