Changeset 10788

Timestamp:

Dec 16, 2006, 11:49:09 PM (20 years ago)

Author:

magnier

Message:

added note(), fixed fabs/fabsl vs fabsf/fabs

File:

• trunk/psModules/test/pstap/src/pstap.h (modified) (2 diffs)

trunk/psModules/test/pstap/src/pstap.h

@@ -3 +3 @@
 #include "tap.h"
 
-#define done() ok(psMemCheckLeaks(0, NULL, stdout, false) == 0, "Memory Leaks"); \
-return exit_status()
+#define done() ok(psMemCheckLeaks(0, NULL, stdout, false) == 0, "Memory Leaks"); return exit_status()
 
-       # define mem() ok(psMemCheckLeaks(psMemGetLastId(), NULL, stdout, false) == 0, "Memory Leaks")
+        # define mem() ok(psMemCheckLeaks(psMemGetLastId(), NULL, stdout, false) == 0, "Memory Leaks")
 
-       # define checkLeaks false
+        # define checkLeaks false
 
-       # define checkMem() if(checkLeaks) mem()
+        # define checkMem() if(checkLeaks) mem()
 
-           # ifdef __GNUC__
+            # ifdef __GNUC__
 
-           // use to test the value of a float
-           # define ok_float(VALUE,EXPECT,COMMENT, ...)\
-           ok((fabs((VALUE)-(EXPECT)) < FLT_EPSILON), COMMENT, ## __VA_ARGS__);
+            // write a comment which is counted as a test (and swallowed by prove)
+            # define note(A, ...) _gen_result(1, __func__, __FILE__, __LINE__, A, ## __VA_ARGS__);
+
+// use to test the value of a float
+# define ok_float(VALUE,EXPECT,COMMENT, ...)\
+ok((fabsf((VALUE)-(EXPECT)) < FLT_EPSILON), COMMENT, ## __VA_ARGS__);
 
 // use to test the value of a double
 # define ok_double(VALUE,EXPECT,COMMENT, ...)\
-ok((fabsl((VALUE)-(EXPECT)) < DBL_EPSILON), COMMENT, ## __VA_ARGS__);
+ok((fabs((VALUE)-(EXPECT)) < DBL_EPSILON), COMMENT, ## __VA_ARGS__);
 
 // use to test the value of a float within a defined tolerance
 # define ok_float_tol(VALUE,EXPECT,TOL,COMMENT, ...)\
-ok((fabs((VALUE)-(EXPECT)) < (TOL)), COMMENT, ## __VA_ARGS__);
+ok((fabsf((VALUE)-(EXPECT)) < (TOL)), COMMENT, ## __VA_ARGS__);
 
 // use to test the value of a double within a defined tolerance
 # define ok_double_tol(VALUE,EXPECT,TOL,COMMENT, ...)\
-ok((fabsl((VALUE)-(EXPECT)) < (TOL)), COMMENT, ## __VA_ARGS__);
+ok((fabs((VALUE)-(EXPECT)) < (TOL)), COMMENT, ## __VA_ARGS__);
 
 # define ok_str(VALUE,EXPECT,COMMENT, ...)\
@@ -35 +37 @@
 #elif __STDC_VERSION__ >= 199901L /* __GNUC__ */
 
+// write a comment which is counted as a test (and swallowed by prove)
+# define note(A, ...) _gen_result(1, __func__, __FILE__, __LINE__, A, ...);
+
 // use to test the value of a float
 # define ok_float(VALUE,EXPECT, ...)\
-ok((fabs((VALUE)-(EXPECT)) < FLT_EPSILON), __VA_ARGS__);
+ok((fabsf((VALUE)-(EXPECT)) < FLT_EPSILON), __VA_ARGS__);
 
 // use to test the value of a double
 # define ok_double(VALUE,EXPECT, ...)\
-ok((fabsl((VALUE)-(EXPECT)) < DBL_EPSILON), __VA_ARGS__);
+ok((fabs((VALUE)-(EXPECT)) < DBL_EPSILON), __VA_ARGS__);
 
 // use to test the value of a float
 # define ok_float_tol(VALUE,EXPECT,TOL, ...)\
-ok((fabs((VALUE)-(EXPECT)) < (TOL)), __VA_ARGS__);
+ok((fabsf((VALUE)-(EXPECT)) < (TOL)), __VA_ARGS__);
 
 // use to test the value of a double
 # define ok_double_tol(VALUE,EXPECT,TOL, ...)\
-ok((fabsl((VALUE)-(EXPECT)) < )(TOL)), __VA_ARGS__);
+ok((fabs((VALUE)-(EXPECT)) < )(TOL)), __VA_ARGS__);
 
 # define ok_str(VALUE,EXPECT, ...)\