X-Git-Url: https://git.martlubbers.net/?a=blobdiff_plain;f=mTaskInterpret.icl;h=716fc18d045490d107c6eb50679bcfbcd5b17e84;hb=1827e72942a355fc90dcb4e0b93f68c98dc6eea5;hp=16abbd0e70b1b0073c160e129894831555830bb9;hpb=0ee062ed97dfb8f4877166654a5f5e7ded317cf6;p=mTask.git diff --git a/mTaskInterpret.icl b/mTaskInterpret.icl index 16abbd0..716fc18 100644 --- a/mTaskInterpret.icl +++ b/mTaskInterpret.icl @@ -89,6 +89,7 @@ instance toString MTaskMSGRecv where toString (MTSDSDelAck i) = "SDS deleted with id: " +++ toString i toString (MTPub i v) = "Publish id: " +++ toString i +++ " value " +++ safePrint v + toString (MTDevSpec mt) = "Specification: " +++ printToString mt toString (MTMessage m) = m toString MTEmpty = "Empty message"