package org.jetbrains.fortran.lang.psi.impl;

import java.util.List;
import org.jetbrains.annotations.*;
import com.intellij.lang.ASTNode;
import com.intellij.psi.PsiElement;
import com.intellij.psi.PsiElementVisitor;
import com.intellij.psi.util.PsiTreeUtil;
import static org.jetbrains.fortran.lang.FortranTypes.*;
import org.jetbrains.fortran.lang.psi.*;

public class FortranLabelDoStmtImpl extends FortranStmtImpl implements FortranLabelDoStmt {

    public FortranLabelDoStmtImpl(ASTNode node) {
        super(node);
    }

    public void accept(@NotNull PsiElementVisitor visitor) {
        if (visitor instanceof FortranVisitor) accept((FortranVisitor)visitor);
        else super.accept(visitor);
    }

    @Override
    @Nullable
    public FortranExpr getExpr() {
        return findChildByClass(FortranExpr.class);
    }

    @Override
    @Nullable
    public PsiElement getColon() {
        return findChildByType(COLON);
    }


    @Override
    @Nullable
    public PsiElement getEol() {
        return findChildByType(EOL);
    }

}
@@ -43,67 +43,8 @@
 l;%0A%0A
-import java.util.List;%0Aimport org.jetbrains.annotations.*;%0A
 impo
@@ -120,85 +120,153 @@
 ort 
-com.intellij.psi.PsiElementVisitor;%0Aimport com.intellij.psi.util.PsiTreeUtil;
+org.jetbrains.annotations.Nullable;%0Aimport org.jetbrains.fortran.lang.psi.FortranExpr;%0Aimport org.jetbrains.fortran.lang.psi.FortranLabelDoStmt;%0A
 %0Aimp
@@ -316,17 +316,21 @@
 anTypes.
-*
+COLON
 ;%0Aimport
@@ -322,32 +322,39 @@
 s.COLON;%0Aimport 
+static 
 org.jetbrains.fo
@@ -368,13 +368,24 @@
 ang.
-psi.*
+FortranTypes.EOL
 ;%0A%0Ap
@@ -558,192 +558,8 @@
  %7D%0A%0A
-    public void accept(@NotNull PsiElementVisitor visitor) %7B%0A        if (visitor instanceof FortranVisitor) accept((FortranVisitor)visitor);%0A        else super.accept(visitor);%0A    %7D%0A%0A
     

Remove infineite loop function