你这种写法是为了让它不乱序执行，可能等不到reply的值，那可不可以在fortran中嵌套汇编呢 利用asm("memb");这种方式来让它顺序执行，但是我添加了之后，fortran不识别这一段汇编代码。

在文档《神威太湖之光并行程序设计与优化.pdf》中，第2.7.1.1的fortran语言示例，在复现过程中，发现在从核代码: slave.f90中
call athread_get(0,a(imin,j),a_slave(imin), &
(imax-imin+1)*4,reply,0,0,0)
call athread_get(0,b(imin,j),b_slave(imin), &
(imax-imin+1)*4,reply,0,0,0)
do while (reply.ne.2) ！等待数据读成功
end do

这部分一直等不到数据读入成功。

-ffast-math 这个参数不行，只能改为具体数据相乘了

源代码如下：

编译器版本信息：

这个是写法问题还是编译器问题呢?