diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el
index ebff28bf7c379ccb822d62ab8844fb48ec091f01..867c06c600ea327e1c153f49cdbed89951ee2e0e 100644
--- a/lisp/progmodes/compile.el
+++ b/lisp/progmodes/compile.el
@@ -137,7 +137,9 @@ of[ \t]+\"?\\([^\"\n]+\\)\"?:" 3 2)
     ;;	"foo.f", line 3: Error: syntax error near end of statement
     ;; IBM RS6000:
     ;;  "vvouch.c", line 19.5: 1506-046 (S) Syntax error.
-    ("\"\\([^,\" \n\t]+\\)\", line \\([0-9]+\\)[:.]" 1 2)
+    ;; Unknown compiler:
+    ;;  File "foobar.ml", lines 5-8, characters 20-155: blah blah
+    ("\"\\([^,\" \n\t]+\\)\", lines? \\([0-9]+\\)[:.,-]" 1 2)
 
     ;; MIPS RISC CC - the one distributed with Ultrix:
     ;;	ccom: Error: foo.c, line 2: syntax error