BASIC 0.1.2.0 → 0.1.2.1

raw patch · 2 files changed

+15/−1 lines, 2 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

BASIC.cabal +2/−1
examples/Func.hs +13/−0

BASIC.cabal view

@@ -1,5 +1,5 @@ Name:		BASIC-Version:	0.1.2.0+Version:	0.1.2.1 License:	BSD3 Author:		Lennart Augustsson Maintainer:	Lennart Augustsson@@ -15,6 +15,7 @@ 	Language.BASIC.Translate 	Language.BASIC.Types Extra-source-files:+	examples/Func.hs 	examples/Hello.hs 	examples/HiLo.hs 	examples/Infinity.hs

+ examples/Func.hs view

@@ -0,0 +1,13 @@+{-# OPTIONS_GHC -fno-warn-type-defaults #-}+{-# LANGUAGE ExtendedDefaultRules, OverloadedStrings #-}+module Func where+import Language.BASIC++main :: IO ()+main = runBASIC' $ do++    10 FOR I := 0 TO 20+    20   LET X := I/10+    30   PRINT X;" ";SIN(X);" ";COS(X);" ";TAN(X);" ";ATN(X);" ";EXP(X);" ";LOG(X);" ";SQR(X);" ";ABS(X);" ";SGN(X);" ";INT(X);" ";RND(X)+    40 NEXT I+    100 END