summary refs log tree commit diff stats
path: root/nim/rodwrite.pas
diff options
context:
space:
mode:
Diffstat (limited to 'nim/rodwrite.pas')
-rw-r--r--nim/rodwrite.pas3
1 files changed, 3 insertions, 0 deletions
diff --git a/nim/rodwrite.pas b/nim/rodwrite.pas
index 637f69ff7..72d5c893d 100644
--- a/nim/rodwrite.pas
+++ b/nim/rodwrite.pas
@@ -530,6 +530,7 @@ begin
     nkVarSection: begin
       for i := 0 to sonsLen(n)-1 do begin
         a := n.sons[i];
+        if a.kind = nkCommentStmt then continue;
         if a.kind <> nkIdentDefs then InternalError(a.info, 'rodwrite.process');
         addInterfaceSym(w, a.sons[0].sym);
       end
@@ -537,6 +538,7 @@ begin
     nkConstSection: begin
       for i := 0 to sonsLen(n)-1 do begin
         a := n.sons[i];
+        if a.kind = nkCommentStmt then continue;
         if a.kind <> nkConstDef then InternalError(a.info, 'rodwrite.process');
         addInterfaceSym(w, a.sons[0].sym);
       end
@@ -544,6 +546,7 @@ begin
     nkTypeSection: begin
       for i := 0 to sonsLen(n)-1 do begin
         a := n.sons[i];
+        if a.kind = nkCommentStmt then continue;
         if a.sons[0].kind <> nkSym then
           InternalError(a.info, 'rodwrite.process');
         s := a.sons[0].sym;