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

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

Parent Directory | Revision Log | View Patch Patch

-revision 3743 by schoenebeck,
Mon Jan 27 16:34:44 2020 UTC
+revision 3744 by schoenebeck,
Sat Feb 15 11:50:02 2020 UTC
 Line 8881 
 end on
          .expectExitResultUnit = VM_BEL
      });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := 7000ms
+   exit( int_to_real($foo) )
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 7000.0,
+         .expectExitResultUnitPrefix = { VM_MILLI },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := 7000ms
+   declare @s := "" & int_to_real($foo)
+   exit( @s )
+ end on
+ )NKSP_CODE",
+         .expectStringExitResult = "7000ms",
+     });
      // 'final' ('!') operator tests ...
      runScript({
-Line 8959 
 end on
+Line 8982 
 end on
          .expectExitResultUnit = VM_BEL
      });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := 7000ms
+   exit( real($foo) )
+ end on
+ )NKSP_CODE",
+         .expectRealExitResult = 7000.0,
+         .expectExitResultUnitPrefix = { VM_MILLI },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare $foo := 7000ms
+   declare @s := "" & real($foo)
+   exit( @s )
+ end on
+ )NKSP_CODE",
+         .expectStringExitResult = "7000ms",
+     });
      // 'final' ('!') operator tests ...
      runScript({
-Line 9026 
 end on
+Line 9072 
 end on
          .expectExitResultUnit = VM_BEL
      });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~foo := 9000.0us
+   exit( real_to_int(~foo) )
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 9000.0,
+         .expectExitResultUnitPrefix = { VM_MICRO },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~foo := 9000.0us
+   declare @s := "" & real_to_int(~foo)
+   exit( @s )
+ end on
+ )NKSP_CODE",
+         .expectStringExitResult = "9000us",
+     });
      // 'final' ('!') operator tests ...
      runScript({
-Line 9093 
 end on
+Line 9162 
 end on
          .expectExitResultUnit = VM_BEL
      });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~foo := 9000.0us
+   exit( int(~foo) )
+ end on
+ )NKSP_CODE",
+         .expectIntExitResult = 9000.0,
+         .expectExitResultUnitPrefix = { VM_MICRO },
+         .expectExitResultUnit = VM_SECOND
+     });
+     runScript({
+         .code = R"NKSP_CODE(
+ on init
+   declare ~foo := 9000.0us
+   declare @s := "" & int(~foo)
+   exit( @s )
+ end on
+ )NKSP_CODE",
+         .expectStringExitResult = "9000us",
+     });
      // 'final' ('!') operator tests ...
      runScript({

 Legend:



Removed from v.3743
 


changed lines


 
Added in v.3744
 Legend:



Removed from v.3743
 


changed lines


 
Added in v.3744
-Removed from v.3743
+Added in v.3744

	ViewVC Help
Powered by ViewVC