diff --git a/lib/compiler.ml b/lib/compiler.ml
index ecd66ff..ff13585 100644
--- a/lib/compiler.ml
+++ b/lib/compiler.ml
@@ -10,8 +10,6 @@ let gen_vertex =
     incr cnt;
     [%string "X%{!cnt#Int}"]
 
-exception Score_invalid_arguments
-
 let rec peval : type a. (a, det) texp -> (a, det) texp =
  fun ({ ty; exp } as texp) ->
   match exp with