Compiler/AST interpreter: Difference between revisions
m
→{{header|Fortran}}
Line 2,554:
write (outp, '(A)', advance = 'no') val1%str_val
case (v_Nil)
write (outp, '("(no value)")', advance = 'no')
case default
error stop
|