stdlib: Improve performance of fedora.gl.

[goals.git] / stdlib / prelude.sh

diff --git a/stdlib/prelude.sh b/stdlib/prelude.sh
index 60d5b9f..fcd1bac 100644 (file)
--- a/stdlib/prelude.sh
+++ b/stdlib/prelude.sh
@@ -26,3 +26,14 @@ function quoted_string ()
     # XXX This doesn't actually do quoting XXX
     echo -n "\"$1\""
 }
+
+# For printing strings in different colours.
+function print_red ()
+{
+    echo -e "\x1b[1;31m$@\x1b[0m"
+}
+
+function print_green ()
+{
+    echo -e "\x1b[0;32m$@\x1b[0m"
+}