plusplus: fix issue with module initialization functioon

internal functions for module initialization .mod_init and .fn_init has no location
in source file, therefore location pointer is NULL

Author: jmalak

bld/plusplus/c/fnbody.c

@@ -1733,6 +1733,15 @@ void FunctionBodyStartup(       // COMMON START-UP FOR ALL COMPILED FUNCTIONS
     doFnStartup( func, f, NULL, &func->locn->tl, flags );
 }
 
+void FunctionBodyStartupNoloc(  // START-UP FOR INTERNAL FUNCTIONS
+    SYMBOL func,                // - function being compiled
+    FUNCTION_DATA *f,           // - function data for current function
+    enum special_func flags )   // - extra flags
+{
+    initFunctionData( func, f );
+    doFnStartup( func, f, NULL, NULL, flags );
+}
+
 static void flushToDepth1( FUNCTION_DATA *f )
 {
     depth_t depth;

bld/plusplus/c/module.c

@@ -2,7 +2,7 @@
 *
 *                            Open Watcom Project
 *
-* Copyright (c) 2002-2024 The Open Watcom Contributors. All Rights Reserved.
+* Copyright (c) 2002-2026 The Open Watcom Contributors. All Rights Reserved.
 *    Portions Copyright (c) 1983-2002 Sybase, Inc. All Rights Reserved.
 *
 *  ========================================================================
@@ -205,7 +205,7 @@ void ModuleInitInit(            // START MODULE-INITIALIZATION FUNCTION
     module_init_func = module_init;
     SetCurrScope(GetFileScope());
     ScopeBeginFunction( module_init );
-    FunctionBodyStartup( module_init, &module_fd, FUNC_NULL );
+    FunctionBodyStartupNoloc( module_init, &module_fd, FUNC_NULL );
     module_fd.retn_opt = false;
     module_init_scope = GetCurrScope();
     ScopeKeep( module_init_scope );

bld/plusplus/h/fnbody.h

@@ -2,7 +2,7 @@
 *
 *                            Open Watcom Project
 *
-* Copyright (c) 2024      The Open Watcom Contributors. All Rights Reserved.
+* Copyright (c) 2024-2026 The Open Watcom Contributors. All Rights Reserved.
 *    Portions Copyright (c) 1983-2002 Sybase, Inc. All Rights Reserved.
 *
 *  ========================================================================
@@ -153,6 +153,7 @@ extern void FunctionBodyDeadCode( void );
 extern INIT_VAR *FunctionBodyGetInit( FUNCTION_DATA * );
 extern void FunctionBodyShutdown( SYMBOL, FUNCTION_DATA * );
 extern void FunctionBodyStartup( SYMBOL, FUNCTION_DATA *, enum special_func );
+extern void FunctionBodyStartupNoloc( SYMBOL, FUNCTION_DATA *, enum special_func );
 extern void FunctionBodyDefargShutdown( FUNCTION_DATA * );
 extern void FunctionBodyDefargStartup( SYMBOL, FUNCTION_DATA * );
 extern PTREE FunctionCalled( PTREE, SYMBOL );