Adds missing functions to test_utility

scripts/test_utility.vhd

@@ -12,6 +12,7 @@ package test_utility is
 
     type real_array is array ( natural range <> ) of real;
 
+    procedure assert_eq( a : in std_logic; b : in std_logic );
     procedure assert_eq( a : in std_logic_vector; b : in std_logic_vector );
 
     procedure assert_near( variable a : in real;
@@ -27,9 +28,17 @@ end package test_utility;
 
 package body test_utility is
 
-    procedure assert_eq( a : in std_logic_vector; b : in std_logic_vector ) is
+    procedure assert_eq( a : in std_logic; b : in std_logic ) is
     begin
+        assert( a = b )
+            report TEST_FAIL & "assert_eq" & LF &
+                "    a: " & to_string( a ) & LF &
+                "    b: " & to_string( b ) & LF
+                severity error;
+    end procedure assert_eq;
 
+    procedure assert_eq( a : in std_logic_vector; b : in std_logic_vector ) is
+    begin
         assert( a = b )
             report TEST_FAIL & "assert_eq" & LF &
                 "    a: " & to_string( a ) & LF &