diff --git a/compiler/ogomf.pas b/compiler/ogomf.pas index 35cfe63d5e..fbb5a6cbac 100644 --- a/compiler/ogomf.pas +++ b/compiler/ogomf.pas @@ -787,12 +787,6 @@ implementation g: TOmfRecord_GRPDEF; begin g:=TOmfRecord_GRPDEF(Groups.Find(groupname)); - if g=nil then - begin - g:=TOmfRecord_GRPDEF.Create; - Groups.Add(groupname,g); - g.GroupNameIndex:=LNames.Add(groupname); - end; g.AddSegmentIndex(segindex); end;