DEC C
User's Guide for OpenVMS Systems


Previous Contents Index

5.4.4.9 Example

Example 5-1 shows the use of #pragma extern_model in a sample module. Assume that the module is compiled with the /EXTERN_MODEL=COMMON and /SHARE_GLOBALS qualifiers.

Example 5-1 #pragma extern_model Example

#pragma extern_model save 
(1)globaldef "BAR1" int FOO1;           /* strict_refdef shr def  */ 
(2)extern int com1;                     /* common_block shr def   */ 
(3)int com2;                            /* common_block shr def   */ 
#pragma extern_model common_block noshr 
(4)globaldef "BAR2" int FOO2;           /* strict_refdef shr def  */ 
(5)extern int com3 = 23;                /* common_block noshr def */ 
#pragma extern_model globalvalue 
(6)int gv1;                             /* globalvalue def        */ 
(7)extern int gv2;                      /* globalvalue ref        */ 
(8)int gv3 = 5;                         /* globalvalue def        */ 
(9)extern int gv4 = 42;                 /* globalvalue def        */ 
#pragma extern_model strict_refdef "BAR1" shr 
(10)int FOO1A;                           /* strict_refdef shr def  */ 
(11)extern int FOO1B;                    /* strict_refdef ref      */ 
(12)globaldef "BAR3" noshare int foo3; 
#pragma extern_model relaxed_refdef 
(13)int rrd1;                            /* relaxed_refdef noshr def */ 
(14)extern rrd2;                         /* relaxed_refdef ref     */ 
#pragma extern_model restore 
(15)int com4;                            /* common_block shr def   */ 

Key to Example 5-1:

  1. (1) foo1 has the strict_refdef model with the share attribute (because of /SHARE). It resides in psect bar1 .
  2. (2) com1 has the common_block model with the share attribute. Like all common_block globals, com1 is a definition.
  3. (3) com2 has the common_block model with the share attribute. Like all common_block globals, com2 is a definition.
  4. (4) foo2 has the strict_refdef model with the share attribute. The /SHARE qualifier overrides the noshr keyword on the preceding #pragma extern_model . foo2 resides in psect bar2 .
  5. (5) com3 has the common_block model with the noshare attribute.
  6. gv1 has the globalvalue model. It is a definition. Since it lacks an explicit initializer, gv1 is implicitly initialized to 0. Therefore, it is a globalvalue with a link-time value of 0.
  7. gv2 has the globalvalue model. It is a reference.
  8. gv3 has the globalvalue model. It is a definition with a link-time value of 5.
  9. (9) gv4 has the globalvalue model. It is a definition with a link-time value of 42.
  10. (10) foo1a has the strict_refdef model with the noshare attribute. It is a definition and resides in the psect bar1 .
  11. (11) foo1b has the strict_refdef model and is a reference. Since it is a reference, it will reside in whatever psect is specified by the definition.
  12. (12) foo3 has the strict_refdef model with the noshare attribute. It is a definition and resides in the psect bar3 .
  13. (13) rrd1 has the relaxed_refdef model with the noshare attribute. It is a definition.
  14. (14) rrd2 has the relaxed_refdef model and is a reference.
  15. (15) com4 has the common_block model with the share attribute, because the preceding line popped the external model back to its command-line state.

5.4.5 #pragma extern_prefix Directive

The #pragma extern_prefix directive controls the compiler's synthesis of external names, which the linker uses to resolve external name requests.

When you specify #pragma extern_prefix with a string argument, the DEC C++ compiler attaches the string to the beginning of all external names produced by the declarations that follow the pragma specification.

This pragma is useful for creating libraries where the facility code can be attached to the external names in the library.

The #pragma extern_prefix directive has the following format:

#pragma extern_prefix "string" #pragma extern_prefix save #pragma extern_prefix restore

The quoted "string" is attached to external names in the declarations that follow the pragma specification.

The save and restore keywords can be used to save the current pragma prefix string and to restore the previously saved pragma prefix string, respectively.

The default external prefix, when none has been specified by a pragma, is the null string.

The recommended use is as follows:

When an extern_prefix is in effect and you are using #include to include header files, but do not want the extern_prefix to apply to extern declarations in the header files, use the following code sequence:

Otherwise, external prefix is attached to the beginning of external identifiers for definitions in the included files.

All external names prefixed with a nonnull string using #pragma extern_prefix are converted to uppercase letters regardless of the setting of the /NAMES qualifier.

The DEC C compiler treats #pragma extern_prefix independently of the /PREFIX_LIBRARY_ENTRIES qualifier. The /PREFIX_LIBRARY_ENTRIES qualifier affects only ANSI C and DEC C Run-Time Library (RTL) entries; the extern_prefix pragma affects external identifiers for any externally visible name that is explicitly declared.

5.4.6 #pragma function Directive (ALPHA ONLY)

Specifies that calls to the specified functions are not intrinsic but are, in fact, function calls. This pragma has the opposite effect of #pragma intrinsic .

The #pragma function directive has the following format:

#pragma function (function1[, function2, ...])

5.4.7 #pragma [no]inline Directive

Function inlining is the inline expansion of function calls; it replaces the function call with the function code itself. Inline expansion of functions reduces execution time by eliminating function-call overhead and allowing the compiler's general optimization methods to apply across the expanded code. Compared with the use of function-like macros, function inlining has the following advantages:

Also, the semantics are exactly the same as if inline expansion had not occurred. You cannot get this behavior using macros.

Use the following preprocessor directives to control function inlining:

#pragma inline ( id,...)


#pragma noinline ( id,...)

The id is a function identifier.

If a function is named in an inline directive, calls to that function will be expanded as inline code, if possible.

If a function is named in a noinline directive, calls to that function will not be expanded as inline code.

If a function is named in both an inline and a noinline directive, an error message is issued.

For calls to functions named in neither an inline nor a noinline directive, DEC C expands the function as inline code whenever appropriate as determined by a platform-specific algorithm.

Use of the #pragma inline directive causes inline expansion regardless of the size or number of times the specified functions are called.

In the following example of function inlining, the functions push and pop are expanded inline throughout the module in which the #pragma inline appears:


void push(int); 
int pop(void); 
 
#pragma inline(push, pop) 
 
int stack[100]; 
int *stackp = &stack; 
 
void push(int x) 
{ 
    if (stackp == &stack) 
        *stackp = x; 
    else 
        *stackp++ = x; 
} 
 
int pop() 
{ 
    return *stackp--; 
} 
 
main() 
{ 
 
  push(1); 
  printf("The top of stack is now %d \n",pop()); 
} 

By default, DEC C for OpenVMS Systems attempts to provide inline expansion for all functions, and uses the following function characteristics to determine if it can provide inline expansion:

If a function is to be expanded inline, you must place the function definition in the same module as the function call. The definition can appear either before or after the function call.

5.4.8 #pragma intrinsic Directive (ALPHA ONLY)

The #pragma intrinsic preprocessor directive specifies that calls to the specified functions are intrinsic. An intrinsic function is an apparent function call that could be handled as an actual call to the specified function, or could be handled by the compiler in a different manner. By treating the function as an intrinsic, the compiler can often generate faster code. (Contrast with a built-in function, which is an apparent function call that is never handled as an actual function call. There is never a function with the specified name.)

This pragma has the opposite effect of #pragma function .

The #pragma intrinsic directive has the following format:

#pragma intrinsic (function1[,function2, ...])

Functions that can be handled as intrinsics are:


Main Group - ANSI: 
 
  abs     atan2   ceilf   cosl    floorl   memset  sinl 
  atan    atan2f  ceill   fabs    labs     sin     strcpy 
  atanf   atan2l  cos     floor   memcpy   sinf    strlen 
  atanl   ceil    cosf    floorf  memmove 
 
Main Group - Non-ANSI: 
 
  alloca  atand   atand2  bcopy   bzero    cosd    sind 
 
Printf functions: 
 
  fprintf printf sprintf 
 
Printf non-ANSI: 
 
  snprintf 
 
ANSI math functions that set errno, 
thereby requiring /ASSUME=NOMATH_ERRNO: 
 
  acos    asinl   expf    log10    powl   sqrtf  tanh 
  acosf   cosh    expl    log10f   sinh   sqrtl  tanhf 
  acosl   coshf   log     log10l   sinhf  tan    tanhl 
  asin    coshl   logf    pow      sinhl  tanf 
  asinf   exp     logl    powf     sqrt   tanl 
 
Non-ANSI math functions that set errno, 
thereby requiring /ASSUME=NOMATH_ERRNO: 
 
  log2 
  tand 

Also see Section 1.3.4 for a description of the [NO]INTRINSICS option of the /OPTIMIZE qualifier, which controls whether or not certain functions are handled as intrinsic functions without explicitly enabling each of them as an intrinsic through the #pragma intrinsic directive.

Also, the asm , fasm , and dasm functions are intrinsics and require use of #pragma intrinsic . See Section 6.2.1.2 for a description of these functions.

5.4.9 #pragma linkage Directive (ALPHA ONLY)

The #pragma linkage preprocessor directive allows you to specify special linkage types for function calls. This pragma is used with the #pragma use_linkage directive, described in Section 5.4.17, to associate a previously defined special linkage with a function.

The #pragma linkage directive has the following format:

#pragma linkage linkage-name = (characteristics)

The linkage-name is the name to be given to the linkage type being defined. It has the form of a C identifier. Linkage types have their own name space, so their names will not conflict with other identifiers or keywords in the compilation unit.

The characteristics specify information about where parameters will be passed, where the results of the function are to be received, and what registers are modified by the function call. Specify these characteristics as a parenthesized list of comma-separated items of the following forms:

parameters (register-list)
result (simple-register-list)
preserved (simple-register-list)
nopreserve (simple-register-list)
notused (simple-register-list)
notneeded (ai, lp)

You can supply the parameters , result , preserved , nopreserve , notused , and notneeded keywords in any order.

A simple-register-list is a comma-separated list of register names, either Rn or Fn, where n is a valid register number. A register-list is similar to a simple-register-list except that it can contain parenthesized sublists.

Valid registers for the preserved , nopreserve , and notused options include general-purpose registers R0 through R30, and floating-point registers F0 through F30. Valid registers for the result and parameters options include general-purpose registers R0 through R25 and floating-point registers F0 through F30.

For example, the following characteristics specify a simple-register-list containing two elements, registers F3 and F4; and a register-list containing two elements, the register R0 and a sublist containing the registers F0 and F1:


nopreserve(f3, f4) 
parameters(r0, (f0, f1)) 

The following example shows a linkage using such characteristics:


#pragma linkage my_link=(nopreserve(f3,f4), parameters(r0,(f0,f1)), notneeded (ai)) 

The parenthesized notation in a register-list is used to describe arguments and function return values of type struct , where each member of the struct is passed in a single register. In the following example, sample_linkage specifies two parameters: the first is passed in registers R0, R1, and R2; the second is passed in F1:


struct sample_struct_t { 
    int A, B; 
    short C; 
    } sample_struct; 
 
#pragma linkage sample_linkage = (parameters ((r0, r1, r2), f1)) 
void sub (struct sample_struct_t p1, double p2) { } 
 
main() 
{ 
    double d; 
 
    sub (sample_struct, d); 
} 

You can pass arguments to the parameters of a routine in specific registers. To specify this information, use the following form, where each item in the register-list describes one parameter that is passed to the routine:

parameters (register-list)

You can pass structure arguments by value, with the restriction that each member of the structure is passed in a separate parameter location. Doing so, however, may produce code that is slower because of the large number of registers used. The compiler does not diagnose this condition.

DEC C does not support unions as parameters or function return types for a function with a special linkage.

When a function associated with a linkage type is declared or defined, the compiler checks that the size of any declared parameters is compatible with the number of registers specified for the corresponding parameter in the linkage definition.

The compiler needs to know the registers that will be used to return the value for the function. To specify this information use the following form, where the register-list must contain only a single register, or a parenthesized group of registers if the routine returns a struct :

result (register-list)

If a function does not return a value (that is, the function has a return type of void ), then do not specify result as part of the linkage.

The compiler needs to know which registers are used by the function and which are not, and of those used, whether or not they are preserved across the function call. To specify this information, use the following forms:

preserved (register-list)
nopreserve (register-list)
notused (register-list)

A preserved register contains the same value after a call to the function as it did before the call.

A nopreserve register does not necessarily contain the same value after a call to the function as it did before the call.

A notused register is not used in any way by the called function.

The notneeded characteristic indicates that certain items are not needed by the routines using this linkage. You can specify one or both of the following keywords:

You must determine whether or not it is valid to specify that the ai or lp registers are not needed.

The #pragma linkage directive has the restriction that structures containing nested substructures are not supported as parameters or function return types with special linkages.

5.4.10 #pragma [no]member_alignment Directive

By default, DEC C for OpenVMS VAX systems does not align structure members on natural boundaries; they are stored on byte boundaries (with the exception of bit-field members).

By default, DEC C for OpenVMS Alpha systems does align structure members on natural boundaries.

The #pragma member_alignment preprocessor directive can be used to force natural-boundary alignment of structure members. The #pragma nomember_alignment preprocessor directive restores byte-alignment of structure members.

This pragma has the following formats:

#pragma member_alignment
#pragma member_alignment save
#pragma member_alignment restore
#pragma nomember_alignment [base_alignment]

When #pragma member_alignment is used, the compiler aligns structure members on the next boundary appropriate to the type of the member, rather than on the next byte. For example, a long variable is aligned on the next longword boundary; a short variable is aligned on the next word boundary.

Consider the following example:


#pragma nomember_alignment 
 
struct x { 
           char c; 
           int b; 
           }; 
 
#pragma member_alignment 
 
struct y { 
          char c;       /*3 bytes of filler follow c */ 
          int b; 
          }; 
 
main () 
 
{ 
        printf( "The sizeof y is: %d\n", sizeof (struct y) ); 
        printf( "The sizeof x is: %d\n", sizeof (struct x) ); 
} 
 

When this example is executed, it shows the difference between #pragma member_alignment and #pragma nomember_alignment .

Once used, the member_alignment pragma remains in effect until the nomember_alignment pragma is encountered; the reverse is also true.

The optional base_alignment parameter can be used to specify the base-alignment of the structure. Use one of the following keywords for the base_alignment:

The #pragma member_alignment save and #pragma member_alignment restore directives can be used to save the current state of the member_alignment and to restore the previous state, respectively. This feature is necessary for writing header files that require member_alignment or nomember_alignment , or that require inclusion in a member_alignment that is already set.


Previous Next Contents Index