Doxygen Source Code Documentation
F77_aloc.c File Reference
#include "stdio.h"
#include "stdlib.h"
#include "f2c.h"
Go to the source code of this file.
Functions | |
void | exit_ (integer *) |
char * | F77_aloc (integer Len, char *whence) |
Variables | |
integer | memfailure = 3 |
Function Documentation
|
Definition at line 28 of file exit.c. References f_exit().
00030 { 00031 #ifdef NO_ONEXIT 00032 f_exit(); 00033 #endif 00034 exit(*rc); 00035 } |
|
Definition at line 21 of file F77_aloc.c. References malloc, and memfailure.
00023 { 00024 char *rv; 00025 unsigned int uLen = (unsigned int) Len; /* for K&R C */ 00026 00027 if (!(rv = (char*)malloc(uLen))) { 00028 fprintf(stderr, "malloc(%u) failure in %s\n", 00029 uLen, whence); 00030 exit(memfailure); 00031 } 00032 return rv; 00033 } |
Variable Documentation
|
Definition at line 8 of file F77_aloc.c. Referenced by F77_aloc(). |