diff --git a/compiler/agjasmin.pas b/compiler/agjasmin.pas index 22dfb5628c..1f32c34e7d 100644 --- a/compiler/agjasmin.pas +++ b/compiler/agjasmin.pas @@ -411,7 +411,7 @@ implementation begin { fake class type for unit -> name=unitname and superclass=java.lang.object } - AsmWriteLn('.class '+ChangeFileExt(ExtractFileName(n),'')); + AsmWriteLn('.class '+current_module.realmodulename^); AsmWriteLn('.super java/lang/Object'); end else