From 569634e6fdedf1d32a9b9f4cd2d9a9a5a559b193 Mon Sep 17 00:00:00 2001 From: Euler-37 <64597797+Euler-37@users.noreply.github.com> Date: Sun, 31 Mar 2024 17:42:51 +0800 Subject: [PATCH] Update ch08-00-pointer.md --- src/ch08-00-pointer.md | 3 +++ 1 file changed, 3 insertions(+) diff --git a/src/ch08-00-pointer.md b/src/ch08-00-pointer.md index 03029ae..37181ea 100644 --- 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`结构的不足之处