Commit eca7358b authored Jul 02, 2011 by Dr. Stephen Henson

Additional error checking.

parent da5e9871

ms/do_fips.bat

+2 −0

Original line number	Diff line number	Diff line
		@@ -56,7 +56,9 @@ perl util\mk1mf.pl dll %ASM% %TARGET% >ms\ntdll.mak
		@if ERRORLEVEL 1 goto error

		nmake -f ms\ntdll.mak clean
		@if ERRORLEVEL 1 goto error
		nmake -f ms\ntdll.mak
		@if ERRORLEVEL 1 goto error
		nmake -f ms\ntdll.mak install
		@if ERRORLEVEL 1 goto error

util/fipsas.pl

+3 −3

Original line number	Diff line number	Diff line
		@@ -49,11 +49,11 @@ while (<IN>)
		my ($from, $to);

		#rename target temporarily
		rename($target, "tmptarg.s") \|\| die "Can't rename $target\n";
		rename($target, "tmptarg.s") \|\| die "Can't rename $target";

		#edit target
		open IN,"tmptarg.s";
		open OUT, ">$target";
		open(IN,"tmptarg.s") \|\| die "Can't open temporary file";
		open(OUT, ">$target") \|\| die "Can't open output file $target";

		while (<IN>)
		{