Update ch08-00-pointer.md

fortran-fans · Mar 31, 2024 · 569634e · 569634e
1 parent eaec478
commit 569634e
Showing 1 changed file with 3 additions and 0 deletions.
diff --git a/src/ch08-00-pointer.md b/src/ch08-00-pointer.md
@@ -113,10 +113,13 @@ write(*,*)a
 - 同一个语句中不能连续定义
 ``` fortran
 associate(x=>point(1),x2=>x*x ) !错误
+end associate
 ```
 需要改成
 ``` fortran
 associate(x=>point(1))
 associate(x2=>x*x)
+end associate
+end associate
 ```
 这是`associate`结构的不足之处