From ea4233defb3db7b3bbf8d150ab92b4f2fec81dc3 Mon Sep 17 00:00:00 2001 From: hellerve Date: Thu, 19 May 2016 17:07:22 +0200 Subject: [PATCH] made zepto prompt and ret use statement counters --- zeptorc | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/zeptorc b/zeptorc index 261d26d..4c10f88 100644 --- a/zeptorc +++ b/zeptorc @@ -1,4 +1,6 @@ (zepto:add-to-path (++ (get-home-dir) "/.zeps/")) (define col (lambda (x) (color x #{:to-str #t}))) -(define *prompt* (++ (col :blue) (col :bold) *prompt* (col :reset))) -(define *ret* (++ (col :red) (col :bold) *ret* (col :reset))) +(define (*prompt*) + (++ (col :blue) (col :bold) "zepto [" (->string *statement-count*) "]> " (col :reset))) +(define (*ret*) + (++ (col :red) (col :bold) "=[" (->string *statement-count*) "]> " (col :reset)))