updated syntax colouring;

CleanIDE/Ed/EdLineText.icl

@@ -25,7 +25,7 @@ export TextAnnot Void, SyncInf, ConsInf
 */
 
 :: LineAnnot	:== Info
-dummyLineAnnot	:== (0,False,False,0)
+dummyLineAnnot	:== (0,False,False,0,False)
 annotLine		:== slMap (\s->(dummyLineAnnot,s))
 annotWhole		:== firstParse
 annotPart		:== quickParse

CleanIDE/Ed/EdTab.icl

@@ -94,7 +94,7 @@ optDrawS :== pictdrawstring		// use non-optimised versions
 optDrawC :== pictdrawchar		// "
 
 tabDrawStringC :: !Point2 !(!Info,!String) !FontInfo !*Picture -> *Picture
-tabDrawStringC point ((clevel,typedef,typedecl,_),string)
+tabDrawStringC point ((clevel,typedef,typedecl,_,_),string)
 	{tabSize,charWidth,thefont, showTabs, syntaxColours={textColour, backgroundColour,tabColour, commentColour, stringColour, charColour, keywordColour, typedefColour, typedeclColour}}
 	picture
 	#! strings = splitAtTabs string

CleanIDE/Ed/syncol.dcl

@@ -12,6 +12,7 @@ import StrictList
 //	,!Bool		// in typedecl at start of line
 	,!Bool		// is typedecl line
 	,!Int		// context offside level
+	,!Bool		// flush accu
 	)
 // pack bools into bitfield?