From ec6de08243cf8f1a71063fd61082399907d88051 Mon Sep 17 00:00:00 2001
From: Kaz Kylheku <kaz@kylheku.com>
Date: Wed, 5 Aug 2015 20:55:33 -0700
Subject: New exception type: system-error.

* lib.c (system_error_s): New symbol variable.
(obj_init): Initialize new variable.

* lib.h (system_error_s): Declared.

* unwind.c (uw_init): Register system-error exception type.
---
 lib.h | 1 +
 1 file changed, 1 insertion(+)

(limited to 'lib.h')

diff --git a/lib.h b/lib.h
index fbdc06a8..86cf0b01 100644
--- a/lib.h
+++ b/lib.h
@@ -392,6 +392,7 @@ extern val eof_s, eol_s, assert_s;
 extern val error_s, type_error_s, internal_error_s;
 extern val numeric_error_s, range_error_s;
 extern val query_error_s, file_error_s, process_error_s, syntax_error_s;
+extern val system_error_s;
 extern val gensym_counter_s;
 
 #define gensym_counter (deref(lookup_var_l(nil, gensym_counter_s)))
-- 
cgit v1.2.3