Helios-Workspace-Tests.js 1.5 KB

12345678910111213141516171819202122232425262728293031
  1. define("helios/Helios-Workspace-Tests", ["amber/boot", "amber_core/SUnit"], function($boot){
  2. var smalltalk=$boot.vm,nil=$boot.nil,_st=$boot.asReceiver,globals=$boot.globals;
  3. smalltalk.addPackage('Helios-Workspace-Tests');
  4. smalltalk.packages["Helios-Workspace-Tests"].transport = {"type":"amd","amdNamespace":"helios"};
  5. smalltalk.addClass('HLCodeWidgetTest', globals.TestCase, [], 'Helios-Workspace-Tests');
  6. smalltalk.addMethod(
  7. smalltalk.method({
  8. selector: "testKeyMap",
  9. protocol: 'tests',
  10. fn: function (){
  11. var self=this;
  12. function $HLCodeWidget(){return globals.HLCodeWidget||(typeof HLCodeWidget=="undefined"?nil:HLCodeWidget)}
  13. function $HashedCollection(){return globals.HashedCollection||(typeof HashedCollection=="undefined"?nil:HashedCollection)}
  14. return smalltalk.withContext(function($ctx1) {
  15. var $1;
  16. $1=_st(_st($HLCodeWidget())._pcKeyMap())._isKindOf_($HashedCollection());
  17. $ctx1.sendIdx["isKindOf:"]=1;
  18. self._assert_($1);
  19. $ctx1.sendIdx["assert:"]=1;
  20. self._assert_(_st(_st($HLCodeWidget())._macKeyMap())._isKindOf_($HashedCollection()));
  21. return self}, function($ctx1) {$ctx1.fill(self,"testKeyMap",{},globals.HLCodeWidgetTest)})},
  22. args: [],
  23. source: "testKeyMap\x0a\x09\x22Key maps are a collection of associations.\x22\x0a\x09self assert: (HLCodeWidget pcKeyMap isKindOf: HashedCollection).\x0a\x09self assert: (HLCodeWidget macKeyMap isKindOf: HashedCollection)",
  24. messageSends: ["assert:", "isKindOf:", "pcKeyMap", "macKeyMap"],
  25. referencedClasses: ["HLCodeWidget", "HashedCollection"]
  26. }),
  27. globals.HLCodeWidgetTest);
  28. });