--- a/main/trunk/interpreter/RexxClasses/CoreClasses.orx
+++ b/main/trunk/interpreter/RexxClasses/CoreClasses.orx
@@ -581,7 +581,7 @@
   .local~setentry('STDIN', input)
   .local~setentry('INPUT',.monitor~new(.stdin))
   .input~objectname = "The INPUT monitor"
-  .local~setentry('DEBUGINPUT', .monitor~new(.input))
+  .local~setentry('DEBUGINPUT', .monitor~new(.stdin))
   .debuginput~objectname = "The DEBUG INPUT monitor"
   .local~setentry('STDOUT', output)
   .local~setentry('OUTPUT',.monitor~new(.stdout))
@@ -589,8 +589,8 @@
   .local~setentry('STDERR', error)
   .local~setentry('ERROR', .monitor~new(.stderr))
   .error~objectname = "The ERROR monitor"
-  .local~setentry('TRACEOUTPUT',.monitor~new(.error))
-  .output~objectname = "The TRACE OUTPUT monitor"
+  .local~setentry('TRACEOUTPUT',.monitor~new(.stderr))
+  .traceoutput~objectname = "The TRACE OUTPUT monitor"
 
   .local~setentry('STDQUE',.RexxQueue~new('SESSION'))