/*--------------------------------------------------------------------+
|COPYRIGHT SAS INSTITUTE INC., 1990, SAS CAMPUS DRIVE, CARY, NC 27513 |
|                                                                     |
|                     S A S / C  S A M P L E                          |
|                                                                     |
|                                                                     |
|       Name: A2CMMENG                                                |
|                                                                     |
|   Language: C                                                       |
|                                                                     |
| EntryPoint: a2cmeng                                                 |
|                                                                     |
| Entry Type: C Function Linkage                                      |
|                                                                     |
| Files Note: 'prefix' is the installation defined high level         |
|             qualifier for the SAS/C product.                        |
|                                                                     |
|   Function: A2CMMENG prints the message and the return code provided|
|             by the caller to stderr.                                |
|                                                                     |
|    Purpose: Provide an INDEP C function to be called by the         |
|             assembler program A2CMMASM as a statically linked       |
|             function.                                               |
|                                                                     |
| MVS -   See prolog for prefix.SAMPLE.ASM(A2CMMASM) for details on   |
|         compiling, linking, and executing this sample.              |
|                                                                     |
| CMS -   See prolog for SAMPLASM MACLIB(A2CMMASM) for details on     |
|         compiling, linking, and executing this sample.              |
|                                                                     |
| Misc Notes:                                                         |
|                                                                     |
+--------------------------------------------------------------------*/
#include <stdio.h>
#include <options.h>

void a2cmemg(char * msgbuffer, int * retcode)
 {
   fprintf(stderr,msgbuffer);
   fprintf(stderr,"Retcode: %d\n\n\n", *retcode);
  exit();
 }