Tweaked signed add.

1 files changed, 31 insertions, 26 deletions

diff --git a/Math_Test.jai b/Math_Test.jai
index d03bd32..bd9990b 100644
--- a/Math_Test.jai
+++ b/Math_Test.jai
@@ -167,26 +167,23 @@ main :: () {
     performance_test :: ($operation: string, $type: Type, print_result: bool = true) -> ops_per_us_gen: float, ops_per_us_asm: float {
         
         NUM_TESTS :: 5000;
-        // DATA_SIZE :: 32768;
-        DATA_SIZE_BITS :: 96*1024*8;
+        DATA_SIZE_BITS :: 64*1024*8/2;
         #if type == s8 || type == u8 then
-            DATA_SIZE :: DATA_SIZE_BITS/3/8;
+            DATA_SIZE :: DATA_SIZE_BITS/8;
         else #if type == s16 || type == u16 then
-            DATA_SIZE :: DATA_SIZE_BITS/3/16;
+            DATA_SIZE :: DATA_SIZE_BITS/16;
         else #if type == s32 || type == u32 then
-            DATA_SIZE :: DATA_SIZE_BITS/3/32;
+            DATA_SIZE :: DATA_SIZE_BITS/32;
         else #if type == s64 || type == u64 then
-            DATA_SIZE :: DATA_SIZE_BITS/3/64;
+            DATA_SIZE :: DATA_SIZE_BITS/64;
 
         best_gen := 0.0;
         best_asm := 0.0;
 
         numbers_xgen: [..] type;
         numbers_ygen: [..] type;
-        numbers_zgen: [DATA_SIZE] type;
         numbers_xasm: [..] type;
         numbers_yasm: [..] type;
-        numbers_zasm: [DATA_SIZE] type;
         array_reserve(*numbers_xgen, DATA_SIZE);
         array_reserve(*numbers_ygen, DATA_SIZE);
         array_reserve(*numbers_xasm, DATA_SIZE);
@@ -212,18 +209,21 @@ main :: () {
             array_add(*numbers_xasm, x);
             array_add(*numbers_yasm, y);
         }
-                
+
         for 0..NUM_TESTS-1 {
 
+            r_gen: type = 0;
+            r_asm: type = 0;
+            
             time_gen := current_time_monotonic();
-            for 0..DATA_SIZE-1 #insert #run replace("numbers_zgen[it] = OP(numbers_xgen[it], numbers_ygen[it], true);", "OP", operation);
+            for 0..DATA_SIZE-1 #insert #run replace("r_gen ^= OP(numbers_xgen[it], numbers_ygen[it], true);", "OP", operation);
             time_gen = current_time_monotonic() - time_gen;
 
             time_asm := current_time_monotonic();
-            for 0..DATA_SIZE-1 #insert #run replace("numbers_zasm[it] = OP(numbers_xasm[it], numbers_yasm[it]);", "OP", operation);
+            for 0..DATA_SIZE-1 #insert #run replace("r_asm ^= OP(numbers_xasm[it], numbers_yasm[it]);", "OP", operation);
             time_asm = current_time_monotonic() - time_asm;
 
-            for 0..DATA_SIZE-1 assert(numbers_zgen[it] == numbers_zasm[it]);
+            assert(r_gen == r_asm);
 
             perf_gen    := cast(float)DATA_SIZE/cast(float)to_nanoseconds(time_gen);
             perf_asm    := cast(float)DATA_SIZE/cast(float)to_nanoseconds(time_asm);
@@ -231,26 +231,31 @@ main :: () {
             best_asm    = max(best_asm, perf_asm);
         }
 
-        if print_result {
-            if type == s8 || type == u8 write_string(" ");
-            print("% | % | % | %\n", type, best_gen, best_asm, DATA_SIZE);
+        tmp_context := context;
+        push_context tmp_context {
+            ff := *context.print_style.default_format_float;
+            ff.zero_removal = .NO;
+            ff.width = 7;
+            ff.trailing_width = 3;
+
+            fi := *context.print_style.default_format_int;
+            fi.minimum_digits = 3;
+            
+            if print_result {
+                if type == s8 || type == u8 write_string(" ");
+                print("% | % | % | %\n", type, best_gen, best_asm, cast(int)(100*best_asm/best_gen));
+            }
         }
         return best_gen, best_asm;
     }
 
-    ff := context.print_style.default_format_float;
-    ff.zero_removal = .NO;
-    ff.width = 7;
-    ff.trailing_width = 3;
-    context.print_style.default_format_float = ff;
-
     write_strings(
         "    |    (ops / nsec)   |\n",
-        "    | generic | x64 asm |\n"
+        " T  | generic | x64 asm |  %\n"
     );
 
     write_strings(
-        "--- | ----------------- |\n",
+        "--- | ----------------- | ---\n",
         "    |        add        |\n"
         );
     performance_test("add", u8);
@@ -263,7 +268,7 @@ main :: () {
     performance_test("add", s64);
 
     write_strings(
-        "--- | ----------------- |\n",
+        "--- | ----------------- | ---\n",
         "    |        sub        |\n"
         );
     performance_test("sub", u8);
@@ -276,7 +281,7 @@ main :: () {
     performance_test("sub", s64);
 
     write_strings(
-        "--- | ----------------- |\n",
+        "--- | ----------------- | ---\n",
         "    |        mul        |\n"
         );
     performance_test("mul", u8);
@@ -289,7 +294,7 @@ main :: () {
     performance_test("mul", s64);
 
     write_strings(
-        "--- | ----------------- |\n",
+        "--- | ----------------- | ---\n",
         "    |        div        |\n"
         );
     performance_test("div", u8);