From 53d7bc42d1de0f4ed24d475e5cb04670842d82e0 Mon Sep 17 00:00:00 2001
From: Egor Sheremetov <egor.sheremetov@yandex.ru>
Date: Wed, 17 Apr 2024 11:26:47 +0300
Subject: [PATCH] Changed gen_line method

---
 src/X86.ml | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/X86.ml b/src/X86.ml
index cf302944d..60fa0b794 100644
--- a/src/X86.ml
+++ b/src/X86.ml
@@ -887,7 +887,7 @@ let compile cmd env imports code =
                           (Printf.sprintf "Unexpected pattern: StrCmp %s: %d"
                              __FILE__ __LINE__))
                   1 false
-            | LINE line -> env#gen_line line
+            | LINE line -> env#gen_line
             | FAIL ((line, col), value) ->
                 let v, env = if value then (env#peek, env) else env#pop in
                 let msg_addr, env = env#string cmd#get_infile in
@@ -1257,7 +1257,7 @@ class env prg =
       @ SymbolicStack.live_registers stack
 
     (* generate a line number information for current function *)
-    method gen_line line =
+    method gen_line =
       let lab = Printf.sprintf ".L%d" nlabels in
       ( {<nlabels = nlabels + 1; first_line = false>},
         if fname = "main" then