| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140 | 
							- smalltalk.addPackage('Kernel-Transcript', {});
 
- smalltalk.addClass('ConsoleTranscript', smalltalk.Object, ['textarea'], 'Kernel-Transcript');
 
- smalltalk.addMethod(
 
- "_clear",
 
- smalltalk.method({
 
- selector: "clear",
 
- fn: function (){
 
- var self=this;
 
- return self}
 
- }),
 
- smalltalk.ConsoleTranscript);
 
- smalltalk.addMethod(
 
- "_cr",
 
- smalltalk.method({
 
- selector: "cr",
 
- fn: function (){
 
- var self=this;
 
- return self}
 
- }),
 
- smalltalk.ConsoleTranscript);
 
- smalltalk.addMethod(
 
- "_open",
 
- smalltalk.method({
 
- selector: "open",
 
- fn: function (){
 
- var self=this;
 
- return self}
 
- }),
 
- smalltalk.ConsoleTranscript);
 
- smalltalk.addMethod(
 
- "_show_",
 
- smalltalk.method({
 
- selector: "show:",
 
- fn: function (anObject){
 
- var self=this;
 
- var string;
 
- string=smalltalk.send(anObject,"_asString",[]);
 
- console.log(String(string));
 
- ;
 
- return self}
 
- }),
 
- smalltalk.ConsoleTranscript);
 
- smalltalk.addMethod(
 
- "_initialize",
 
- smalltalk.method({
 
- selector: "initialize",
 
- fn: function (){
 
- var self=this;
 
- smalltalk.send((smalltalk.Transcript || Transcript),"_register_",[smalltalk.send(self,"_new",[])]);
 
- return self}
 
- }),
 
- smalltalk.ConsoleTranscript.klass);
 
- smalltalk.addClass('Transcript', smalltalk.Object, ['textarea'], 'Kernel-Transcript');
 
- smalltalk.Transcript.klass.iVarNames = ['current'];
 
- smalltalk.addMethod(
 
- "_clear",
 
- smalltalk.method({
 
- selector: "clear",
 
- fn: function (){
 
- var self=this;
 
- smalltalk.send(smalltalk.send(self,"_current",[]),"_clear",[]);
 
- return self}
 
- }),
 
- smalltalk.Transcript.klass);
 
- smalltalk.addMethod(
 
- "_cr",
 
- smalltalk.method({
 
- selector: "cr",
 
- fn: function (){
 
- var self=this;
 
- smalltalk.send(smalltalk.send(self,"_current",[]),"_show_",[smalltalk.send((smalltalk.String || String),"_cr",[])]);
 
- return self}
 
- }),
 
- smalltalk.Transcript.klass);
 
- smalltalk.addMethod(
 
- "_current",
 
- smalltalk.method({
 
- selector: "current",
 
- fn: function (){
 
- var self=this;
 
- return self["@current"];
 
- }
 
- }),
 
- smalltalk.Transcript.klass);
 
- smalltalk.addMethod(
 
- "_new",
 
- smalltalk.method({
 
- selector: "new",
 
- fn: function (){
 
- var self=this;
 
- smalltalk.send(self,"_shouldNotImplement",[]);
 
- return self}
 
- }),
 
- smalltalk.Transcript.klass);
 
- smalltalk.addMethod(
 
- "_open",
 
- smalltalk.method({
 
- selector: "open",
 
- fn: function (){
 
- var self=this;
 
- smalltalk.send(smalltalk.send(self,"_current",[]),"_open",[]);
 
- return self}
 
- }),
 
- smalltalk.Transcript.klass);
 
- smalltalk.addMethod(
 
- "_register_",
 
- smalltalk.method({
 
- selector: "register:",
 
- fn: function (aTranscript){
 
- var self=this;
 
- self["@current"]=aTranscript;
 
- return self}
 
- }),
 
- smalltalk.Transcript.klass);
 
- smalltalk.addMethod(
 
- "_show_",
 
- smalltalk.method({
 
- selector: "show:",
 
- fn: function (anObject){
 
- var self=this;
 
- smalltalk.send(smalltalk.send(self,"_current",[]),"_show_",[anObject]);
 
- return self}
 
- }),
 
- smalltalk.Transcript.klass);
 
 
  |