From c189c39ee87ec5cef271ad8c0efe911fa763a4aa Mon Sep 17 00:00:00 2001 From: Mart Lubbers Date: Fri, 6 Nov 2015 19:29:39 +0100 Subject: [PATCH] started with itasks --- a7/mart/skeleton7.icl | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/a7/mart/skeleton7.icl b/a7/mart/skeleton7.icl index 43b58b2..5281d10 100644 --- a/a7/mart/skeleton7.icl +++ b/a7/mart/skeleton7.icl @@ -141,6 +141,8 @@ ActionOk :== 'iTasks'.ActionOk ActionQuit :== 'iTasks'.ActionQuit ActionNew :== 'iTasks'.ActionNew -//Start = print (Delete (Integer 4) (Insert (Integer 5) New)) -//Start = print -Start = print (Insert (Size (Insert (Oper (Integer 5) +. (Integer 6)) New)) New) +mainTask = viewInformation (print e) + +Start :: *World -> *World +Start world = startEngine mainTask world +//Start = print (Insert (Size (Insert (Oper (Integer 5) +. (Integer 6)) New)) New) -- 2.20.1