RosettaCodeData/Task/Loops-Infinite/Fortran/loops-infinite-2.f
2015-02-20 00:35:01 -05:00

6 lines
82 B
Fortran

program spam
implicit none
do
write(*,*) 'SPAM'
end do
end program spam