/[svn]/linuxsampler/trunk/src/scriptvm/tests/NKSPTest.cpp

Diff of /linuxsampler/trunk/src/scriptvm/tests/NKSPTest.cpp

Parent Directory | Revision Log | View Patch Patch

-revision 3577 by schoenebeck,
Wed Aug 28 15:23:23 2019 UTC
+revision 3581 by schoenebeck,
Fri Aug 30 11:40:25 2019 UTC
 Line 31 
 using namespace std;
  struct RunScriptOpt {
      String code;
      bool expectParseError;
+     bool expectParseWarning;
      bool expectRuntimeError;
      bool expectNoExitResult;
+     bool expectExitResultIsInt;
+     bool expectExitResultIsReal;
      bool prohibitExitFunctionArguments;
      optional<vmint> expectIntExitResult;
      optional<bool> expectBoolExitResult;
      optional<vmfloat> expectRealExitResult;
      optional<String> expectStringExitResult;
+     vector<MetricPrefix_t> expectExitResultUnitPrefix;
+     optional<StdUnit_t> expectExitResultUnit;
+     optional<bool> expectExitResultFinal;
  };
  static void runScript(const RunScriptOpt& opt) {
-Line 49 
 static void runScript(const RunScriptOpt
+Line 55 
 static void runScript(const RunScriptOpt
          vm.loadScript(opt.code)
      );
      vector<ParserIssue> errors = parserCtx->errors();
+     vector<ParserIssue> warnings = parserCtx->warnings();
      if (opt.expectParseError) {
          TEST_ASSERT(!errors.empty());
          return;
-Line 58 
 static void runScript(const RunScriptOpt
+Line 65 
 static void runScript(const RunScriptOpt
          }
          TEST_ASSERT(errors.empty());
      }
+     if (opt.expectParseWarning) {
+         TEST_ASSERT(!warnings.empty());
+     } else {
+         for (ParserIssue& wrn : warnings) {
+             wrn.dump();
+         }
+     }
      TEST_ASSERT(parserCtx->eventHandler(0));
      unique_ptr<VMExecContext> execCtx(
          vm.createExecContext(&*parserCtx)
-Line 74 
 static void runScript(const RunScriptOpt
+Line 88 
 static void runScript(const RunScriptOpt
              VMExpr* resExpr = execCtx->exitResult();
              TEST_ASSERT(!resExpr);
          }
+         if (opt.expectExitResultIsInt) {
+             VMExpr* resExpr = execCtx->exitResult();
+             TEST_ASSERT(resExpr);
+             TEST_ASSERT(resExpr->exprType() == INT_EXPR);
+         }
+         if (opt.expectExitResultIsReal) {
+             VMExpr* resExpr = execCtx->exitResult();
+             TEST_ASSERT(resExpr);
+             TEST_ASSERT(resExpr->exprType() == REAL_EXPR);
+         }
          if (opt.expectIntExitResult) {
              VMExpr* resExpr = execCtx->exitResult();
              TEST_ASSERT(resExpr);
-Line 102 
 static void runScript(const RunScriptOpt
+Line 126 
 static void runScript(const RunScriptOpt
              TEST_ASSERT(resExpr->exprType() == STRING_EXPR);
              TEST_ASSERT(resExpr->asString()->evalStr() == *opt.expectStringExitResult);
          }
+         if (opt.expectExitResultUnit) {
+             VMExpr* resExpr = execCtx->exitResult();
+             TEST_ASSERT(resExpr);
+             VMScalarNumberExpr* numberExpr = resExpr->asScalarNumberExpr();
+             TEST_ASSERT(numberExpr);
+             TEST_ASSERT(numberExpr->unitType() == *opt.expectExitResultUnit);
+         }
+         if (!opt.expectExitResultUnitPrefix.empty()) {
+             VMExpr* resExpr = execCtx->exitResult();
+             TEST_ASSERT(resExpr);
+             VMScalarNumberExpr* numberExpr = resExpr->asScalarNumberExpr();
+             TEST_ASSERT(numberExpr);
+             auto prefixes = opt.expectExitResultUnitPrefix;
+             if (*prefixes.rbegin() != VM_NO_PREFIX)
+                 prefixes.push_back(VM_NO_PREFIX); // VM_NO_PREFIX termination required by unitFactr() call
+             vmfloat expectedFactor = VMUnit::unitFactor(&prefixes[0]);
+             vmfloat actualFactor = numberExpr->unitFactor();
+             if (sizeof(vmfloat) == sizeof(float)) {
+                 TEST_ASSERT(RTMath::fEqual32(expectedFactor, actualFactor));
+             } else {
+                 TEST_ASSERT(RTMath::fEqual64(expectedFactor, actualFactor));
+             }
+         }
+         if (opt.expectExitResultFinal) {
+             VMExpr* resExpr = execCtx->exitResult();
+             TEST_ASSERT(resExpr);
+             VMScalarNumberExpr* numberExpr = resExpr->asScalarNumberExpr();
+             TEST_ASSERT(numberExpr);
+             TEST_ASSERT(numberExpr->isFinal() == *opt.expectExitResultFinal);
+         }
      }
  }
-Line 231 
 end on
+Line 285 
 end on
          .expectRealExitResult = 6.9
      });
+     // std unit tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42s)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42Hz)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultUnit = VM_HERTZ
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42B)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultUnit = VM_BEL
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42us)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultUnitPrefix = { VM_MICRO },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42ms)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultUnitPrefix = { VM_MILLI },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42cs)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultUnitPrefix = { VM_CENTI },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42ds)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultUnitPrefix = { VM_DECI },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42das)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultUnitPrefix = { VM_DECA },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42hs)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultUnitPrefix = { VM_HECTO },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42ks)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultUnitPrefix = { VM_KILO },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42s)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultUnitPrefix = { VM_NO_PREFIX },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42uHz)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultUnitPrefix = { VM_MICRO },
+         .expectExitResultUnit = VM_HERTZ
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42mHz)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultUnitPrefix = { VM_MILLI },
+         .expectExitResultUnit = VM_HERTZ
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42cHz)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultUnitPrefix = { VM_CENTI },
+         .expectExitResultUnit = VM_HERTZ
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42dHz)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultUnitPrefix = { VM_DECI },
+         .expectExitResultUnit = VM_HERTZ
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42daHz)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultUnitPrefix = { VM_DECA },
+         .expectExitResultUnit = VM_HERTZ
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42hHz)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultUnitPrefix = { VM_HECTO },
+         .expectExitResultUnit = VM_HERTZ
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42kHz)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultUnitPrefix = { VM_KILO },
+         .expectExitResultUnit = VM_HERTZ
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42Hz)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultUnitPrefix = { VM_NO_PREFIX },
+         .expectExitResultUnit = VM_HERTZ
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42uB)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultUnitPrefix = { VM_MICRO },
+         .expectExitResultUnit = VM_BEL
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42mB)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultUnitPrefix = { VM_MILLI },
+         .expectExitResultUnit = VM_BEL
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42cB)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultUnitPrefix = { VM_CENTI },
+         .expectExitResultUnit = VM_BEL
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42dB)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultUnitPrefix = { VM_DECI },
+         .expectExitResultUnit = VM_BEL
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42daB)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultUnitPrefix = { VM_DECA },
+         .expectExitResultUnit = VM_BEL
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42hB)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultUnitPrefix = { VM_HECTO },
+         .expectExitResultUnit = VM_BEL
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42kB)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultUnitPrefix = { VM_KILO },
+         .expectExitResultUnit = VM_BEL
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42B)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultUnitPrefix = { VM_NO_PREFIX },
+         .expectExitResultUnit = VM_BEL
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42udB)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultUnitPrefix = { VM_MICRO, VM_DECI },
+         .expectExitResultUnit = VM_BEL
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42mdB)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultUnitPrefix = { VM_MILLI, VM_DECI },
+         .expectExitResultUnit = VM_BEL
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42cdB)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultUnitPrefix = { VM_CENTI, VM_DECI },
+         .expectExitResultUnit = VM_BEL
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42ddB)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultUnitPrefix = { VM_DECI, VM_DECI },
+         .expectExitResultUnit = VM_BEL
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42dadB)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultUnitPrefix = { VM_DECA, VM_DECI },
+         .expectExitResultUnit = VM_BEL
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42hdB)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultUnitPrefix = { VM_HECTO, VM_DECI },
+         .expectExitResultUnit = VM_BEL
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42kdB)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultUnitPrefix = { VM_KILO, VM_DECI },
+         .expectExitResultUnit = VM_BEL
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := 42mdB
+   exit($foo)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultUnitPrefix = { VM_MILLI, VM_DECI },
+         .expectExitResultUnit = VM_BEL
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(3.14s)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 3.14,
+         .expectExitResultUnitPrefix = { VM_NO_PREFIX },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(3.14us)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 3.14,
+         .expectExitResultUnitPrefix = { VM_MICRO },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(3.14ms)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 3.14,
+         .expectExitResultUnitPrefix = { VM_MILLI },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(-0.1B)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = -0.1,
+         .expectExitResultUnitPrefix = { VM_NO_PREFIX },
+         .expectExitResultUnit = VM_BEL
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(-0.1dB)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = -0.1,
+         .expectExitResultUnitPrefix = { VM_DECI },
+         .expectExitResultUnit = VM_BEL
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(-0.1mdB)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = -0.1,
+         .expectExitResultUnitPrefix = { VM_MILLI, VM_DECI },
+         .expectExitResultUnit = VM_BEL
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~foo := -0.1mdB
+   exit(~foo)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = -0.1,
+         .expectExitResultUnitPrefix = { VM_MILLI, VM_DECI },
+         .expectExitResultUnit = VM_BEL
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~foo := 0.0dB
+   ~foo := -0.1mdB
+   exit(~foo)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = -0.1,
+         .expectExitResultUnitPrefix = { VM_MILLI, VM_DECI },
+         .expectExitResultUnit = VM_BEL
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~foo := 0.0dB
+   ~foo := -0.1Hz
+   exit(~foo)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // assigning different unit type to a variable is not allowed
+     });
+     // 'final' ('!') operator tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(!42)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultFinal = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultFinal = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := !42
+   exit($foo)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultFinal = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := 42
+   exit($foo)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 42,
+         .expectExitResultFinal = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~foo := !3.14
+   exit(~foo)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 3.14,
+         .expectExitResultFinal = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~foo := 3.14
+   exit(~foo)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 3.14,
+         .expectExitResultFinal = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~foo := !3.14mdB
+   exit(~foo)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 3.14,
+         .expectExitResultUnitPrefix = { VM_MILLI, VM_DECI },
+         .expectExitResultUnit = VM_BEL,
+         .expectExitResultFinal = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~foo := !0.0mdB
+   ~foo := !3.14mdB
+   exit(~foo)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 3.14,
+         .expectExitResultUnitPrefix = { VM_MILLI, VM_DECI },
+         .expectExitResultUnit = VM_BEL,
+         .expectExitResultFinal = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~foo := !0.0mdB
+   ~foo := 3.14mdB
+   exit(~foo)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // assigning non-final to a final variable not allowed
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~foo := 0.0mdB
+   ~foo := !3.14mdB
+   exit(~foo)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // assigning final to a non-final variable not allowed
+     });
      #if !SILENT_TEST
      std::cout << std::endl;
      #endif
-Line 241 
 static void testStringConcatOperator() {
+Line 897 
 static void testStringConcatOperator() {
      std::cout << "UNIT TEST: string concatenation (&) operator\n";
      #endif
+     // strings only tests ...
      runScript({
          .code = R"NKSP_CODE(
  on init
-Line 251 
 end on
+Line 909 
 end on
          .expectStringExitResult = "foo bar"
      });
+     // integer tests ...
      runScript({
          .code = R"NKSP_CODE(
  on init
-Line 272 
 end on
+Line 932 
 end on
          .expectStringExitResult = "foo bar 123"
      });
+     // real number tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare @s := "foo" & " bar" & " " & 1.23
+   exit(@s)
+ end on
+ )NKSP_CODE",
+         .expectStringExitResult = "foo bar 1.23"
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~r := 3.14
+   declare @s := "foo" & " bar" & " " & ~r
+   exit(@s)
+ end on
+ )NKSP_CODE",
+         .expectStringExitResult = "foo bar 3.14"
+     });
+     // std unit tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $i := 500Hz
+   declare @s := "foo" & " bar" & " " & $i
+   exit(@s)
+ end on
+ )NKSP_CODE",
+         .expectStringExitResult = "foo bar 500Hz"
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~r := 3.14s
+   declare @s := "foo" & " bar" & " " & ~r
+   exit(@s)
+ end on
+ )NKSP_CODE",
+         .expectStringExitResult = "foo bar 3.14s"
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~r := -22.3mdB
+   declare @s := "foo" & " bar" & " " & ~r
+   exit(@s)
+ end on
+ )NKSP_CODE",
+         .expectStringExitResult = "foo bar -22.3mdB"
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $i := 20us
+   declare @s := "foo" & " bar" & " " & $i
+   exit(@s)
+ end on
+ )NKSP_CODE",
+         .expectStringExitResult = "foo bar 20us"
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $i := 20kHz
+   declare @s := "foo" & " bar" & " " & $i
+   exit(@s)
+ end on
+ )NKSP_CODE",
+         .expectStringExitResult = "foo bar 20kHz"
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $i := -6dB
+   declare @s := "foo" & " bar" & " " & $i
+   exit(@s)
+ end on
+ )NKSP_CODE",
+         .expectStringExitResult = "foo bar -6dB"
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $i := 1us * 1d
+   declare @s := "foo" & " bar" & " " & $i
+   exit(@s)
+ end on
+ )NKSP_CODE",
+         .expectStringExitResult = "foo bar 1*10^-7s"
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~r := 12.4mc
+   declare @s := "foo" & " bar" & " " & ~r
+   exit(@s)
+ end on
+ )NKSP_CODE",
+         .expectStringExitResult = "foo bar 12.4mc"
+     });
      #if !SILENT_TEST
      std::cout << std::endl;
      #endif
-Line 324 
 end on
+Line 1097 
 end on
          .expectRealExitResult = 99.3
      });
+     // std unit tests
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := -87mdB
+   exit(-$foo)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 87,
+         .expectExitResultUnitPrefix = { VM_MILLI, VM_DECI },
+         .expectExitResultUnit = VM_BEL
+     });
+     // 'final' ('!') operator tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := !-87
+   exit(-$foo)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 87,
+         .expectExitResultFinal = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := -87
+   exit(-$foo)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 87,
+         .expectExitResultFinal = false
+     });
      #if !SILENT_TEST
      std::cout << std::endl;
      #endif
-Line 392 
 end on
+Line 1203 
 end on
          .expectRealExitResult = -1.8
      });
+     // std unit tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42ms + 145ms)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 187,
+         .expectExitResultUnitPrefix = { VM_MILLI },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1s + 145ms)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 1145,
+         .expectExitResultUnitPrefix = { VM_MILLI },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42ms + 145)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units must match for + operator
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42 + 145ms)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units must match for + operator
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42Hz + 145s)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units must match for + operator
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42.1ms + 145.3ms)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 187.4,
+         .expectExitResultUnitPrefix = { VM_MILLI },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1.1s + 145.0ms)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 1245.0,
+         .expectExitResultUnitPrefix = { VM_MILLI },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42.1ms + 145.3)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units must match for + operator
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42.0 + 145.0ms)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units must match for + operator
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(42.0Hz + 145.0s)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units must match for + operator
+     });
+     // 'final' ('!') operator tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(!4 + !3)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 7,
+         .expectExitResultFinal = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(4 + 3)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 7,
+         .expectExitResultFinal = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(!4.1 + !3.3)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 7.4,
+         .expectExitResultFinal = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(4.1 + 3.3)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 7.4,
+         .expectExitResultFinal = false
+     });
      #if !SILENT_TEST
      std::cout << std::endl;
      #endif
-Line 469 
 end on
+Line 1422 
 end on
          .expectRealExitResult = -21.1
      });
+     // std unit tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1000ms - 145ms)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 855,
+         .expectExitResultUnitPrefix = { VM_MILLI },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1s - 145ms)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 855,
+         .expectExitResultUnitPrefix = { VM_MILLI },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1s - 145)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units must match for - operator
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1 - 145s)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units must match for - operator
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1ms - 145mB)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units must match for - operator
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1.0ms - 0.1ms)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 0.9,
+         .expectExitResultUnitPrefix = { VM_MILLI },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1.1s - 106.0ms)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 994.0,
+         .expectExitResultUnitPrefix = { VM_MILLI },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1100.0ms - 0.106s)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 994.0,
+         .expectExitResultUnitPrefix = { VM_MILLI },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1.0s - 145.0)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units must match for - operator
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1.0 - 145.0s)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units must match for - operator
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1.0ms - 145.0mB)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units must match for - operator
+     });
+     // 'final' ('!') operator tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(!5 - !3)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 2,
+         .expectExitResultFinal = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(5 - 3)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 2,
+         .expectExitResultFinal = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(!5.9 - !3.3)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 2.6,
+         .expectExitResultFinal = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(5.9 - 3.3)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 2.6,
+         .expectExitResultFinal = false
+     });
      #if !SILENT_TEST
      std::cout << std::endl;
      #endif
-Line 542 
 end on
+Line 1648 
 end on
          .expectParseError = true // mod operator prohibits real numbers ATM
      });
+     // std unit tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(10s mod 8)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // mod operator prohibits std units ATM
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(10 mod 8s)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // mod operator prohibits std units ATM
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(10s mod 8s)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // mod operator prohibits std units ATM
+     });
+     // 'final' ('!') operator tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(!10 mod !8)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 2,
+         .expectExitResultFinal = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(10 mod 8)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 2,
+         .expectExitResultFinal = false
+     });
      #if !SILENT_TEST
      std::cout << std::endl;
      #endif
-Line 649 
 end on
+Line 1806 
 end on
          .expectParseError = true // mixed int * real forbidden ATM
      });
+     // std unit tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(10ms * 8)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 80,
+         .expectExitResultUnitPrefix = { VM_MILLI },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(10 * 8ms)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 80,
+         .expectExitResultUnitPrefix = { VM_MILLI },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(10s * 8s)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units on both sides not allowed for * ATM
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(10cs * 8d)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 80,
+         .expectExitResultUnitPrefix = { VM_MILLI },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(10m * 8ms)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 80,
+         .expectExitResultUnitPrefix = { VM_MICRO },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(10ms * 8k)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 80,
+         .expectExitResultUnitPrefix = { VM_NO_PREFIX },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(10.1ms * 8.0)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 80.8,
+         .expectExitResultUnitPrefix = { VM_MILLI },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(10.1 * 8.0ms)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 80.8,
+         .expectExitResultUnitPrefix = { VM_MILLI },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(10.0s * 8.0s)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units on both sides not allowed for * ATM
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(10.1ds * 8.0c)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 80.8,
+         .expectExitResultUnitPrefix = { VM_MILLI },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(10.1m * 8.0ms)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 80.8,
+         .expectExitResultUnitPrefix = { VM_MICRO },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(10.1m * 8.0ks)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 80.8,
+         .expectExitResultUnitPrefix = { VM_NO_PREFIX },
+         .expectExitResultUnit = VM_SECOND
+     });
+     // 'final' ('!') operator tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(!10 * !8)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 80,
+         .expectExitResultFinal = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(10 * 8)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 80,
+         .expectExitResultFinal = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(!10 * 8)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 80,
+         .expectExitResultFinal = true,
+         .expectParseWarning = true // since final only on one side, result will be final though
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(10 * !8)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 80,
+         .expectExitResultFinal = true,
+         .expectParseWarning = true // since final only on one side, result will be final though
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(!10.1 * !8.0)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 80.8,
+         .expectExitResultFinal = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(10.1 * 8.0)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 80.8,
+         .expectExitResultFinal = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(!10.1 * 8.0)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 80.8,
+         .expectExitResultFinal = true,
+         .expectParseWarning = true // since final only on one side, result will be final though
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(10.1 * !8.0)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 80.8,
+         .expectExitResultFinal = true,
+         .expectParseWarning = true // since final only on one side, result will be final though
+     });
      #if !SILENT_TEST
      std::cout << std::endl;
      #endif
-Line 756 
 end on
+Line 2129 
 end on
          .expectParseError = true // mixed int / real forbidden ATM
      });
+     // std unit tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(-27us / 3)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = -9,
+         .expectExitResultUnitPrefix = { VM_MICRO },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(-27mdB / 3mdB)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = -9,
+         .expectExitResultUnitPrefix = { VM_NO_PREFIX },
+         .expectExitResultUnit = VM_NO_UNIT
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(-27s / 3m)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = -9,
+         .expectExitResultUnitPrefix = { VM_KILO },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(-27us / 3m)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = -9,
+         .expectExitResultUnitPrefix = { VM_MILLI },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(-27 / 3s)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // illegal unit type arrangement for divisions
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(-27s / 3Hz)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // unit types are not matching
+     });
+     // 'final' ('!') operator tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(!-27 / !3)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = -9,
+         .expectExitResultFinal = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(-27 / 3)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = -9,
+         .expectExitResultFinal = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(!-27 / 3)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = -9,
+         .expectExitResultFinal = true,
+         .expectParseWarning = true // final only on one side, result will be final though
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(-27 / !3)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = -9,
+         .expectExitResultFinal = true,
+         .expectParseWarning = true // final only on one side, result will be final though
+     });
      #if !SILENT_TEST
      std::cout << std::endl;
      #endif
-Line 916 
 end on
+Line 2397 
 end on
          .expectBoolExitResult = false
      });
+     // std unit tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(13ms < 14ms)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(14ms < 13ms)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1s < 990ms)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(990ms < 1s)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1000ms < 1s)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1s < 1000ms)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1s < 1)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units on both sides must match
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1 < 1s)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units on both sides must match
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1Hz < 1B)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units on both sides must match
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(13.0ms < 13.1ms)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(13.1ms < 13.0ms)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(0.9s < 600.0ms)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(600.0ms < 0.9s)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(5.1kHz < 5100.0Hz)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(5100.0Hz < 5.1kHz)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1.0Hz < 1.1)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units on both sides must match
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1.2 < 1.34mdB)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units on both sides must match
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(9.23us < 3.14kHz)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units on both sides must match
+     });
+     // 'final' ('!') operator tests ...
+     // (should always yield in false for relation operators)
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(!-4 < !3)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true,
+         .expectExitResultFinal = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(-4 < 3)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true,
+         .expectExitResultFinal = false
+     });
      #if !SILENT_TEST
      std::cout << std::endl;
      #endif
-Line 1076 
 end on
+Line 2744 
 end on
          .expectBoolExitResult = true
      });
+     // std unit tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(13ms > 14ms)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(14ms > 13ms)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1s > 990ms)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(990ms > 1s)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1000ms > 1s)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1s > 1000ms)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1s > 1)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units on both sides must match
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1 > 1s)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units on both sides must match
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1Hz > 1B)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units on both sides must match
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(13.0ms > 13.1ms)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(13.1ms > 13.0ms)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(0.9s > 600.0ms)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(600.0ms > 0.9s)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(5.1kHz > 5100.0Hz)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(5100.0Hz > 5.1kHz)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1.0Hz > 1.1)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units on both sides must match
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1.2 > 1.34mdB)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units on both sides must match
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(9.23us > 3.14kHz)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units on both sides must match
+     });
+     // 'final' ('!') operator tests ...
+     // (should always yield in false for relation operators)
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(!-4 > !3)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false,
+         .expectExitResultFinal = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(-4 > 3)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false,
+         .expectExitResultFinal = false
+     });
      #if !SILENT_TEST
      std::cout << std::endl;
      #endif
-Line 1308 
 end on
+Line 3163 
 end on
          .expectBoolExitResult = true
      });
+     // std unit tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(13ms <= 14ms)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(14ms <= 13ms)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1s <= 990ms)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(990ms <= 1s)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1000ms <= 1s)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1s <= 1000ms)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1s <= 1)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units on both sides must match
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1 <= 1s)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units on both sides must match
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1Hz <= 1B)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units on both sides must match
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(13.0ms <= 13.1ms)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(13.1ms <= 13.0ms)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(0.9s <= 600.0ms)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(600.0ms <= 0.9s)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(5.1kHz <= 5100.0Hz)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(5100.0Hz <= 5.1kHz)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1.0Hz <= 1.1)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units on both sides must match
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1.2 <= 1.34mdB)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units on both sides must match
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(9.23us <= 3.14kHz)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units on both sides must match
+     });
+     // 'final' ('!') operator tests ...
+     // (should always yield in false for relation operators)
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(!-4 <= !3)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true,
+         .expectExitResultFinal = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(-4 <= 3)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true,
+         .expectExitResultFinal = false
+     });
      #if !SILENT_TEST
      std::cout << std::endl;
      #endif
-Line 1558 
 end on
+Line 3600 
 end on
          .expectBoolExitResult = true
      });
+     // std unit tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(13ms >= 14ms)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(14ms >= 13ms)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1s >= 990ms)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(990ms >= 1s)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1000ms >= 1s)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1s >= 1000ms)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1s >= 1)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units on both sides must match
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1 >= 1s)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units on both sides must match
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1Hz >= 1B)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units on both sides must match
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(13.0ms >= 13.1ms)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(13.1ms >= 13.0ms)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(0.9s >= 600.0ms)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(600.0ms >= 0.9s)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(5.1kHz >= 5100.0Hz)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(5100.0Hz >= 5.1kHz)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1.0Hz >= 1.1)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units on both sides must match
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1.2 >= 1.34mdB)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units on both sides must match
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(9.23us >= 3.14kHz)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units on both sides must match
+     });
+     // 'final' ('!') operator tests ...
+     // (should always yield in false for relation operators)
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(!-4 >= !3)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false,
+         .expectExitResultFinal = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(-4 >= 3)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false,
+         .expectExitResultFinal = false
+     });
      #if !SILENT_TEST
      std::cout << std::endl;
      #endif
-Line 1653 
 end on
+Line 3882 
 end on
          .expectBoolExitResult = false
      });
+     // deal with inaccuracy of float point
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~a := 0.165
+   declare ~b := 0.185
+   declare ~x := 0.1
+   declare ~y := 0.25
+   exit(~a + ~b = ~x + ~y) { both sides should actually be 0.35, they slightly deviate both though }
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true // our implementation of real number equal comparison should take care about floating point tolerance
+     });
+     // deal with inaccuracy of float point
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~a := 0.166
+   declare ~b := 0.185
+   declare ~x := 0.1
+   declare ~y := 0.25
+   exit(~a + ~b = ~x + ~y) { left side approx. 0.351, right side approx. 0.35 }
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
      // mixed type tests ...
      runScript({
-Line 1691 
 end on
+Line 3948 
 end on
          .expectBoolExitResult = false
      });
+     // std unit tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(13ms = 14ms)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(14ms = 13ms)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1s = 1ms)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1ms = 1s)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(3.14kHz = 3140Hz)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(3140Hz = 3.14kHz)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1s = 1)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units on both sides must match
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1 = 1s)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units on both sides must match
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1Hz = 1B)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units on both sides must match
+     });
+     // 'final' ('!') operator tests ...
+     // (should always yield in false for relation operators)
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(!-4 = !3)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false,
+         .expectExitResultFinal = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(-4 = 3)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false,
+         .expectExitResultFinal = false
+     });
      #if !SILENT_TEST
      std::cout << std::endl;
      #endif
-Line 1777 
 end on
+Line 4140 
 end on
          .expectBoolExitResult = true
      });
+     // deal with inaccuracy of float point
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~a := 0.165
+   declare ~b := 0.185
+   declare ~x := 0.1
+   declare ~y := 0.25
+         exit(~a + ~b # ~x + ~y) { both sides should actually be 0.35, they slightly deviate both though }
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false // our implementation of real number unequal comparison should take care about floating point tolerance
+     });
+     // deal with inaccuracy of float point
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~a := 0.166
+   declare ~b := 0.185
+   declare ~x := 0.1
+   declare ~y := 0.25
+         exit(~a + ~b # ~x + ~y) { left side approx. 0.351, right side approx. 0.35 }
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
      // mixed type tests ...
      runScript({
-Line 1815 
 end on
+Line 4206 
 end on
          .expectBoolExitResult = true
      });
+     // std unit tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(13ms # 14ms)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(14ms # 13ms)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1s # 1ms)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1ms # 1s)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(3.14kHz # 3140Hz)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(3140Hz # 3.14kHz)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1s # 1)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units on both sides must match
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1 # 1s)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units on both sides must match
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1Hz # 1B)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // units on both sides must match
+     });
+     // 'final' ('!') operator tests ...
+     // (should always yield in false for relation operators)
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(!-4 # !3)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true,
+         .expectExitResultFinal = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(-4 # 3)
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true,
+         .expectExitResultFinal = false
+     });
      #if !SILENT_TEST
      std::cout << std::endl;
      #endif
-Line 1914 
 end on
+Line 4411 
 end on
          .expectParseError = true // real numbers not allowed for this operator
      });
+     // std unit tests ...
+     // (not allowed for this operator)
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1s and 0)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // std units not allowed for this operator
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(0 and 1s)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // std units not allowed for this operator
+     });
+     // 'final' ('!') operator tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(!0 and !0)
+ end on
+ )NKSP_CODE",
+         .expectExitResultFinal = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(0 and 0)
+ end on
+ )NKSP_CODE",
+         .expectExitResultFinal = false
+     });
      #if !SILENT_TEST
      std::cout << std::endl;
      #endif
-Line 2013 
 end on
+Line 4551 
 end on
          .expectParseError = true // real numbers not allowed for this operator
      });
+     // std unit tests ...
+     // (not allowed for this operator)
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1s or 0)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // std units not allowed for this operator
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(0 or 1s)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // std units not allowed for this operator
+     });
+     // 'final' ('!') operator tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(!0 or !0)
+ end on
+ )NKSP_CODE",
+         .expectExitResultFinal = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(0 or 0)
+ end on
+ )NKSP_CODE",
+         .expectExitResultFinal = false
+     });
      #if !SILENT_TEST
      std::cout << std::endl;
      #endif
-Line 2064 
 end on
+Line 4643 
 end on
          .expectParseError = true // real numbers not allowed for this operator
      });
+     // std unit tests ...
+     // (not allowed for this operator)
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(not 1s)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // std units not allowed for this operator
+     });
+     // 'final' ('!') operator tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(not !1)
+ end on
+ )NKSP_CODE",
+         .expectExitResultFinal = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(not 1)
+ end on
+ )NKSP_CODE",
+         .expectExitResultFinal = false
+     });
      #if !SILENT_TEST
      std::cout << std::endl;
      #endif
-Line 2127 
 end on
+Line 4738 
 end on
          .expectParseError = true // real numbers not allowed for this operator
      });
+     // std unit tests ...
+     // (not allowed for this operator)
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1s .and. 1)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // std units not allowed for this operator
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1 .and. 1s)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // std units not allowed for this operator
+     });
+     // 'final' ('!') operator tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(!43 .and. !142)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 10,
+         .expectExitResultFinal = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(43 .and. 142)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 10,
+         .expectExitResultFinal = false
+     });
      #if !SILENT_TEST
      std::cout << std::endl;
      #endif
-Line 2199 
 end on
+Line 4853 
 end on
          .expectParseError = true // real numbers not allowed for this operator
      });
+     // std unit tests ...
+     // (not allowed for this operator)
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1s .or. 1)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // std units not allowed for this operator
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(1 .or. 1s)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // std units not allowed for this operator
+     });
+     // 'final' ('!') operator tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(!43 .or. !142)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 175,
+         .expectExitResultFinal = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(43 .or. 142)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 175,
+         .expectExitResultFinal = false
+     });
      #if !SILENT_TEST
      std::cout << std::endl;
      #endif
-Line 2259 
 end on
+Line 4956 
 end on
          .expectParseError = true // real numbers not allowed for this operator
      });
+     // std unit tests ...
+     // (not allowed for this operator)
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(.not. 1s)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // std units not allowed for this operator
+     });
+     // 'final' ('!') operator tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(.not. !0)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = -1,
+         .expectExitResultFinal = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(.not. 0)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = -1,
+         .expectExitResultFinal = false
+     });
      #if !SILENT_TEST
      std::cout << std::endl;
      #endif
-Line 2345 
 end on
+Line 5076 
 end on
          .expectRealExitResult = 20.8
      });
+     // std unit tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(4 * (2us + 3us) + 7ms)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 7020,
+         .expectExitResultUnitPrefix = { VM_MICRO },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $a := 4
+   declare $c := 3us
+   exit($a * (2us + $c) + 7ms)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 7020,
+         .expectExitResultUnitPrefix = { VM_MICRO },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $a := 4
+   declare $b := 2us
+   declare $c := 3us
+   exit($a * ($b + $c) + 7ms)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 7020,
+         .expectExitResultUnitPrefix = { VM_MICRO },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $a := 4
+   declare $b := 2us
+   declare $c := 3us
+   declare $d := 7ms
+   exit($a * ($b + $c) + 7ms)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 7020,
+         .expectExitResultUnitPrefix = { VM_MICRO },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $c := 3us
+   declare $a := 4
+   declare $d := 7ms
+   declare $b := 2us
+   exit($a * ($b + $c) + 7ms)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 7020,
+         .expectExitResultUnitPrefix = { VM_MICRO },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit(4.0 * (2.0mdB + 3.2mdB) / 2.0)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 10.4,
+         .expectExitResultUnitPrefix = { VM_MILLI, VM_DECI },
+         .expectExitResultUnit = VM_BEL
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~a := 2.0mdB
+   declare ~b := 3.2mdB
+   exit(4.0 * (~a + ~b) / 2.0)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 10.4,
+         .expectExitResultUnitPrefix = { VM_MILLI, VM_DECI },
+         .expectExitResultUnit = VM_BEL
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~b := 3.2mdB
+   declare ~a := 2.0mdB
+   exit(4.0 * (~a + ~b) / 2.0)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 10.4,
+         .expectExitResultUnitPrefix = { VM_MILLI, VM_DECI },
+         .expectExitResultUnit = VM_BEL
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~a := 4.0
+   declare ~b := 2.0mdB
+   declare ~c := 3.2mdB
+   declare ~d := 2.0
+   exit((~a * (~b + ~c) / ~d) + 1.1mdB)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 11.5,
+         .expectExitResultUnitPrefix = { VM_MILLI, VM_DECI },
+         .expectExitResultUnit = VM_BEL
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~c := 3.2mdB
+   declare ~a := 4.0
+   declare ~d := 2.0
+   declare ~b := 2.0mdB
+   exit(~a * (~b + ~c) / ~d + 1.1mdB)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 11.5,
+         .expectExitResultUnitPrefix = { VM_MILLI, VM_DECI },
+         .expectExitResultUnit = VM_BEL
+     });
+     // 'final' ('!') operator tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $a := 4
+   declare $b := !2us
+   declare $c := 3us
+   declare $d := 7ms
+   exit($a * ($b + $c) + 7ms)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 7020,
+         .expectExitResultUnitPrefix = { VM_MICRO },
+         .expectExitResultUnit = VM_SECOND,
+         .expectExitResultFinal = true,
+         .expectParseWarning = true // only one operand is defined as 'final', result will be final though
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $a := 4
+   declare $b := 2us
+   declare $c := !3us
+   declare $d := 7ms
+   exit($a * ($b + $c) + 7ms)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 7020,
+         .expectExitResultUnitPrefix = { VM_MICRO },
+         .expectExitResultUnit = VM_SECOND,
+         .expectExitResultFinal = true,
+         .expectParseWarning = true // only one operand is defined as 'final', result will be final though
+     });
      #if !SILENT_TEST
      std::cout << std::endl;
      #endif
-Line 2409 
 end on
+Line 5313 
 end on
      runScript({
          .code = R"NKSP_CODE(
  on init
-   declare $foo := min(1.0, 2.0)
+   declare ~foo := min(1.0, 2.0)
-   exit($foo)
+   exit(~foo)
  end on
  )NKSP_CODE",
          .expectRealExitResult = 1.0
-Line 2419 
 end on
+Line 5323 
 end on
      runScript({
          .code = R"NKSP_CODE(
  on init
-   declare $foo := min(-30.0, 4.0)
+   declare ~foo := min(-30.0, 4.0)
-   exit($foo)
+   exit(~foo)
  end on
  )NKSP_CODE",
          .expectRealExitResult = -30.0
-Line 2429 
 end on
+Line 5333 
 end on
      runScript({
          .code = R"NKSP_CODE(
  on init
-   declare $foo := min(1.1, 1.13)
+   declare ~foo := min(1.1, 1.13)
-   exit($foo)
+   exit(~foo)
  end on
  )NKSP_CODE",
          .expectRealExitResult = 1.1
-Line 2439 
 end on
+Line 5343 
 end on
      runScript({
          .code = R"NKSP_CODE(
  on init
-   declare $foo := min(1.13, 1.1)
+   declare ~foo := min(1.13, 1.1)
-   exit($foo)
+   exit(~foo)
  end on
  )NKSP_CODE",
          .expectRealExitResult = 1.1
-Line 2451 
 end on
+Line 5355 
 end on
      runScript({
          .code = R"NKSP_CODE(
  on init
-   declare $foo := min(1, 1.16)
+   declare ~foo := min(1, 1.16)
+   exit(~foo)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 1.0,
+         .expectParseWarning = true // min() warns if data types of arguments not matching
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~foo := min(-3.92, 9)
+   exit(~foo)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = -3.92,
+         .expectParseWarning = true // min() warns if data types of arguments not matching
+     });
+     // std unit tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := min(30ms,4s)
    exit($foo)
  end on
  )NKSP_CODE",
-         .expectRealExitResult = 1.0
+         .expectIntExitResult = 30,
+         .expectExitResultUnitPrefix = { VM_MILLI },
+         .expectExitResultUnit = VM_SECOND,
      });
      runScript({
          .code = R"NKSP_CODE(
  on init
-   declare $foo := min(-3.92, 9)
+   declare $foo := min(4s,30ms)
    exit($foo)
  end on
  )NKSP_CODE",
-         .expectRealExitResult = -3.92
+         .expectIntExitResult = 30,
+         .expectExitResultUnitPrefix = { VM_MILLI },
+         .expectExitResultUnit = VM_SECOND,
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := min(-30mdB,-4dB)
+   exit($foo)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = -4,
+         .expectExitResultUnitPrefix = { VM_DECI },
+         .expectExitResultUnit = VM_BEL,
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := min(-4dB,-30mdB)
+   exit($foo)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = -4,
+         .expectExitResultUnitPrefix = { VM_DECI },
+         .expectExitResultUnit = VM_BEL,
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := min(-4s,-30Hz)
+   exit($foo)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // min() requires arguments to have same unit type
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := min(-4s,-30)
+   exit($foo)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // min() requires arguments to have same unit type
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := min(-4,-30s)
+   exit($foo)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // min() requires arguments to have same unit type
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~foo := min(0.9s,1.0s)
+   exit(~foo)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 0.9,
+         .expectExitResultUnitPrefix = { VM_NO_PREFIX },
+         .expectExitResultUnit = VM_SECOND,
+     });
+     // 'final' ('!') operator tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := min(!30,!4)
+   exit($foo)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 4,
+         .expectExitResultFinal = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := min(30,4)
+   exit($foo)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 4,
+         .expectExitResultFinal = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := min(30,!4)
+   exit($foo)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 4,
+         .expectExitResultFinal = true,
+         .expectParseWarning = true // min() warns if only one argument is 'final'
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := min(!30,4)
+   exit($foo)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 4,
+         .expectExitResultFinal = true,
+         .expectParseWarning = true // min() warns if only one argument is 'final'
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~foo := min(!12.1,!12.2)
+   exit(~foo)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 12.1,
+         .expectExitResultFinal = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~foo := min(12.1,12.2)
+   exit(~foo)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 12.1,
+         .expectExitResultFinal = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~foo := min(!12.1,12.2)
+   exit(~foo)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 12.1,
+         .expectExitResultFinal = true,
+         .expectParseWarning = true // min() warns if only one argument is 'final'
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~foo := min(12.1,!12.2)
+   exit(~foo)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 12.1,
+         .expectExitResultFinal = true,
+         .expectParseWarning = true // min() warns if only one argument is 'final'
      });
      #if !SILENT_TEST
-Line 2532 
 end on
+Line 5624 
 end on
      runScript({
          .code = R"NKSP_CODE(
  on init
-   declare $foo := max(1.0, 2.0)
+   declare ~foo := max(1.0, 2.0)
-   exit($foo)
+   exit(~foo)
  end on
  )NKSP_CODE",
          .expectRealExitResult = 2.0
-Line 2542 
 end on
+Line 5634 
 end on
      runScript({
          .code = R"NKSP_CODE(
  on init
-   declare $foo := max(-30.0, 4.0)
+   declare ~foo := max(-30.0, 4.0)
-   exit($foo)
+   exit(~foo)
  end on
  )NKSP_CODE",
          .expectRealExitResult = 4.0
-Line 2552 
 end on
+Line 5644 
 end on
      runScript({
          .code = R"NKSP_CODE(
  on init
-   declare $foo := max(1.1, 1.13)
+   declare ~foo := max(1.1, 1.13)
-   exit($foo)
+   exit(~foo)
  end on
  )NKSP_CODE",
          .expectRealExitResult = 1.13
-Line 2562 
 end on
+Line 5654 
 end on
      runScript({
          .code = R"NKSP_CODE(
  on init
-   declare $foo := max(1.13, 1.1)
+   declare ~foo := max(1.13, 1.1)
-   exit($foo)
+   exit(~foo)
  end on
  )NKSP_CODE",
          .expectRealExitResult = 1.13
-Line 2574 
 end on
+Line 5666 
 end on
      runScript({
          .code = R"NKSP_CODE(
  on init
-   declare $foo := max(1, 1.16)
+   declare ~foo := max(1, 1.16)
+   exit(~foo)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 1.16,
+         .expectParseWarning = true // max() warns if data types of arguments not matching
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~foo := max(-3.92, 9)
+   exit(~foo)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 9.0,
+         .expectParseWarning = true // max() warns if data types of arguments not matching
+     });
+     // std unit tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := max(30ms,4s)
+   exit($foo)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 4,
+         .expectExitResultUnitPrefix = { VM_NO_PREFIX },
+         .expectExitResultUnit = VM_SECOND,
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := max(4s,30ms)
    exit($foo)
  end on
  )NKSP_CODE",
-         .expectRealExitResult = 1.16
+         .expectIntExitResult = 4,
+         .expectExitResultUnitPrefix = { VM_NO_PREFIX },
+         .expectExitResultUnit = VM_SECOND,
      });
      runScript({
          .code = R"NKSP_CODE(
  on init
-   declare $foo := max(-3.92, 9)
+   declare $foo := max(-30mdB,-4dB)
    exit($foo)
  end on
  )NKSP_CODE",
-         .expectRealExitResult = 9.0
+         .expectIntExitResult = -30,
+         .expectExitResultUnitPrefix = { VM_MILLI, VM_DECI },
+         .expectExitResultUnit = VM_BEL,
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := max(-4dB,-30mdB)
+   exit($foo)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = -30,
+         .expectExitResultUnitPrefix = { VM_MILLI, VM_DECI },
+         .expectExitResultUnit = VM_BEL,
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := max(-4s,-30Hz)
+   exit($foo)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // max() requires arguments to have same unit type
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := max(-4s,-30)
+   exit($foo)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // max() requires arguments to have same unit type
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := max(-4,-30s)
+   exit($foo)
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // max() requires arguments to have same unit type
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~foo := max(0.9s,1.0s)
+   exit(~foo)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 1.0,
+         .expectExitResultUnitPrefix = { VM_NO_PREFIX },
+         .expectExitResultUnit = VM_SECOND,
+     });
+     // 'final' ('!') operator tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := max(!30,!4)
+   exit($foo)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 30,
+         .expectExitResultFinal = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := max(30,4)
+   exit($foo)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 30,
+         .expectExitResultFinal = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := max(30,!4)
+   exit($foo)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 30,
+         .expectExitResultFinal = true,
+         .expectParseWarning = true // max() warns if only one argument is 'final'
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := max(!30,4)
+   exit($foo)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 30,
+         .expectExitResultFinal = true,
+         .expectParseWarning = true // max() warns if only one argument is 'final'
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~foo := max(!12.1,!12.2)
+   exit(~foo)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 12.2,
+         .expectExitResultFinal = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~foo := max(12.1,12.2)
+   exit(~foo)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 12.2,
+         .expectExitResultFinal = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~foo := max(!12.1,12.2)
+   exit(~foo)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 12.2,
+         .expectExitResultFinal = true,
+         .expectParseWarning = true // max() warns if only one argument is 'final'
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~foo := max(12.1,!12.2)
+   exit(~foo)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 12.2,
+         .expectExitResultFinal = true,
+         .expectParseWarning = true // max() warns if only one argument is 'final'
      });
      #if !SILENT_TEST
-Line 2684 
 end on
+Line 5964 
 end on
          .expectRealExitResult = 23.11
      });
+     // std unit tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := abs(-23kHz)
+   exit($foo)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 23,
+         .expectExitResultUnitPrefix = { VM_KILO },
+         .expectExitResultUnit = VM_HERTZ
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~foo := abs(-23.4kHz)
+   exit(~foo)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 23.4,
+         .expectExitResultUnitPrefix = { VM_KILO },
+         .expectExitResultUnit = VM_HERTZ
+     });
+     // 'final' ('!') operator tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := abs(!-23)
+   exit($foo)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 23,
+         .expectExitResultFinal = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := abs(-23)
+   exit($foo)
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 23,
+         .expectExitResultFinal = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~foo := abs(!-23.2)
+   exit(~foo)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 23.2,
+         .expectExitResultFinal = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~foo := abs(-23.9)
+   exit(~foo)
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 23.9,
+         .expectExitResultFinal = false
+     });
      #if !SILENT_TEST
      std::cout << std::endl;
      #endif
-Line 2694 
 static void testBuiltInIncFunction() {
+Line 6046 
 static void testBuiltInIncFunction() {
      std::cout << "UNIT TEST: built-in inc() function\n";
      #endif
+     // integer tests ...
      runScript({
          .code = R"NKSP_CODE(
  on init
-Line 2729 
 end on
+Line 6083 
 end on
          .expectIntExitResult = 7
      });
+     // std unit tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := 53mdB
+   inc($foo)
+   exit( inc($foo) )
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 55,
+         .expectExitResultUnitPrefix = { VM_MILLI, VM_DECI },
+         .expectExitResultUnit = VM_BEL,
+         .expectParseWarning = true // inc() warns if argument has a unit
+     });
+     // 'final' ('!') operator tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := !53
+   inc($foo)
+   exit( inc($foo) )
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 55,
+         .expectExitResultFinal = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := 53
+   inc($foo)
+   exit( inc($foo) )
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 55,
+         .expectExitResultFinal = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := 53
+   inc($foo)
+   exit( !inc($foo) )
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 55,
+         .expectExitResultFinal = true
+     });
      #if !SILENT_TEST
      std::cout << std::endl;
      #endif
-Line 2739 
 static void testBuiltInDecFunction() {
+Line 6147 
 static void testBuiltInDecFunction() {
      std::cout << "UNIT TEST: built-in dec() function\n";
      #endif
+     // integer tests ...
      runScript({
          .code = R"NKSP_CODE(
  on init
-Line 2774 
 end on
+Line 6184 
 end on
          .expectIntExitResult = 3
      });
+     // std unit tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := 53mdB
+   dec($foo)
+   exit( dec($foo) )
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 51,
+         .expectExitResultUnitPrefix = { VM_MILLI, VM_DECI },
+         .expectExitResultUnit = VM_BEL,
+         .expectParseWarning = true // dec() warns if argument has a unit
+     });
+     // 'final' ('!') operator tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := !53
+   dec($foo)
+   exit( dec($foo) )
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 51,
+         .expectExitResultFinal = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := 53
+   dec($foo)
+   exit( dec($foo) )
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 51,
+         .expectExitResultFinal = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := 53
+   dec($foo)
+   exit( !dec($foo) )
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 51,
+         .expectExitResultFinal = true
+     });
      #if !SILENT_TEST
      std::cout << std::endl;
      #endif
-Line 2784 
 static void testBuiltInInRangeFunction()
+Line 6248 
 static void testBuiltInInRangeFunction()
      std::cout << "UNIT TEST: built-in in_range() function\n";
      #endif
+     // integer tests ...
      runScript({
          .code = R"NKSP_CODE(
  on init
-Line 2865 
 end on
+Line 6331 
 end on
          .expectBoolExitResult = false
      });
+     // real number tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( in_range(12.2,12.1,12.9) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( in_range(12.2,12.9,12.1) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( in_range(12.0,12.1,12.9) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( in_range(12.0,12.9,12.1) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( in_range(0.0,-0.3,0.3) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( in_range(-0.34,-0.3,0.3) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( in_range(0.34,-0.3,0.3) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( in_range(-0.3,-0.3,0.3) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( in_range(0.3,-0.3,0.3) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     // mixed type tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( in_range(4.0,-5,5) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true,
+         .expectParseWarning = true // in_range() warns if not all arguments are of same type
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( in_range(5,-5,5.0) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true,
+         .expectParseWarning = true // in_range() warns if not all arguments are of same type
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( in_range(-5,-5.0,5) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true,
+         .expectParseWarning = true // in_range() warns if not all arguments are of same type
+     });
+     // std unit tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( in_range(4000Hz,3kHz,5kHz) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true,
+         .expectExitResultUnitPrefix = { VM_NO_PREFIX },
+         .expectExitResultUnit = VM_NO_UNIT
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( in_range(5000Hz,3kHz,5kHz) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true,
+         .expectExitResultUnitPrefix = { VM_NO_PREFIX },
+         .expectExitResultUnit = VM_NO_UNIT
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( in_range(5001Hz,3kHz,5kHz) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false,
+         .expectExitResultUnitPrefix = { VM_NO_PREFIX },
+         .expectExitResultUnit = VM_NO_UNIT
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( in_range(3000Hz,3kHz,5kHz) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true,
+         .expectExitResultUnitPrefix = { VM_NO_PREFIX },
+         .expectExitResultUnit = VM_NO_UNIT
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( in_range(2999Hz,3kHz,5kHz) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false,
+         .expectExitResultUnitPrefix = { VM_NO_PREFIX },
+         .expectExitResultUnit = VM_NO_UNIT
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( in_range(0.003s,3000.0us,5ms) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true,
+         .expectParseWarning = true, // in_range() warns if not all arguments are of same type
+         .expectExitResultUnitPrefix = { VM_NO_PREFIX },
+         .expectExitResultUnit = VM_NO_UNIT
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( in_range(0.005s,3000.0us,5ms) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true,
+         .expectParseWarning = true, // in_range() warns if not all arguments are of same type,
+         .expectExitResultUnitPrefix = { VM_NO_PREFIX },
+         .expectExitResultUnit = VM_NO_UNIT
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( in_range(0.0051s,3000.0us,5ms) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false,
+         .expectParseWarning = true, // in_range() warns if not all arguments are of same type
+         .expectExitResultUnitPrefix = { VM_NO_PREFIX },
+         .expectExitResultUnit = VM_NO_UNIT
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( in_range(3s,2Hz,5Hz) )
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // in_range() throws error if not all arguments' unit types equal,
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( in_range(3Hz,2s,5Hz) )
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // in_range() throws error if not all arguments' unit types equal
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( in_range(3Hz,2Hz,5s) )
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // in_range() throws error if not all arguments' unit types equal
+     });
+     // 'final' ('!') operator tests ...
+     // (result should always be NOT final)
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( in_range(!9,!4,!9) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true,
+         .expectExitResultFinal = false
+     });
      #if !SILENT_TEST
      std::cout << std::endl;
      #endif
-Line 2875 
 static void testBuiltInRandomFunction()
+Line 6589 
 static void testBuiltInRandomFunction()
      std::cout << "UNIT TEST: built-in random() function\n";
      #endif
+     // integer tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( random(-5,5) )
+ end on
+ )NKSP_CODE",
+         .expectExitResultIsInt = true // only check type, exact value is irrelevant here
+     });
      for (int run = 0; run < 20; ++run) {
          runScript({
              .code = R"NKSP_CODE(
-Line 2887 
 end on
+Line 6612 
 end on
          });
      }
+     // real number tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( random(-0.5,0.5) )
+ end on
+ )NKSP_CODE",
+         .expectExitResultIsReal = true // only check type, exact value is irrelevant here
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~foo := random(-5.0,5.0)
+   exit(~foo)
+ end on
+ )NKSP_CODE",
+         .expectExitResultIsReal = true // only check type, exact value is irrelevant here
+     });
+     for (int run = 0; run < 20; ++run) {
+         runScript({
+             .code = R"NKSP_CODE(
+ on init
+   declare ~foo := random(-0.5,0.5)
+   exit( in_range(~foo,-0.5,0.5) )
+ end on
+ )NKSP_CODE",
+             .expectBoolExitResult = true
+         });
+     }
+     for (int run = 0; run < 20; ++run) {
+         runScript({
+             .code = R"NKSP_CODE(
+ on init
+   declare ~foo := random(-5.0,12.0)
+   exit( in_range(~foo,-5.0,12.0) )
+ end on
+ )NKSP_CODE",
+             .expectBoolExitResult = true
+         });
+     }
+     for (int run = 0; run < 20; ++run) {
+         runScript({
+             .code = R"NKSP_CODE(
+ on init
+   declare ~foo := random(23.3,98.4)
+   exit( in_range(~foo,23.3,98.4) )
+ end on
+ )NKSP_CODE",
+             .expectBoolExitResult = true
+         });
+     }
+     // std unit tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( random(-5Hz,5Hz) )
+ end on
+ )NKSP_CODE",
+         .expectExitResultIsInt = true, // only check type, exact value is irrelevant here
+         .expectExitResultUnitPrefix = { VM_NO_PREFIX },
+         .expectExitResultUnit = VM_HERTZ
+     });
+     for (int run = 0; run < 20; ++run) {
+         runScript({
+             .code = R"NKSP_CODE(
+ on init
+   declare $foo := random(-5Hz,5Hz)
+   exit( in_range($foo,-5Hz,5Hz) )
+ end on
+ )NKSP_CODE",
+             .expectBoolExitResult = true
+         });
+     }
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( random(5us,1ms) )
+ end on
+ )NKSP_CODE",
+         .expectExitResultIsInt = true, // only check type, exact value is irrelevant here
+         .expectExitResultUnitPrefix = { VM_MICRO },
+         .expectExitResultUnit = VM_SECOND
+     });
+     for (int run = 0; run < 20; ++run) {
+         runScript({
+             .code = R"NKSP_CODE(
+ on init
+   declare $foo := random(5us,1ms)
+   exit( in_range($foo,5us,1ms) )
+ end on
+ )NKSP_CODE",
+             .expectBoolExitResult = true
+         });
+     }
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( random(1ms,5000us) )
+ end on
+ )NKSP_CODE",
+         .expectExitResultIsInt = true, // only check type, exact value is irrelevant here
+         .expectExitResultUnitPrefix = { VM_MICRO },
+         .expectExitResultUnit = VM_SECOND
+     });
+     for (int run = 0; run < 20; ++run) {
+         runScript({
+             .code = R"NKSP_CODE(
+ on init
+   declare $foo := random(1ms,5000us)
+   exit( in_range($foo,1ms,5000us) )
+ end on
+ )NKSP_CODE",
+             .expectBoolExitResult = true
+         });
+     }
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( random(1kHz,20kHz) )
+ end on
+ )NKSP_CODE",
+         .expectExitResultIsInt = true, // only check type, exact value is irrelevant here
+         .expectExitResultUnitPrefix = { VM_KILO },
+         .expectExitResultUnit = VM_HERTZ
+     });
+     for (int run = 0; run < 20; ++run) {
+         runScript({
+             .code = R"NKSP_CODE(
+ on init
+   declare $foo := random(1kHz,20kHz)
+   exit( in_range($foo,1kHz,20kHz) )
+ end on
+ )NKSP_CODE",
+             .expectBoolExitResult = true
+         });
+     }
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( random(1.2us,3.5us) )
+ end on
+ )NKSP_CODE",
+         .expectExitResultIsReal = true, // only check type, exact value is irrelevant here
+         .expectExitResultUnitPrefix = { VM_MICRO },
+         .expectExitResultUnit = VM_SECOND
+     });
+     for (int run = 0; run < 20; ++run) {
+         runScript({
+             .code = R"NKSP_CODE(
+ on init
+   declare ~foo := random(1.2us,3.5us)
+   exit( in_range(~foo,1.2us,3.5us) )
+ end on
+ )NKSP_CODE",
+             .expectBoolExitResult = true
+         });
+     }
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( random(5.2us,1.1ms) )
+ end on
+ )NKSP_CODE",
+         .expectExitResultIsReal = true, // only check type, exact value is irrelevant here
+         .expectExitResultUnitPrefix = { VM_MICRO },
+         .expectExitResultUnit = VM_SECOND
+     });
+     for (int run = 0; run < 20; ++run) {
+         runScript({
+             .code = R"NKSP_CODE(
+ on init
+   declare ~foo := random(5.2us,1.1ms)
+   exit( in_range(~foo,5.2us,1.1ms) )
+ end on
+ )NKSP_CODE",
+             .expectBoolExitResult = true
+         });
+     }
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( random(1Hz,12s) )
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // random() throws error if arguments' unit types don't match
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( random(1,12s) )
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // random() throws error if arguments' unit types don't match
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( random(1s,12) )
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // random() throws error if arguments' unit types don't match
+     });
+     // 'final' ('!') operator tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( random(!1,!12) )
+ end on
+ )NKSP_CODE",
+         .expectExitResultFinal = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( random(1,12) )
+ end on
+ )NKSP_CODE",
+         .expectExitResultFinal = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( random(!1,12) )
+ end on
+ )NKSP_CODE",
+         .expectExitResultFinal = true,
+         .expectParseWarning = true // random() warns if only one argument is 'final'
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( random(1,!12) )
+ end on
+ )NKSP_CODE",
+         .expectExitResultFinal = true,
+         .expectParseWarning = true // random() warns if only one argument is 'final'
+     });
      #if !SILENT_TEST
      std::cout << std::endl;
      #endif
-Line 3017 
 end on
+Line 7006 
 end on
          .expectRealExitResult = 23.0
      });
+     // std unit tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( int_to_real(-58mdB) )
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = -58.0,
+         .expectExitResultUnitPrefix = { VM_MILLI, VM_DECI },
+         .expectExitResultUnit = VM_BEL
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := -58mdB
+   exit( int_to_real($foo) )
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = -58.0,
+         .expectExitResultUnitPrefix = { VM_MILLI, VM_DECI },
+         .expectExitResultUnit = VM_BEL
+     });
+     // 'final' ('!') operator tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := !-58
+   exit( int_to_real($foo) )
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = -58.0,
+         .expectExitResultFinal = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := -58
+   exit( int_to_real($foo) )
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = -58.0,
+         .expectExitResultFinal = false
+     });
      #if !SILENT_TEST
      std::cout << std::endl;
      #endif
-Line 3046 
 end on
+Line 7084 
 end on
          .expectRealExitResult = 23.0
      });
+     // std unit tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   exit( real(-58mdB) )
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = -58.0,
+         .expectExitResultUnitPrefix = { VM_MILLI, VM_DECI },
+         .expectExitResultUnit = VM_BEL
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := -58mdB
+   exit( real($foo) )
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = -58.0,
+         .expectExitResultUnitPrefix = { VM_MILLI, VM_DECI },
+         .expectExitResultUnit = VM_BEL
+     });
+     // 'final' ('!') operator tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := !-58
+   exit( real($foo) )
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = -58.0,
+         .expectExitResultFinal = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := -58
+   exit( real($foo) )
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = -58.0,
+         .expectExitResultFinal = false
+     });
      #if !SILENT_TEST
      std::cout << std::endl;
      #endif
-Line 3075 
 end on
+Line 7162 
 end on
          .expectIntExitResult = 8
      });
+     // std unit tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~foo := 8.9mdB
+   exit( real_to_int(~foo) )
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 8,
+         .expectExitResultUnitPrefix = { VM_MILLI, VM_DECI },
+         .expectExitResultUnit = VM_BEL
+     });
+     // 'final' ('!') operator tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~foo := !8.9
+   exit( real_to_int(~foo) )
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 8,
+         .expectExitResultFinal = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~foo := 8.9
+   exit( real_to_int(~foo) )
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 8,
+         .expectExitResultFinal = false
+     });
      #if !SILENT_TEST
      std::cout << std::endl;
      #endif
-Line 3104 
 end on
+Line 7229 
 end on
          .expectIntExitResult = 8
      });
+     // std unit tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~foo := 8.9mdB
+   exit( int(~foo) )
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 8,
+         .expectExitResultUnitPrefix = { VM_MILLI, VM_DECI },
+         .expectExitResultUnit = VM_BEL
+     });
+     // 'final' ('!') operator tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~foo := !8.9
+   exit( int(~foo) )
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 8,
+         .expectExitResultFinal = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~foo := 8.9
+   exit( int(~foo) )
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 8,
+         .expectExitResultFinal = false
+     });
      #if !SILENT_TEST
      std::cout << std::endl;
      #endif
-Line 3114 
 static void testBuiltInArrayEqualFunctio
+Line 7277 
 static void testBuiltInArrayEqualFunctio
      std::cout << "UNIT TEST: built-in array_equal() function\n";
      #endif
+     // integer array tests ...
      runScript({
          .code = R"NKSP_CODE(
  on init
-Line 3166 
 on init
+Line 7331 
 on init
    exit( array_equal(%foo, %bar) )
  end on
  )NKSP_CODE",
+         .expectBoolExitResult = false,
+         .expectParseWarning = true // array_equal() warns if array sizes do not match
+     });
+     // real number array tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ?foo[3] := ( 1.0, 2.0, 3.0 )
+   declare ?bar[3] := ( 1.0, 2.0, 3.0 )
+   exit( array_equal(?foo, ?bar) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ?foo[3] := ( 1.0, 1.1, 3.4 )
+   declare ?bar[3] := ( 1.0, 1.1, 3.4 )
+   exit( array_equal(?foo, ?bar) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ?foo[3] := ( 1.0, 1.1, 3.4 )
+   declare ?bar[3] := ( 1.0, 1.2, 3.4 )
+   exit( array_equal(?foo, ?bar) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ?foo[3] := ( 1.0, 1.1, 3.4 )
+   declare ?bar[2] := ( 1.0, 1.1 )
+   exit( array_equal(?foo, ?bar) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false,
+         .expectParseWarning = true // array_equal() warns if array sizes do not match
+     });
+     // std unit tests ...
+     // (only metric prefixes allowed, unit types are prohibited for arrays ATM)
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare %foo[3] := ( 1, 1s, 1 )
+   declare %bar[3] := ( 1, 1,  1 )
+   exit( array_equal(%foo, %bar) )
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // see comment above
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare %foo[3] := ( 1k, 1, 1m )
+   declare %bar[3] := ( 1k, 1, 1m )
+   exit( array_equal(%foo, %bar) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare %foo[3] := ( 1m, 1, 1k )
+   declare %bar[3] := ( 1k, 1, 1m )
+   exit( array_equal(%foo, %bar) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare %foo[3] := ( 1, 1k, 1 )
+   declare %bar[3] := ( 1, 1,  1 )
+   exit( array_equal(%foo, %bar) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare %foo[3] := ( 1, 1k, 1 )
+   declare %bar[3] := ( 1, 1000, 1 )
+   exit( array_equal(%foo, %bar) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare %foo[3] := ( 1, 2, 3000 )
+   declare %bar[3] := ( 1, 2, 3k )
+   exit( array_equal(%foo, %bar) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare %foo[3] := ( 1, 2, 3m )
+   declare %bar[3] := ( 1, 2, 3k )
+   exit( array_equal(%foo, %bar) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ?foo[4] := ( 1.0, 1.0m, 1.1m, 3.4k )
+   declare ?bar[4] := ( 1.0, 1.0m, 1.1m, 3.4k )
+   exit( array_equal(?foo, ?bar) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ?foo[4] := ( 1.0, 1.0m, 1.1m, 3.4k )
+   declare ?bar[4] := ( 1.0, 1.0 , 1.1m, 3.4k )
+   exit( array_equal(?foo, ?bar) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ?foo[4] := ( 1.0, 1.0m, 1.1m, 3.4k )
+   declare ?bar[4] := ( 1.0, 1.0m, 1.1k, 3.4k )
+   exit( array_equal(?foo, ?bar) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ?foo[4] := ( 1.0, 1.0m, 1.1m, 3.4k )
+   declare ?bar[4] := ( 1.0, 1.0m, 1.1m, 3.4u )
+   exit( array_equal(?foo, ?bar) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = false
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ?foo[3] := ( 1.0, 1.0k, 1.1m )
+   declare ?bar[3] := ( 1.0, 1000.0, 1.1m )
+   exit( array_equal(?foo, ?bar) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ?foo[3] := ( 1.0, 1.0k, 1.1u )
+   declare ?bar[3] := ( 1.0, 1000.0, 0.0011m )
+   exit( array_equal(?foo, ?bar) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ?foo[3] := ( 1.0, 1.0k, 1.1u )
+   declare ?bar[3] := ( 1.0, 1000.0, 0.0016m )
+   exit( array_equal(?foo, ?bar) )
+ end on
+ )NKSP_CODE",
          .expectBoolExitResult = false
      });
+     // 'final' ('!') operator tests ...
+     // (currently prohibited for arrays)
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare %foo[3] := ( !1, !1, !1 )
+   declare %bar[3] := ( !1, !1, !1 )
+   exit( array_equal(%foo, %bar) )
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // see comment above
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ?foo[3] := ( !1.0, !1.0, !1.0 )
+   declare ?bar[3] := ( !1.0, !1.0, !1.0 )
+   exit( array_equal(?foo, ?bar) )
+ end on
+ )NKSP_CODE",
+         .expectParseError = true // see comment above
+     });
      #if !SILENT_TEST
      std::cout << std::endl;
      #endif
-Line 3179 
 static void testBuiltInSortFunction() {
+Line 7574 
 static void testBuiltInSortFunction() {
      std::cout << "UNIT TEST: built-in sort() function\n";
      #endif
+     // integer array tests ...
      runScript({
          .code = R"NKSP_CODE(
  on init
-Line 3203 
 end on
+Line 7600 
 end on
          .expectBoolExitResult = true
      });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare %input[6] := ( 1, 80, 120, 40, 3000, 20 )
+   declare %expected[6] := ( 1, 20, 40, 80, 120, 3000  )
+   sort(%input, 0)
+   exit( array_equal(%input, %expected) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     // real number array tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ?input[4] := ( 1.4, 1.0, 13.4, 2.7 )
+   declare ?expected[4] := ( 1.0, 1.4, 2.7, 13.4 )
+   sort(?input, 0)
+   exit( array_equal(?input, ?expected) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ?input[4] := ( 1.4, 1.0, 13.4, 2.7 )
+   declare ?expected[4] := ( 13.4, 2.7, 1.4, 1.0 )
+   sort(?input, 1)
+   exit( array_equal(?input, ?expected) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     // std unit tests ...
+     // (only metric prefixes are allowed for arrays ATM)
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare %input[3] := ( 1k, 6, 900 )
+   declare %expected[3] := ( 6, 900, 1k )
+   sort(%input, 0)
+   exit( array_equal(%input, %expected) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare %input[3] := ( 900, 1k, 6 )
+   declare %expected[3] := ( 1k, 900, 6 )
+   sort(%input, 1)
+   exit( array_equal(%input, %expected) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare %input[6] := ( 1k, 8m, 4k, 12000u, 3000u, 1000u )
+   declare %expected[6] := ( 1000u, 3000u, 8m, 12000u, 1k, 4k )
+   sort(%input, 0)
+   exit( array_equal(%input, %expected) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ?input[3] := ( 1.0k, 6.0, 900.0 )
+   declare ?expected[3] := ( 6.0, 900.0, 1.0k )
+   sort(?input, 0)
+   exit( array_equal(?input, ?expected) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ?input[3] := ( 900.0, 1.0k, 6.0 )
+   declare ?expected[3] := ( 1.0k, 900.0, 6.0 )
+   sort(?input, 1)
+   exit( array_equal(?input, ?expected) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ?input[3] := ( 1.0k, 0.9k, 1.1k )
+   declare ?expected[3] := ( 0.9k, 1.0k, 1.1k )
+   sort(?input, 0)
+   exit( array_equal(?input, ?expected) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ?input[3] := ( 2.0m, 1000.1u, 1.0 )
+   declare ?expected[3] := ( 1000.1u, 2.0m, 1.0 )
+   sort(?input, 0)
+   exit( array_equal(?input, ?expected) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ?input[4] := ( 2.0m, 1000.1u, 1.0, 1400.0u )
+   declare ?expected[4] := ( 1000.1u, 1400.0u, 2.0m, 1.0 )
+   sort(?input, 0)
+   exit( array_equal(?input, ?expected) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ?input[4] := ( 2.0m, 1000.1u, 1.0, 1400.0u )
+   declare ?expected[4] := ( 1.0, 2.0m, 1400.0u, 1000.1u )
+   sort(?input, 1)
+   exit( array_equal(?input, ?expected) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ?input[6] := ( 0.9k, 8.0m, 1.1k, 12000.0u, 3000.0u, 1000.0u )
+   declare ?expected[6] := ( 1000.0u, 3000.0u, 8.0m, 12000.0u, 0.9k, 1.1k )
+   sort(?input, 0)
+   exit( array_equal(?input, ?expected) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ?input[6] := ( 0.9k, 8.0m, 1.1k, 12000.0u, 3000.0u, 1000.0u )
+   declare ?expected[6] := ( 1.1k, 0.9k, 12000.0u, 8.0m, 3000.0u, 1000.0u )
+   sort(?input, 1)
+   exit( array_equal(?input, ?expected) )
+ end on
+ )NKSP_CODE",
+         .expectBoolExitResult = true
+     });
      #if !SILENT_TEST
      std::cout << std::endl;
      #endif
-Line 3213 
 static void testBuiltInNumElementsFuncti
+Line 7783 
 static void testBuiltInNumElementsFuncti
      std::cout << "UNIT TEST: built-in num_elements() function\n";
      #endif
+     // integer array tests ...
      runScript({
          .code = R"NKSP_CODE(
  on init
-Line 3243 
 end on
+Line 7815 
 end on
          .expectIntExitResult = 5
      });
+     // real array tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ?foo[3] := ( 19.0, 3.2, 6.5 )
+   exit( num_elements(?foo) )
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 3
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ?foo[1] := ( 19.0 )
+   exit( num_elements(?foo) )
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 1
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ?foo[5] := ( 1.1, 2.2, 3.3, 4.4, 5.5 )
+   exit( num_elements(?foo) )
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 5
+     });
      #if !SILENT_TEST
      std::cout << std::endl;
      #endif
-Line 3253 
 static void testBuiltInSearchFunction()
+Line 7857 
 static void testBuiltInSearchFunction()
      std::cout << "UNIT TEST: built-in search() function\n";
      #endif
+     // integer array tests ...
      runScript({
          .code = R"NKSP_CODE(
  on init
-Line 3291 
 on init
+Line 7897 
 on init
  end on
  )NKSP_CODE",
          .expectIntExitResult = -1
+     });
+     // real array tests ...
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ?foo[3] := ( 19.12, 3.45, 6.89 )
+   exit( search(?foo, 19.12) )
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 0
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ?foo[3] := ( 19.12, 3.45, 6.89 )
+   exit( search(?foo, 3.45) )
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 1
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ?foo[3] := ( 19.12, 3.45, 6.89 )
+   exit( search(?foo, 6.89) )
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 2
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ?foo[3] := ( 19.12, 3.45, 6.89 )
+   exit( search(?foo, 6.99) )
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = -1
      });
      #if !SILENT_TEST

 Legend:



Removed from v.3577
 


changed lines


 
Added in v.3581
 Legend:



Removed from v.3577
 


changed lines


 
Added in v.3581
-Removed from v.3577
+Added in v.3581

	ViewVC Help
Powered by ViewVC