ffi: use expressions for bit field width also.

* ffi.c (ffi_type_compile): Evaluate width argument
of sbit and ubit type as as expression.

* txr.1: Documented.

1 files changed, 1 insertions, 1 deletions

diff --git a/ffi.c b/ffi.c
index db7ae8cd..84ec6b9f 100644
--- a/ffi.c
+++ b/ffi.c
@@ -2341,7 +2341,7 @@ val ffi_type_compile(val syntax)
                                    ffi_carray_put, ffi_carray_get,
                                    0, 0, 0, eltype);
     } else if (sym == sbit_s || sym == ubit_s) {
-      val nbits = cadr(syntax);
+      val nbits = ffi_eval_expr(cadr(syntax), nil, nil);
       cnum nb = c_num(nbits);
       val type = make_ffi_type_builtin(syntax, integer_s, 0, 0,
                                        &ffi_type_void,