From 2876854ba628cc357ad3936c462158a2ef9e04a8 Mon Sep 17 00:00:00 2001
From: Heiko Becker <HeikoBecker@users.noreply.github.com>
Date: Wed, 4 Mar 2020 08:48:37 +0100
Subject: [PATCH] Remove redundant parentheses

---
 basis/RuntimeProgScript.sml | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/basis/RuntimeProgScript.sml b/basis/RuntimeProgScript.sml
index 7127477fe1..17eac9d3d0 100644
--- a/basis/RuntimeProgScript.sml
+++ b/basis/RuntimeProgScript.sml
@@ -45,9 +45,9 @@ val _ = append_prog abort
 
 val _ = process_topdecs `
   fun assert cond msg =
-  if (cond)
+  if cond
   then ()
-  else (debugMsg (msg);
+  else (debugMsg msg;
         abort());`
   |> append_prog;