123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431 |
- smalltalk.addPackage('Kernel-Exceptions');
- smalltalk.addClass('Error', smalltalk.Object, ['messageText'], 'Kernel-Exceptions');
- smalltalk.addMethod(
- smalltalk.method({
- selector: "context",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return self.context;
- return self}, function($ctx1) {$ctx1.fill(self,"context",{},smalltalk.Error)})},
- messageSends: []}),
- smalltalk.Error);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "initialize",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(self)._messageText_(_st("Errorclass: ").__comma(_st(_st(self)._class())._name()));
- return self}, function($ctx1) {$ctx1.fill(self,"initialize",{},smalltalk.Error)})},
- messageSends: ["messageText:", ",", "name", "class"]}),
- smalltalk.Error);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "isSmalltalkError",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return self.smalltalkError === true;
- return self}, function($ctx1) {$ctx1.fill(self,"isSmalltalkError",{},smalltalk.Error)})},
- messageSends: []}),
- smalltalk.Error);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "jsStack",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return self.stack;
- return self}, function($ctx1) {$ctx1.fill(self,"jsStack",{},smalltalk.Error)})},
- messageSends: []}),
- smalltalk.Error);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "messageText",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self["@messageText"];
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"messageText",{},smalltalk.Error)})},
- messageSends: []}),
- smalltalk.Error);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "messageText:",
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self["@messageText"]=aString;
- return self}, function($ctx1) {$ctx1.fill(self,"messageText:",{aString:aString},smalltalk.Error)})},
- messageSends: []}),
- smalltalk.Error);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "signal",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self.context = smalltalk.getThisContext(); self.smalltalkError = true; throw(self);
- return self}, function($ctx1) {$ctx1.fill(self,"signal",{},smalltalk.Error)})},
- messageSends: []}),
- smalltalk.Error);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "signal:",
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(self)._messageText_(aString);
- _st(self)._signal();
- return self}, function($ctx1) {$ctx1.fill(self,"signal:",{aString:aString},smalltalk.Error)})},
- messageSends: ["messageText:", "signal"]}),
- smalltalk.Error);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "signal",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(_st(self)._new())._signal();
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"signal",{},smalltalk.Error.klass)})},
- messageSends: ["signal", "new"]}),
- smalltalk.Error.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "signal:",
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(_st(self)._new())._signal_(aString);
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"signal:",{aString:aString},smalltalk.Error.klass)})},
- messageSends: ["signal:", "new"]}),
- smalltalk.Error.klass);
- smalltalk.addClass('JavaScriptException', smalltalk.Error, ['exception'], 'Kernel-Exceptions');
- smalltalk.addMethod(
- smalltalk.method({
- selector: "context:",
- fn: function (aMethodContext){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self.context = aMethodContext;
- return self}, function($ctx1) {$ctx1.fill(self,"context:",{aMethodContext:aMethodContext},smalltalk.JavaScriptException)})},
- messageSends: []}),
- smalltalk.JavaScriptException);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "exception",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self["@exception"];
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"exception",{},smalltalk.JavaScriptException)})},
- messageSends: []}),
- smalltalk.JavaScriptException);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "exception:",
- fn: function (anException){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self["@exception"]=anException;
- return self}, function($ctx1) {$ctx1.fill(self,"exception:",{anException:anException},smalltalk.JavaScriptException)})},
- messageSends: []}),
- smalltalk.JavaScriptException);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "messageText",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- return 'JavaScript exception: ' + self["@exception"].toString();
- return self}, function($ctx1) {$ctx1.fill(self,"messageText",{},smalltalk.JavaScriptException)})},
- messageSends: []}),
- smalltalk.JavaScriptException);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "on:",
- fn: function (anException){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $2,$3,$1;
- $2=_st(self)._new();
- _st($2)._exception_(anException);
- $3=_st($2)._yourself();
- $1=$3;
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"on:",{anException:anException},smalltalk.JavaScriptException.klass)})},
- messageSends: ["exception:", "new", "yourself"]}),
- smalltalk.JavaScriptException.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "on:context:",
- fn: function (anException,aMethodContext){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $2,$3,$1;
- $2=_st(self)._new();
- _st($2)._exception_(anException);
- _st($2)._context_(aMethodContext);
- $3=_st($2)._yourself();
- $1=$3;
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"on:context:",{anException:anException,aMethodContext:aMethodContext},smalltalk.JavaScriptException.klass)})},
- messageSends: ["exception:", "new", "context:", "yourself"]}),
- smalltalk.JavaScriptException.klass);
- smalltalk.addClass('MessageNotUnderstood', smalltalk.Error, ['message', 'receiver'], 'Kernel-Exceptions');
- smalltalk.addMethod(
- smalltalk.method({
- selector: "message",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self["@message"];
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"message",{},smalltalk.MessageNotUnderstood)})},
- messageSends: []}),
- smalltalk.MessageNotUnderstood);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "message:",
- fn: function (aMessage){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self["@message"]=aMessage;
- return self}, function($ctx1) {$ctx1.fill(self,"message:",{aMessage:aMessage},smalltalk.MessageNotUnderstood)})},
- messageSends: []}),
- smalltalk.MessageNotUnderstood);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "messageText",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(_st(_st(_st(self)._receiver())._asString()).__comma(" does not understand #")).__comma(_st(_st(self)._message())._selector());
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"messageText",{},smalltalk.MessageNotUnderstood)})},
- messageSends: [",", "selector", "message", "asString", "receiver"]}),
- smalltalk.MessageNotUnderstood);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "receiver",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self["@receiver"];
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"receiver",{},smalltalk.MessageNotUnderstood)})},
- messageSends: []}),
- smalltalk.MessageNotUnderstood);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "receiver:",
- fn: function (anObject){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self["@receiver"]=anObject;
- return self}, function($ctx1) {$ctx1.fill(self,"receiver:",{anObject:anObject},smalltalk.MessageNotUnderstood)})},
- messageSends: []}),
- smalltalk.MessageNotUnderstood);
- smalltalk.addClass('NonBooleanReceiver', smalltalk.Error, ['object'], 'Kernel-Exceptions');
- smalltalk.addMethod(
- smalltalk.method({
- selector: "object",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=self["@object"];
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"object",{},smalltalk.NonBooleanReceiver)})},
- messageSends: []}),
- smalltalk.NonBooleanReceiver);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "object:",
- fn: function (anObject){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self["@object"]=anObject;
- return self}, function($ctx1) {$ctx1.fill(self,"object:",{anObject:anObject},smalltalk.NonBooleanReceiver)})},
- messageSends: []}),
- smalltalk.NonBooleanReceiver);
- smalltalk.addClass('ErrorHandler', smalltalk.Object, [], 'Kernel-Exceptions');
- smalltalk.addMethod(
- smalltalk.method({
- selector: "handleError:",
- fn: function (anError){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(anError)._context();
- if(($receiver = $1) == nil || $receiver == undefined){
- $1;
- } else {
- _st(self)._logErrorContext_(_st(anError)._context());
- };
- _st(self)._logError_(anError);
- return self}, function($ctx1) {$ctx1.fill(self,"handleError:",{anError:anError},smalltalk.ErrorHandler)})},
- messageSends: ["ifNotNil:", "logErrorContext:", "context", "logError:"]}),
- smalltalk.ErrorHandler);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "log:",
- fn: function (aString){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(console)._log_(aString);
- return self}, function($ctx1) {$ctx1.fill(self,"log:",{aString:aString},smalltalk.ErrorHandler)})},
- messageSends: ["log:"]}),
- smalltalk.ErrorHandler);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "logContext:",
- fn: function (aContext){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1;
- $1=_st(aContext)._home();
- if(($receiver = $1) == nil || $receiver == undefined){
- $1;
- } else {
- _st(self)._logContext_(_st(aContext)._home());
- };
- _st(self)._log_(_st(_st(_st(_st(aContext)._receiver())._asString()).__comma(">>")).__comma(_st(_st(aContext)._selector())._asString()));
- return self}, function($ctx1) {$ctx1.fill(self,"logContext:",{aContext:aContext},smalltalk.ErrorHandler)})},
- messageSends: ["ifNotNil:", "logContext:", "home", "log:", ",", "asString", "selector", "receiver"]}),
- smalltalk.ErrorHandler);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "logError:",
- fn: function (anError){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(self)._log_(_st(anError)._messageText());
- return self}, function($ctx1) {$ctx1.fill(self,"logError:",{anError:anError},smalltalk.ErrorHandler)})},
- messageSends: ["log:", "messageText"]}),
- smalltalk.ErrorHandler);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "logErrorContext:",
- fn: function (aContext){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $1,$2;
- $1=aContext;
- if(($receiver = $1) == nil || $receiver == undefined){
- $1;
- } else {
- $2=_st(aContext)._home();
- if(($receiver = $2) == nil || $receiver == undefined){
- $2;
- } else {
- _st(self)._logContext_(_st(aContext)._home());
- };
- };
- return self}, function($ctx1) {$ctx1.fill(self,"logErrorContext:",{aContext:aContext},smalltalk.ErrorHandler)})},
- messageSends: ["ifNotNil:", "logContext:", "home"]}),
- smalltalk.ErrorHandler);
- smalltalk.ErrorHandler.klass.iVarNames = ['current'];
- smalltalk.addMethod(
- smalltalk.method({
- selector: "current",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- var $2,$1;
- $2=self["@current"];
- if(($receiver = $2) == nil || $receiver == undefined){
- self["@current"]=_st(self)._new();
- $1=self["@current"];
- } else {
- $1=$2;
- };
- return $1;
- }, function($ctx1) {$ctx1.fill(self,"current",{},smalltalk.ErrorHandler.klass)})},
- messageSends: ["ifNil:", "new"]}),
- smalltalk.ErrorHandler.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "initialize",
- fn: function (){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- _st(self)._register();
- return self}, function($ctx1) {$ctx1.fill(self,"initialize",{},smalltalk.ErrorHandler.klass)})},
- messageSends: ["register"]}),
- smalltalk.ErrorHandler.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "register",
- fn: function (){
- var self=this;
- function $ErrorHandler(){return smalltalk.ErrorHandler||(typeof ErrorHandler=="undefined"?nil:ErrorHandler)}
- return smalltalk.withContext(function($ctx1) {
- _st($ErrorHandler())._setCurrent_(_st(self)._new());
- return self}, function($ctx1) {$ctx1.fill(self,"register",{},smalltalk.ErrorHandler.klass)})},
- messageSends: ["setCurrent:", "new"]}),
- smalltalk.ErrorHandler.klass);
- smalltalk.addMethod(
- smalltalk.method({
- selector: "setCurrent:",
- fn: function (anHandler){
- var self=this;
- return smalltalk.withContext(function($ctx1) {
- self["@current"]=anHandler;
- return self}, function($ctx1) {$ctx1.fill(self,"setCurrent:",{anHandler:anHandler},smalltalk.ErrorHandler.klass)})},
- messageSends: []}),
- smalltalk.ErrorHandler.klass);
|