diff options
Diffstat (limited to 'nim/rodwrite.pas')
-rw-r--r-- | nim/rodwrite.pas | 3 |
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; |