Data commit

Task/Exceptions/Oz/exceptions-1.oz

@@ -0,0 +1,2 @@
+raise sillyError end
+raise slightlyLessSilly(data:42 reason:outOfMemory) end

Task/Exceptions/Oz/exceptions-2.oz

@@ -0,0 +1,5 @@
+try
+   raise someError(debug:unit) end
+catch someError(debug:d(stack:ST ...)...) then
+   {Inspect ST}
+end

Task/Exceptions/Oz/exceptions-3.oz

@@ -0,0 +1,11 @@
+try
+   {Foo}
+catch sillyError then
+   {Bar}
+[] slightlyLessSilly(data:D ...) then
+   {Quux D}
+[] _ then %% an unknown type of exception was thrown
+   {Baz}
+finally
+   {Fin}
+end