Changeset 95bda0a for libcfa/src/common.hfa

Timestamp:

Oct 8, 2022, 4:29:32 PM (23 months ago)

Author:

Peter A. Buhr <pabuhr@…>

Branches:

ADT, ast-experimental, master

Children:

301071a, affb51b

Parents:

b2ddaf3

Message:

add attribute always_inline to many CFA-library cover-routines to force inlining

File:

• libcfa/src/common.hfa (modified) (7 diffs)

libcfa/src/common.hfa

@@ -10 +10 @@
 // Created On       : Wed Jul 11 17:54:36 2018
 // Last Modified By : Peter A. Buhr
-// Last Modified On : Wed May  5 14:02:04 2021
-// Update Count     : 18
+// Last Modified On : Sat Oct  8 08:32:57 2022
+// Update Count     : 23
 //
 
@@ -31 +31 @@
         long long int llabs( long long int );
 } // extern "C"
-
-static inline {
+static inline __attribute__((always_inline)) {
         unsigned char abs( signed char v ) { return abs( (int)v ); }
         // use default C routine for int
@@ -44 +43 @@
         long double fabsl( long double );
 } // extern "C"
-static inline {
+static inline __attribute__((always_inline)) {
         float abs( float x ) { return fabsf( x ); }
         double abs( double x ) { return fabs( x ); }
@@ -55 +54 @@
         long double cabsl( long double _Complex );
 } // extern "C"
-static inline {
+static inline __attribute__((always_inline)) {
         float abs( float _Complex x ) { return cabsf( x ); }
         double abs( double _Complex x ) { return cabs( x ); }
@@ -66 +65 @@
 //---------------------------------------
 
-static inline {
+static inline __attribute__((always_inline)) {
         char min( char v1, char v2 ) { return v1 < v2 ? v1 : v2; } // optimization
         int min( int v1, int v2 ) { return v1 < v2 ? v1 : v2; }
@@ -74 +73 @@
         long long int min( long long int v1, long long int v2 ) { return v1 < v2 ? v1 : v2; }
         unsigned long long int min( unsigned long long int v1, unsigned int v2 ) { return v1 < v2 ? v1 : v2; }
-        forall( T | { int ?<?( T, T ); } )
+        forall( T | { int ?<?( T, T ); } )                                      // generic
         T min( T v1, T v2 ) { return v1 < v2 ? v1 : v2; }
 
@@ -84 +83 @@
         long long int max( long long int v1, long long int v2 ) { return v1 > v2 ? v1 : v2; }
         unsigned long long int max( unsigned long long int v1, unsigned long long int v2 ) { return v1 > v2 ? v1 : v2; }
-        forall( T | { int ?>?( T, T ); } )
+        forall( T | { int ?>?( T, T ); } )                                      // generic
         T max( T v1, T v2 ) { return v1 > v2 ? v1 : v2; }