From 7914f8ad9d05f6de175965f913838e0689efc112 Mon Sep 17 00:00:00 2001
From: Martin Whitaker <icarus@martin-whitaker.me.uk>
Date: Tue, 20 Dec 2022 18:06:28 +0000
Subject: [PATCH] Add a few comments in the compiler scanner.

---
 lexor.lex | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/lexor.lex b/lexor.lex
index e13b680bb..972bb42b3 100644
--- a/lexor.lex
+++ b/lexor.lex
@@ -645,7 +645,7 @@ TU [munpf]
 `celldefine    { in_celldefine = true; }
 `endcelldefine { in_celldefine = false; }
 
-  /* Notice and handle the resetall directive. */
+  /* Notice and handle the `resetall directive. */
 
 `resetall {
       if (in_module) {
@@ -681,6 +681,8 @@ TU [munpf]
       VLerror(yylloc, "error: Invalid `unconnected_drive directive.");
       BEGIN(0); }
 
+  /* Notice and handle the `nounconnected_drive directive. */
+
 `nounconnected_drive {
       if (in_module) {
 	    VLerror(yylloc, "error: `nounconnected_drive directive cannot be "
@@ -710,6 +712,8 @@ TU [munpf]
 ^{W}?`suppress_faults{W}?.*         {  }
 ^{W}?`uselib{W}?.*                  {  }
 
+  /* Notice and handle the `begin_keywords directive. */
+
 `begin_keywords { BEGIN(PPBEGIN_KEYWORDS); }
 
 <PPBEGIN_KEYWORDS>\"[a-zA-Z0-9 -\.]*\" {
@@ -777,6 +781,8 @@ TU [munpf]
       VLerror(yylloc, "error: Invalid `begin_keywords directive.");
       BEGIN(0); }
 
+  /* Notice and handle the `end_keywords directive. */
+
 `end_keywords {
       if (!keyword_mask_stack.empty()) {
 	    lexor_keyword_mask = keyword_mask_stack.front();