/[ascend]/trunk/solvers/lsode/asc_lsode.c
ViewVC logotype

Diff of /trunk/solvers/lsode/asc_lsode.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 2706 by jpye, Thu May 9 07:04:41 2013 UTC revision 2707 by jpye, Sat Aug 17 10:57:58 2013 UTC
# Line 1  Line 1 
1    
2  /* :ex: set ts=2 */  /* :ex: set ts=2 */
3  /*  ASCEND modelling environment  /*  ASCEND modelling environment
4      Copyright 1997, Carnegie Mellon University      Copyright 1997, Carnegie Mellon University
# Line 103  extern ASC_EXPORT int lsode_register(voi Line 104  extern ASC_EXPORT int lsode_register(voi
104   *  is wierd. WIN32/CRAY is treated as special case   *  is wierd. WIN32/CRAY is treated as special case
105   */   */
106  #ifdef APOLLO  #ifdef APOLLO
107  #define NOUNDERBARS TRUE  #define NOUNDERBARS
108  #endif  #endif
109  #ifdef _HPUX_SOURCE  #ifdef _HPUX_SOURCE
110  #define NOUNDERBARS TRUE  #define NOUNDERBARS
111  #endif  #endif
112  /* AIX xlf will not suffix an underbar on a symbol  /* AIX xlf will not suffix an underbar on a symbol
113   * unless xlf is given the ``-qextname'' option   * unless xlf is given the ``-qextname'' option
114   */   */
115  #ifdef _AIX  #ifdef _AIX
116  #define NOUNDERBARS TRUE  #define NOUNDERBARS
117  #endif  #endif
118    
119  #ifdef NOUNDERBARS  #ifdef NOUNDERBARS
# Line 143  extern ASC_EXPORT int lsode_register(voi Line 144  extern ASC_EXPORT int lsode_register(voi
144  #define GETCOMMON GET_LSODE_COMMON  #define GETCOMMON GET_LSODE_COMMON
145  #endif  #endif
146    
147  #if defined(__WIN32__) && defined(__MINGW32_VERSION)  #if defined(__MINGW32__) || defined(__MINGW64__)
148  #undef LSODE  #undef LSODE
149  #undef XASCWV  #undef XASCWV
150  #define XASCWV xascwv_  #define XASCWV xascwv_

Legend:
Removed from v.2706  
changed lines
  Added in v.2707

john.pye@anu.edu.au
ViewVC Help
Powered by ViewVC 1.1.22