12345678910111213141516171819202122232425262728293031 |
- define("helios/Helios-Workspace-Tests", ["amber/boot", "amber_core/SUnit"], function($boot){
- var smalltalk=$boot.vm,nil=$boot.nil,_st=$boot.asReceiver,globals=$boot.globals;
- smalltalk.addPackage('Helios-Workspace-Tests');
- smalltalk.packages["Helios-Workspace-Tests"].transport = {"type":"amd","amdNamespace":"helios"};
- smalltalk.addClass('HLCodeWidgetTest', globals.TestCase, [], 'Helios-Workspace-Tests');
- smalltalk.addMethod(
- smalltalk.method({
- selector: "testKeyMap",
- protocol: 'tests',
- fn: function (){
- var self=this;
- function $HLCodeWidget(){return globals.HLCodeWidget||(typeof HLCodeWidget=="undefined"?nil:HLCodeWidget)}
- function $HashedCollection(){return globals.HashedCollection||(typeof HashedCollection=="undefined"?nil:HashedCollection)}
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(_st($HLCodeWidget())._pcKeyMap())._isKindOf_($HashedCollection());
- $ctx1.sendIdx["isKindOf:"]=1;
- self._assert_($1);
- $ctx1.sendIdx["assert:"]=1;
- self._assert_(_st(_st($HLCodeWidget())._macKeyMap())._isKindOf_($HashedCollection()));
- return self}, function($ctx1) {$ctx1.fill(self,"testKeyMap",{},globals.HLCodeWidgetTest)})},
- args: [],
- 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)",
- messageSends: ["assert:", "isKindOf:", "pcKeyMap", "macKeyMap"],
- referencedClasses: ["HLCodeWidget", "HashedCollection"]
- }),
- globals.HLCodeWidgetTest);
- });
|