s:(evaluate)

Show string being evaluated

~~~:s:() (s-) nl '(_ s:prepend '_) s:append s:put nl ; 
:s:(evaluate) (s-) dup s:() s:evaluate nl ; 
~~~

:s:testing (s--) 'Testing_ s:prepend s:put nl ; 's:(evaluate) s:testing '#2_#3_#136_dump-stack s:(evaluate) 'reset_dump-stack s:(evaluate)

```