X-Git-Url: https://pd.if.org/git/?p=pdclib.old;a=blobdiff_plain;f=functions%2Fstdio%2Ffopen.c;h=32a66a1fa13053a149e493ae779164cbbd0014d0;hp=bc9fab4183b42f9b73f2136af778588ac5aa00d4;hb=fa385ff36986ad3167e9cd9f74724d53c42ed3e4;hpb=f0c4a925a835e6efd444b2de5406219551dc65d4

diff --git a/functions/stdio/fopen.c b/functions/stdio/fopen.c
index bc9fab4..32a66a1 100644
--- a/functions/stdio/fopen.c
+++ b/functions/stdio/fopen.c
@@ -83,16 +83,18 @@ int main( void )
        my system is at once less forgiving (segfaults on mode NULL) and more
        forgiving (accepts undefined modes).
     */
-    remove( "testing/testfile" );
+    FILE * fh;
+    remove( testfile );
     TESTCASE_NOREG( fopen( NULL, NULL ) == NULL );
     TESTCASE( fopen( NULL, "w" ) == NULL );
     TESTCASE_NOREG( fopen( "", NULL ) == NULL );
     TESTCASE( fopen( "", "w" ) == NULL );
     TESTCASE( fopen( "foo", "" ) == NULL );
-    TESTCASE_NOREG( fopen( "testing/testfile", "wq" ) == NULL ); /* Undefined mode */
-    TESTCASE_NOREG( fopen( "testing/testfile", "wr" ) == NULL ); /* Undefined mode */
-    TESTCASE( fopen( "testing/testfile", "w" ) != NULL );
-    remove( "testing/testfile" );
+    TESTCASE_NOREG( fopen( testfile, "wq" ) == NULL ); /* Undefined mode */
+    TESTCASE_NOREG( fopen( testfile, "wr" ) == NULL ); /* Undefined mode */
+    TESTCASE( ( fh = fopen( testfile, "w" ) ) != NULL );
+    TESTCASE( fclose( fh ) == 0 );
+    remove( testfile );
     return TEST_RESULTS;
 }