read_dimacs_cnf_file ignores more comment lines
authorwebertj
Thu, 31 Aug 2006 02:22:05 +0200
changeset 20441 a9034285b96b
parent 20440 e6fe74eebda3
child 20442 04621ea9440e
read_dimacs_cnf_file ignores more comment lines
src/HOL/Tools/sat_solver.ML
--- a/src/HOL/Tools/sat_solver.ML	Wed Aug 30 16:27:53 2006 +0200
+++ b/src/HOL/Tools/sat_solver.ML	Thu Aug 31 02:22:05 2006 +0200
@@ -283,7 +283,7 @@
 		fun filter_preamble [] =
 			error "problem line not found in DIMACS CNF file"
 		  | filter_preamble (line::lines) =
-			if String.isPrefix "c " line then
+			if String.isPrefix "c " line orelse line = "c" then
 				(* ignore comments *)
 				filter_preamble lines
 			else if String.isPrefix "p " line then