File tree Expand file tree Collapse file tree
Expand file tree Collapse file tree Original file line number Diff line number Diff line change @@ -425,7 +425,18 @@ Class BuilderInstance
425425 Endif
426426
427427 If Not transFile Continue
428-
428+
429+ 'For intra-module generic instances, ensure they are
430+ 'in their original transFile. No new FileDecl needed
431+ 'since they belong to the same module and are already
432+ 'emitted by the translator from the original file.
433+ If transFile.module=module
434+ If ctype And Not transFile.classes.Contains( ctype )
435+ transFile.classes.Push( ctype )
436+ Endif
437+ Continue
438+ Endif
439+
429440 Local transFile2:=transFile
430441
431442 transFile=transFiles[transFile2.ident]
Original file line number Diff line number Diff line change @@ -284,7 +284,7 @@ Class ClassType Extends Type
284284 Endif
285285
286286 transFile.extclasses.Add( Self )
287- Else If Not IsGenInstance
287+ Else
288288 transFile.classes.Add( Self )
289289 Endif
290290
You can’t perform that action at this time.
0 commit comments