X-Git-Url: http://gitweb.hachti.de/?a=blobdiff_plain;f=programs%2Ffirst-steps%2Fsrc%2Fhui2.f;h=50468844f583656c2754032414bc68b08631b9da;hb=876de7c84d4db8355594a1385e642b8e3ea34d0f;hp=c12276ca1d1effddd9a45d34d6ba4a68aae7ba61;hpb=e7180669b6cea754ffe8ffa02726c5237e2ffc92;p=h316.git diff --git a/programs/first-steps/src/hui2.f b/programs/first-steps/src/hui2.f index c12276c..5046884 100644 --- a/programs/first-steps/src/hui2.f +++ b/programs/first-steps/src/hui2.f @@ -35,7 +35,7 @@ C C "XX" INPUT 9999 WRITE(1,80) 80 FORMAT (8HGOODBYE.) -10000 GOTO 10000 +C10000 GOTO 10000 STOP C *********** ENDE ************** END