From c3567c81a4f3e2b58309edd3e03ad3c8f40e8475 Mon Sep 17 00:00:00 2001
From: Stephen Heumann <stephenheumann@gmail.com>
Date: Mon, 11 Jul 2022 18:23:36 -0500
Subject: [PATCH] Correct comments.

---
 Native.pas | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/Native.pas b/Native.pas
index 1f5652f..e48e711 100644
--- a/Native.pas
+++ b/Native.pas
@@ -2053,9 +2053,9 @@ procedure GenImpliedForFlags {p_opcode: integer};
 { parameters:                                                   }
 {       p_code - operation code (m_tax or m_tay)                }
 
-begin {GenImplied}
+begin {GenImpliedForFlags}
 GenNative(p_opcode, implied, 0, nil, forFlags);
-end; {GenImplied}
+end; {GenImpliedForFlags}
 
 
 procedure GenCall {callNum: integer};