diff options
-rw-r--r-- | drmaa/v1/low.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/drmaa/v1/low.scm b/drmaa/v1/low.scm index 7a82cc1..93f7f42 100644 --- a/drmaa/v1/low.scm +++ b/drmaa/v1/low.scm @@ -92,7 +92,7 @@ STRING-LIST." (bv-set! bv (* (sizeof '*) index) address)) addresses (iota n)) ;; The vector must be NULL-terminated - (bv-set! bv (1+ n) 0) + (bv-set! bv (* (1+ n) (sizeof '*)) 0) bv)) (define-syntax-rule (return ret success error-message) |