Files called from SICServer should now compile under linux
This commit is contained in:
@@ -93,6 +93,9 @@ void ERR_EXIT(char *text) {
|
||||
|
||||
/* FORTRAN wrappers */
|
||||
|
||||
#ifdef F_CHAR
|
||||
/* compile only when fortran c interface stuff is defined */
|
||||
|
||||
#ifdef __VMS
|
||||
#define err_show_ err_show
|
||||
#define err_txt_ err_txt
|
||||
@@ -129,3 +132,5 @@ void err_set_outrtn_(void (*rtn)(), void *arg) {
|
||||
void err_short_(void) {
|
||||
ErrShort(ErrMessage);
|
||||
}
|
||||
|
||||
#endif
|
||||
|
||||
Reference in New Issue
Block a user