diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2017-05-17 05:55:07 -0700 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2017-05-17 05:55:07 -0700 |
commit | 822d713065bcb44d1c1e035c34cb87fc085e74e3 (patch) | |
tree | e0f244c7769df4a7612b5d8532104622c7f67a45 /share | |
parent | 27514a0cde3a43f5c54c50a6899fb3a4666390ca (diff) | |
download | txr-822d713065bcb44d1c1e035c34cb87fc085e74e3.tar.gz txr-822d713065bcb44d1c1e035c34cb87fc085e74e3.tar.bz2 txr-822d713065bcb44d1c1e035c34cb87fc085e74e3.zip |
ffi: typedef macro instead of deffi-type.
* share/txr/stdlib/ffi.tl (typedef): New macro.
* lisplib.c (ffi_set_entries): Add typedef to autoload
name list.
* txr.1: Doc update. Remove mentions of deffi-type,
though it continues to work.
Diffstat (limited to 'share')
-rw-r--r-- | share/txr/stdlib/ffi.tl | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/share/txr/stdlib/ffi.tl b/share/txr/stdlib/ffi.tl index ec164b61..b2a14787 100644 --- a/share/txr/stdlib/ffi.tl +++ b/share/txr/stdlib/ffi.tl @@ -72,6 +72,9 @@ (defmacro deffi-type (name type-expr) ^(ffi-typedef ',name (ffi-type-compile ',type-expr))) +(defmacro typedef (name type-expr) + ^(ffi-typedef ',name (ffi-type-compile ',type-expr))) + (defun sys:deffi-cb-expander (f name rettype argtypes safe-p abort-retval) (let ((ret-type-sym (gensym "ret-type-")) (arg-types-sym (gensym "arg-types-")) |