From 3707ce68e23790540ac49effa62e8faa68a5b862 Mon Sep 17 00:00:00 2001
From: Rauli Laine <rauli.laine@iki.fi>
Date: Thu, 17 Aug 2017 00:58:04 +0300
Subject: [PATCH] Make tests look pretty

---
 tests/framework.plorth | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/tests/framework.plorth b/tests/framework.plorth
index 7822151..3383085 100644
--- a/tests/framework.plorth
+++ b/tests/framework.plorth
@@ -13,10 +13,10 @@
   )
   (
     swap
-    >string "✘ " swap + println
+    >string "\u001b[31m✘\u001b[0m " swap + println
     throw
   )
   try
-  >string "✔ " swap + println
+  >string "\u001b[32m✔\u001b[0m " swap + println
   clear
 ;