From: <ai...@us...> - 2008-10-10 18:24:47
|
Revision: 8873 http://plplot.svn.sourceforge.net/plplot/?rev=8873&view=rev Author: airwin Date: 2008-10-10 18:24:39 +0000 (Fri, 10 Oct 2008) Log Message: ----------- Fix library name spelling mistakes for C wrapper libraries for fortran. Modified Paths: -------------- trunk/bindings/f77/plstubs.h trunk/bindings/f95/plstubs.h trunk/include/pldll.h Modified: trunk/bindings/f77/plstubs.h =================================================================== --- trunk/bindings/f77/plstubs.h 2008-10-10 07:25:04 UTC (rev 8872) +++ trunk/bindings/f77/plstubs.h 2008-10-10 18:24:39 UTC (rev 8873) @@ -117,7 +117,7 @@ \*----------------------------------------------------------------------*/ #if STUB_LINKAGE==STUB_LAU -#define FNAME(x,y) PLDLLIMPEXP_F77 y##_ +#define FNAME(x,y) PLDLLIMPEXP_F77C y##_ #define FNAME_(x,y) y##_ #elif STUB_LINKAGE == STUB_L @@ -133,7 +133,7 @@ #define FNAME_(x,y) x #elif STUB_LINKAGE == STUB_STDCALL -#define FNAME(x,y) PLDLLIMPEXP_F77 __stdcall x +#define FNAME(x,y) PLDLLIMPEXP_F77C __stdcall x #define FNAME_(x,y) x #else Modified: trunk/bindings/f95/plstubs.h =================================================================== --- trunk/bindings/f95/plstubs.h 2008-10-10 07:25:04 UTC (rev 8872) +++ trunk/bindings/f95/plstubs.h 2008-10-10 18:24:39 UTC (rev 8873) @@ -117,7 +117,7 @@ \*----------------------------------------------------------------------*/ #if STUB_LINKAGE==STUB_LAU -#define FNAME(x,y) PLDLLIMPEXP_F95 y##_ +#define FNAME(x,y) PLDLLIMPEXP_F95C y##_ #elif STUB_LINKAGE == STUB_L #define FNAME(x,y) y @@ -126,7 +126,7 @@ #define FNAME(x,y) x #elif STUB_LINKAGE == STUB_STDCALL -#define FNAME(x,y) PLDLLIMPEXP_F95 __stdcall x +#define FNAME(x,y) PLDLLIMPEXP_F95C __stdcall x #elif STUB_LINKAGE == STUB_FORTRAN #define FNAME(x,y) fortran x Modified: trunk/include/pldll.h =================================================================== --- trunk/include/pldll.h 2008-10-10 07:25:04 UTC (rev 8872) +++ trunk/include/pldll.h 2008-10-10 18:24:39 UTC (rev 8873) @@ -50,20 +50,20 @@ #define PLDLLIMPEXP_CXX_DATA(type) PLDLLIMPORT type #endif -#if defined(plplotf77d_EXPORTS) - #define PLDLLIMPEXP_F77 PLDLLEXPORT - #define PLDLLIMPEXP_F77_DATA(type) PLDLLEXPORT type +#if defined(plplotf77cd_EXPORTS) + #define PLDLLIMPEXP_F77C PLDLLEXPORT + #define PLDLLIMPEXP_F77C_DATA(type) PLDLLEXPORT type #else - #define PLDLLIMPEXP_F77 PLDLLIMPORT - #define PLDLLIMPEXP_F77_DATA(type) PLDLLIMPORT type + #define PLDLLIMPEXP_F77C PLDLLIMPORT + #define PLDLLIMPEXP_F77C_DATA(type) PLDLLIMPORT type #endif -#if defined(plplotf95d_EXPORTS) - #define PLDLLIMPEXP_F95 PLDLLEXPORT - #define PLDLLIMPEXP_F95_DATA(type) PLDLLEXPORT type +#if defined(plplotf95cd_EXPORTS) + #define PLDLLIMPEXP_F95C PLDLLEXPORT + #define PLDLLIMPEXP_F95C_DATA(type) PLDLLEXPORT type #else - #define PLDLLIMPEXP_F95 PLDLLIMPORT - #define PLDLLIMPEXP_F95_DATA(type) PLDLLIMPORT type + #define PLDLLIMPEXP_F95C PLDLLIMPORT + #define PLDLLIMPEXP_F95C_DATA(type) PLDLLIMPORT type #endif #if defined(plplotwxwidgetsd_EXPORTS) This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site. |