summaryrefslogtreecommitdiff
path: root/drmaa/errors.scm
diff options
context:
space:
mode:
Diffstat (limited to 'drmaa/errors.scm')
-rw-r--r--drmaa/errors.scm5
1 files changed, 4 insertions, 1 deletions
diff --git a/drmaa/errors.scm b/drmaa/errors.scm
index 76dcec2..2831414 100644
--- a/drmaa/errors.scm
+++ b/drmaa/errors.scm
@@ -21,6 +21,7 @@
#:use-module (srfi srfi-35)
#:export (&drmaa-error
drmaa-error?
+ drmaa-error-code
&formatted-message
formatted-message?
@@ -28,7 +29,9 @@
formatted-message-arguments))
(define-condition-type &drmaa-error &error
- drmaa-error?)
+ drmaa-error?
+ (code drmaa-error-code))
+
(define-condition-type &formatted-message &error
formatted-message?