Index: trunk/psLib/test/pstap/src/pstap.h
===================================================================
--- trunk/psLib/test/pstap/src/pstap.h	(revision 9535)
+++ trunk/psLib/test/pstap/src/pstap.h	(revision 9747)
@@ -16,9 +16,12 @@
            // use to test the value of a double
            # define ok_double(VALUE,EXPECT,COMMENT, ...)\
-           ok(fabsl(((VALUE)-(EXPECT)) < DBL_EPSILON), COMMENT, ## __VA_ARGS__);
+           ok((fabsl((VALUE)-(EXPECT)) < DBL_EPSILON), COMMENT, ## __VA_ARGS__);
 
 // use to test the value of a float
 # define ok_float(VALUE,EXPECT,COMMENT, ...)\
-ok(fabs(((VALUE)-(EXPECT)) < FLOAT_EPSILON), COMMENT, ## __VA_ARGS__);
+ok((fabs((VALUE)-(EXPECT)) < FLT_EPSILON), COMMENT, ## __VA_ARGS__);
+
+# define ok_str(VALUE,EXPECT,COMMENT, ...)\
+ok(strcmp(VALUE, EXPECT) == 0, COMMENT, ## __VA_ARGS__);
 
 #elif __STDC_VERSION__ >= 199901L /* __GNUC__ */
@@ -26,9 +29,12 @@
 // use to test the value of a double
 # define ok_double(VALUE,EXPECT, ...)\
-ok(fabsl(((VALUE)-(EXPECT)) < DBL_EPSILON), __VA_ARGS__);
+ok((fabsl((VALUE)-(EXPECT)) < DBL_EPSILON), __VA_ARGS__);
 
 // use to test the value of a float
 # define ok_float(VALUE,EXPECT, ...)\
-ok(fabs(((VALUE)-(EXPECT)) < FLOAT_EPSILON), __VA_ARGS__);
+ok((fabs((VALUE)-(EXPECT)) < FLT_EPSILON), __VA_ARGS__);
+
+# define ok_str(VALUE,EXPECT, ...)\
+ok(strcmp(VALUE, EXPECT) == 0, __VA_ARGS__);
 
 #else /* __STDC_VERSION__ */