/*--------------------------------------------------------------------+
|                                                                     |
|                 Copyright (c) 1995, SAS Institute Inc.              |
|                   Unpublished - All Rights Reserved                 |
|                                                                     |
|                     S A S / C  S A M P L E                          |
|                                                                     |
|       Name: ALOADMD                                                 |
|                                                                     |
|   Language: C                                                       |
|                                                                     |
| EntryPoint: @DYNAMN                                                 |
|                                                                     |
| Entry Type: C Linkage                                               |
|                                                                     |
| Files Note: 'prefix' is the installation defined high level         |
|             qualifier for the SAS/C product.                        |
|                                                                     |
|   Function: Provide a non-INDEP dynamically loadable C function     |
|             which displays the CRAB address being used and then     |
|             returns to the caller.                                  |
|                                                                     |
|    Purpose: MVS see prefix.SAMPLE.ASM(ALOADMM) prolog.              |
|             CMS see SAMPLASM MACLIB(ALOADMM) prolog                 |
|                                                                     |
| MVS -                                                               |
|     Compile/Link/Go: see prefix.SAMPLE.ASM(ALOADMM) prolog          |
|                                                                     |
| CMS -                                                               |
|     Compile/Link/Go: see SAMPASM MACLIB(ALOADMM) prolog             |
|                                                                     |
| Misc Notes:                                                         |
|                                                                     |
|                                                                     |
+--------------------------------------------------------------------*/
#include <stdio.h>
#include <options.h>

extern void crbc(void);

int _dynamn(void)
{
  printf("CDYNLOAD: Entry\n");
  printf("CDYNLOAD:----------------->");
  crbc();
  printf("CDYNLOAD: Returning\n");
  return(0);
}