add beginnings of exceptions example

1 files changed, 21 insertions, 0 deletions

diff --git a/Exceptions/exceptions.b b/Exceptions/exceptions.b
new file mode 100644
index 0000000..336c448
--- /dev/null
+++ b/Exceptions/exceptions.b
@@ -0,0 +1,21 @@
+implement Exceptions;
+
+include "sys.m";
+include "draw.m";
+
+sys: Sys;
+print: import sys;
+
+Exceptions: module {
+	init: fn(nil: ref Draw->Context, nil: list of string);
+};
+
+init(nil: ref Draw->Context, nil: list of string) {
+	sys = load Sys Sys->PATH;
+
+	
+
+	raise "going down!";
+
+	exit;
+}