Regression

import BASIC main = runBASIC $ do 10 LET X =: 1 20 PRINT "Hello BASIC world!" 30 LET X =: X + 1 40 IF X <> 11 THEN 20 50 END

=:

=

They say that as you get older you regress back towards childhood. So I present you with today's Haskell program (the idea shamelessly stolen from JoshTriplett from #haskell on IRC):Yes, it runs. (I'm sorry about theinstead of, but some things are just too wired into Haskell to change.)

Labels: BASIC, DSL, Haskell