summaryrefslogtreecommitdiff
path: root/src/optimize.ml
diff options
context:
space:
mode:
Diffstat (limited to 'src/optimize.ml')
-rw-r--r--src/optimize.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/optimize.ml b/src/optimize.ml
index a372abf4..1fc2fbe8 100644
--- a/src/optimize.ml
+++ b/src/optimize.ml
@@ -87,7 +87,7 @@ let recheck (Defs defs) =
!specs @ !bodies @ find_optimizations defs
| _ ->
- Util.warn ("Unrecognised optimize pragma in this context: " ^ pragma);
+ Reporting.warn "Unrecognised optimize pragma at" p_l "";
def1 :: def2 :: find_optimizations defs
end