diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2017-04-30 06:55:34 -0700 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2017-04-30 06:55:34 -0700 |
commit | dde97c714b4303f1fa715dae9adb1978afe8c8ef (patch) | |
tree | e7a52fdee463bb9ed4346ab01da803c068a9148f /ffi.c | |
parent | b29c0d7a80c760043887412e365a4cdf8178a997 (diff) | |
download | txr-dde97c714b4303f1fa715dae9adb1978afe8c8ef.tar.gz txr-dde97c714b4303f1fa715dae9adb1978afe8c8ef.tar.bz2 txr-dde97c714b4303f1fa715dae9adb1978afe8c8ef.zip |
ffi: housecleaning: reorder type sym declarations.
* ffi.c: Move declarations of array_s and zarray_s
after void_s, to keep built-in FFI types together.
Eliminate some blank lines.
(ffi_init): Move initialization of void_s to
to match declaration order.
* ffi.h: Update declarations of type symbol variables
to match ffi.c.
(struct_s): Now declared.
Diffstat (limited to 'ffi.c')
-rw-r--r-- | ffi.c | 6 |
1 files changed, 2 insertions, 4 deletions
@@ -61,13 +61,11 @@ val char_s, uchar_s, wchar_s; val short_s, ushort_s; val int_s, uint_s; val long_s, ulong_s; - val double_s; +val void_s; val array_s, zarray_s; -val void_s; - val struct_s; val str_d_s, wstr_s, wstr_d_s; @@ -1637,9 +1635,9 @@ void ffi_init(void) long_s = intern(lit("long"), user_package); ulong_s = intern(lit("ulong"), user_package); double_s = intern(lit("double"), user_package); + void_s = intern(lit("void"), user_package); array_s = intern(lit("array"), user_package); zarray_s = intern(lit("zarray"), user_package); - void_s = intern(lit("void"), user_package); struct_s = intern(lit("struct"), user_package); str_d_s = intern(lit("str-d"), user_package); wstr_s = intern(lit("wstr"), user_package); |