Have all algorithm test programs call fips_algtest_init() at startup:

this will perform all standalone operations such as setting error
callbacks, entering FIPS mode etc.

fips/dsa/fips_dsatest.c

@@ -156,9 +156,7 @@ int main(int argc, char **argv)
 	BN_GENCB_set(&cb, dsa_cb, stderr);
 	FIPS_md_ctx_init(&mctx);
 
-    	fips_set_error_print();
-	if(!FIPS_mode_set(1))
-	    EXIT(1);
+    	fips_algtest_init();
 
 	fprintf(stderr,"test generation of DSA parameters\n");
 

fips/dsa/fips_dssvs.c

@@ -626,9 +626,7 @@ int main(int argc,char **argv)
 	fprintf(stderr,"%s [prime|pqg|pqgver|keypair|keyver|siggen|sigver]\n",argv[0]);
 	exit(1);
 	}
-    fips_set_error_print();
-    if(!FIPS_mode_set(1))
-	exit(1);
+    fips_algtest_init();
     if(!strcmp(argv[1],"prime"))
 	primes(in, out);
     else if(!strcmp(argv[1],"pqg"))