[REBOL] Debugging console
From: sanghabum::aol::com at: 5-Dec-2001 5:10
Here's a simple idea, and a simple script to go with it.
With View, you are either running your Layouts, and
wondering why Things Aren't Right, or you've stopped
the application and are Printing away at the console
to see what's up.
So why not have a debug window that lets you type
commands as the application runs?
== save as (eg) debug.r ============
rebol [title: "Debug window"]
view/new/offset layout [
DebugCommand: field 300
Button "Do it" [
use [ErrorCode] [
errorcode: copy 
if error? ErrorCode: try [do DebugCommand/text ""][
print mold disarm ErrorCode
] ; use
] ; action
] ; layout
(system/view/screen-face/size / 2) ; offset on screen
...run your application