Stop¶
To terminate execution of the program.
Declaration¶
Sintaxe¶
Stop(expr? code)
Argumentos¶
code
contains string of less than or equal to 5 digits or a character constant.
Valores de retorno¶
Nenhum.
Descrição¶
Stop statement terminates execution of the program. The argument code
is
displayed when the program stops. If nothing is specified, no message is displayed.
Tipos¶
Expression for optional code
input parameter.
Exemplos¶
program stop
implicit none
integer :: x
x = (2+3)*5
if (x == 25) stop
end program
ASR:
(TranslationUnit
(SymbolTable
1
{
stop:
(Program
(SymbolTable
2
{
x:
(Variable
2
x
Local
()
()
Default
(Integer 4 [])
Source
Public
Required
.false.
)
})
stop
[]
[(=
(Var 2 x)
(IntegerBinOp
(IntegerBinOp
(IntegerConstant 2 (Integer 4 []))
Add
(IntegerConstant 3 (Integer 4 []))
(Integer 4 [])
(IntegerConstant 5 (Integer 4 []))
)
Mul
(IntegerConstant 5 (Integer 4 []))
(Integer 4 [])
(IntegerConstant 25 (Integer 4 []))
)
()
)
(If
(IntegerCompare
(Var 2 x)
Eq
(IntegerConstant 25 (Integer 4 []))
(Logical 4 [])
()
)
[(Stop
()
)]
[]
)]
)
})
[]
)