Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

FEAT: optimized evaluation result output in console to avoid excessiv…

…e flooding.

Result line now limited to 72 characters max. A trailing three dots sequence will signal a truncation.
  • Loading branch information...
commit 0139aff62ec794931a50adcdacd021696324300d 1 parent a64940b
@dockimbel dockimbel authored
Showing with 7 additions and 1 deletion.
  1. +7 −1 red/tests/console.red
View
8 red/tests/console.red
@@ -167,10 +167,16 @@ do-console: function [][
eval: [
code: load/all buffer
+
unless tail? code [
set/any 'result do code
+
unless unset? :result [
- print ["==" mold :result] ;@@ use mold/part
+ if 67 = length? result: mold/part :result 67 [ ;-- optimized for width = 72
+ clear back tail result
+ append result "..."
+ ]
+ print ["==" result]
]
]
clear buffer
Please sign in to comment.
Something went wrong with that request. Please try again.