Additionally, you have to make the following modification to procedure
check-typespec-options in file g-wrap/c-types.scm:

---cut here---
(define-method (check-typespec-options (type <gw-wct>) (options <list>))
  (let ((remainder (lset-difference eq? options (append '(caller-owned
callee-owned const)
                                                        (slot-ref type 'allowed-options)))))
    (if (not (null? remainder))
    (raise-bad-typespec type options "spurious options: ~S" remainder))))
---cut here---

    - Tommi Höynälänmaa


_______________________________________________
g-wrap-dev mailing list
g-wrap-dev@nongnu.org
https://lists.nongnu.org/mailman/listinfo/g-wrap-dev

Reply via email to