2
0

Kernel-Transcript.js 3.2 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114
  1. define("amber_core/Kernel-Transcript", ["amber/boot", "amber_core/Kernel-Objects"], function($boot){
  2. var smalltalk=$boot.vm,nil=$boot.nil,_st=$boot.asReceiver,globals=$boot.globals;
  3. smalltalk.addPackage('Kernel-Transcript');
  4. smalltalk.packages["Kernel-Transcript"].transport = {"type":"amd","amdNamespace":"amber_core"};
  5. smalltalk.addClass('ConsoleTranscript', globals.Object, ['textarea'], 'Kernel-Transcript');
  6. //>>excludeStart("ide", pragmas.excludeIdeData);
  7. globals.ConsoleTranscript.comment="I am a specific transcript emitting to the JavaScript console.\x0a\x0aIf no other transcript is registered, I am the default.";
  8. //>>excludeEnd("ide");
  9. smalltalk.addMethod(
  10. smalltalk.method({
  11. selector: "clear",
  12. protocol: 'printing',
  13. fn: function (){
  14. var self=this;
  15. return self;
  16. },
  17. messageSends: [],
  18. //>>excludeStart("ide", pragmas.excludeIdeData);
  19. args: [],
  20. source: "clear\x0a\x09\x22no op\x22",
  21. referencedClasses: []
  22. //>>excludeEnd("ide");
  23. }),
  24. globals.ConsoleTranscript);
  25. smalltalk.addMethod(
  26. smalltalk.method({
  27. selector: "cr",
  28. protocol: 'printing',
  29. fn: function (){
  30. var self=this;
  31. return self;
  32. },
  33. messageSends: [],
  34. //>>excludeStart("ide", pragmas.excludeIdeData);
  35. args: [],
  36. source: "cr\x0a\x09\x22no op\x22",
  37. referencedClasses: []
  38. //>>excludeEnd("ide");
  39. }),
  40. globals.ConsoleTranscript);
  41. smalltalk.addMethod(
  42. smalltalk.method({
  43. selector: "open",
  44. protocol: 'actions',
  45. fn: function (){
  46. var self=this;
  47. return self;
  48. },
  49. messageSends: [],
  50. //>>excludeStart("ide", pragmas.excludeIdeData);
  51. args: [],
  52. source: "open",
  53. referencedClasses: []
  54. //>>excludeEnd("ide");
  55. }),
  56. globals.ConsoleTranscript);
  57. smalltalk.addMethod(
  58. smalltalk.method({
  59. selector: "show:",
  60. protocol: 'printing',
  61. fn: function (anObject){
  62. var self=this;
  63. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  64. return smalltalk.withContext(function($ctx1) {
  65. //>>excludeEnd("ctx");
  66. console.log(String(_st(anObject)._asString()));
  67. return self;
  68. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  69. }, function($ctx1) {$ctx1.fill(self,"show:",{anObject:anObject},globals.ConsoleTranscript)});
  70. //>>excludeEnd("ctx");
  71. },
  72. messageSends: [],
  73. //>>excludeStart("ide", pragmas.excludeIdeData);
  74. args: ["anObject"],
  75. source: "show: anObject\x0a\x22Smalltalk objects should have no trouble displaying themselves on the Transcript; Javascript objects don't know how, so must be wrapped in a JSObectProxy.\x22\x0a<console.log(String(_st(anObject)._asString()))>",
  76. referencedClasses: []
  77. //>>excludeEnd("ide");
  78. }),
  79. globals.ConsoleTranscript);
  80. smalltalk.addMethod(
  81. smalltalk.method({
  82. selector: "initialize",
  83. protocol: 'initialization',
  84. fn: function (){
  85. var self=this;
  86. function $Transcript(){return globals.Transcript||(typeof Transcript=="undefined"?nil:Transcript)}
  87. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  88. return smalltalk.withContext(function($ctx1) {
  89. //>>excludeEnd("ctx");
  90. _st($Transcript())._registerIfNone_(self._new());
  91. return self;
  92. //>>excludeStart("ctx", pragmas.excludeDebugContexts);
  93. }, function($ctx1) {$ctx1.fill(self,"initialize",{},globals.ConsoleTranscript.klass)});
  94. //>>excludeEnd("ctx");
  95. },
  96. messageSends: ["registerIfNone:", "new"],
  97. //>>excludeStart("ide", pragmas.excludeIdeData);
  98. args: [],
  99. source: "initialize\x0a\x09Transcript registerIfNone: self new",
  100. referencedClasses: ["Transcript"]
  101. //>>excludeEnd("ide");
  102. }),
  103. globals.ConsoleTranscript.klass);
  104. });