ffi: new type operator align for customizing alignment.

* ffi.c (align_s): New symbol variable.
(struct txr_ffi_type): New function pointer member, clone.
(ffi_simple_clone): New static function.
(make_ffi_type_builtin, make_ffi_type_pointer,
make_ffi_type_enum): Wire in ffi_simple_clone as the clone
function.
(ffi_struct_clone): New static function.
(make_ffi_type_struct): Wire in ffi_struct_clone as the clone
function for struct types.
(ffi_array_clone): New static function.
(make_ffi_type_array): Wire in ffi_array_clone as the clone
function for array types.
(ffi_type_copy): New static function.
(ffi_type_compile): Recognize new (align <num> <type>) syntax.
This works by cloning <type>, and then punching in the
specified alignment. The align syntax then denotes this
modified type.
(ffi_init): Initialize align_s.

* ffi.h (align_s): Declared.

1 files changed, 2 insertions, 0 deletions

diff --git a/ffi.h b/ffi.h
index c8f6021b..a34bbfef 100644
--- a/ffi.h
+++ b/ffi.h
@@ -55,6 +55,8 @@ extern val sbit_s, ubit_s;
 
 extern val enum_s;
 
+extern val align_s;
+
 extern val ffi_type_s, ffi_call_desc_s, ffi_closure_s;
 
 val ffi_type_compile(val syntax);