fix for crash on sonoma

AquaticEcoDynamics · Mar 23, 2024 · f8e8f72 · f8e8f72
1 parent 5bef2bc
commit f8e8f72
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/include/aed.h b/include/aed.h
@@ -28,7 +28,7 @@
 #ifndef _AED_H_
 #define _AED_H_
 
-#define AED_VERSION "2.1.1"
+#define AED_VERSION "2.1.2"
 
 #define MAX_MODELS 40
 

diff --git a/src/aed_csv_reader.F90 b/src/aed_csv_reader.F90
@@ -281,8 +281,8 @@ LOGICAL FUNCTION next_symbol(aedr, sym)
 ! get the next "symbol" from the file, if there is one
 !-------------------------------------------------------------------------------
 !ARGUMENTS
- TYPE(AED_READER),POINTER :: aedr
- TYPE(AED_SYMBOL),INTENT(out)  :: sym
+ TYPE(AED_READER),POINTER  :: aedr
+ TYPE(AED_SYMBOL),INTENT(inout) :: sym
 
 !LOCALS
  INTEGER :: iostat, s1, e1, i, j