## 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)
```
