langs a-z

Task/Exceptions/Slate/exceptions-1.slate

@@ -0,0 +1,4 @@
+se@(SceneElement traits) doWithRestart: block
+[
+  block handlingCases: {Abort -> [| :_ | ^ Nil]}
+].

Task/Exceptions/Slate/exceptions-2.slate

@@ -0,0 +1,18 @@
+conditions define: #Abort &parents: {Restart}.
+"An Abort is a Restart which exits the computation, unwinding the stack."
+
+_@lobby abort
+[
+  Abort signal
+].
+_@(Abort traits) describeOn: console
+[
+  console ; 'Abort evaluation of expression\n'
+].
+
+"This will call:"
+c@(Condition traits) signal
+"Signalling a Condition."
+[
+  c tryHandlers
+].

Task/Exceptions/Slate/exceptions-3.slate

@@ -0,0 +1 @@
+(fileName endsWith: '.image') ifTrue: [error: 'Image filename specified where Slate source expected. Make sure you run slate with the -i flag to specify an image.'].