1.1--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
     1.2+++ b/lisp/ffi/rocksdb/macs.lisp	Sat Oct 21 01:11:32 2023 -0400
     1.3@@ -0,0 +1,17 @@
     1.4+;;; rocksdb/macs.lisp --- macros used to generate the alien API
     1.5+
     1.6+;;; Code:
     1.7+(defpackage :rocksdb/macs
     1.8+  (:use :cl :std)
     1.9+  (:export
    1.10+   :def-rocksdb-opt))
    1.11+
    1.12+(in-package :rocksdb/macs)
    1.13+
    1.14+(defmacro def-opt-getter (opt &rest args)
    1.15+  `(define-alien-routine ,opt (* ,opt) ,args))
    1.16+
    1.17+(defmacro def-opt-setter (opt &rest args)
    1.18+  `(define-alien-routine ,opt (* ,opt) ,args))
    1.19+
    1.20+(defmacro def-rocksdb-opt (opt))