started adding code for supporting exception handling

2016-03-26 06:39:56 +00:00
parent 6487143a59
commit 2a88f5d503
3 changed files with 80 additions and 31 deletions
--- a/stix/kernel/Context.st
+++ b/stix/kernel/Context.st
@ -181,9 +181,10 @@


 	"------ TODO: -------------------------------------"
-	#method on: anError do: anExceptionBlock
+	#method on: anException do: anExceptionBlock
 	{
-		"TODO: handle if anError is an ErrorSet .."
+		<primitive: #block_on_do>
+		self primitiveFailed.
 	}

 	#method ensure: aBlock