diff --git a/lib/pinc_compiler/compiler.ml b/lib/pinc_compiler/compiler.ml
index cbe1a3e..2871810 100644
--- a/lib/pinc_compiler/compiler.ml
+++ b/lib/pinc_compiler/compiler.ml
@@ -499,8 +499,6 @@ and compile_stmt t (stmt : Pinc_Types.Ast.statement) =
       let t = compile_expr t e in
       emit t Pinc_Bytecode.Instruction.I_Pop
 
-and compile_tag _t (_tag : Pinc_Types.Ast.tag) = raise_notrace TODO
-
 and compile_template_node _t (node : Pinc_Types.Ast.template_node) =
   match node.template_node_desc with
   | TextTemplateNode _ -> raise_notrace TODO