1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
|
Index: ferret-vis-7.6.0~beta/fer/gnl/special_symbol.F
===================================================================
--- ferret-vis-7.6.0~beta.orig/fer/gnl/special_symbol.F
+++ ferret-vis-7.6.0~beta/fer/gnl/special_symbol.F
@@ -75,7 +75,9 @@
* V751 6/19 *acm* Ticket 1903, reporting memory in bytes, so new symbol FERRET_BYTES_MEM
IMPLICIT NONE
-* calling argument declarations:
+* External function
+ INTEGER GETPID
+* calling argument declarations:
INTEGER isym, slen
CHARACTER name*(*), value*(*)
|