From 8578faf533ef5ed200b722ebc8551f32ace3a5cf Mon Sep 17 00:00:00 2001 From: Camil Staps Date: Sun, 7 Jan 2018 17:12:34 +0100 Subject: Cleanup code --- assignment-13/uFPL/Sim.dcl | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'assignment-13/uFPL/Sim.dcl') diff --git a/assignment-13/uFPL/Sim.dcl b/assignment-13/uFPL/Sim.dcl index 96527db..6904033 100644 --- a/assignment-13/uFPL/Sim.dcl +++ b/assignment-13/uFPL/Sim.dcl @@ -53,8 +53,10 @@ instance toString UFPLException | ITrigger ITrigger [IRule] | ISetCursor (IExpr, IExpr) | IPrint IExpr + | IPrintS String -:: INamedRule = Rule String [IRule] +:: INamedRule + = Rule String [IRule] :: IShareState t = { isval :: t -- cgit v1.2.3