Changeset 97c75bf for libcfa/src/startup.cfa

Timestamp:

Jul 5, 2026, 11:19:36 PM (5 days ago)

Author:

Peter A. Buhr <pabuhr@…>

Branches:

master

Children:

9df6059

Parents:

34d194c

Message:

change routine name from rdtscl to rdtsc

File:

• libcfa/src/startup.cfa (modified) (4 diffs)

libcfa/src/startup.cfa

@@ -10 +10 @@
 // Created On       : Tue Jul 24 16:21:57 2018
 // Last Modified By : Peter A. Buhr
-// Last Modified On : Mon Dec  5 11:41:58 2022
-// Update Count     : 73
+// Last Modified On : Sat Jul  4 15:28:52 2026
+// Update Count     : 88
 //
 
@@ -17 +17 @@
 #include <locale.h>                                                                             // setlocale
 #include <stdlib.h>                                                                             // getenv
-#include "bits/defs.hfa"                                                                // rdtscl
-#include "bits/random.hfa"                                                              // rdtscl
+#include "bits/defs.hfa"                                                                // libcfa_nopreempt
+#include "bits/random.hfa"                                                              // PRNG
+#include "bits/atomic.hfa"                                                              // rdtsc
 #include "startup.hfa"
 
@@ -39 +40 @@
         void __cfaabi_appready_startup( void ) __attribute__(( constructor( STARTUP_PRIORITY_APPREADY ) ));
         void __cfaabi_appready_startup( void ) {
+                // Initialized here to prevent unfreed memory messages.
                 tzset();                                                                                // initialize time global variables
+                setlocale( LC_ALL, getenv( "LANG" ) );                  // print digit separator
+                setlocale( LC_ALL, "C" );
                 extern void heapAppStart();
                 heapAppStart();
@@ -69 +73 @@
         void __cfaabi_core_startup( void ) __attribute__(( constructor( STARTUP_PRIORITY_CORE ) ));
         void __cfaabi_core_startup( void ) {
-                __global_random_seed = rdtscl();
+                __global_random_seed = rdtsc();
                 PRNG_SET_SEED( __global_random_state, __global_random_seed );