summaryrefslogtreecommitdiffstats
path: root/ffi.c
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2017-04-30 06:55:34 -0700
committerKaz Kylheku <kaz@kylheku.com>2017-04-30 06:55:34 -0700
commitdde97c714b4303f1fa715dae9adb1978afe8c8ef (patch)
treee7a52fdee463bb9ed4346ab01da803c068a9148f /ffi.c
parentb29c0d7a80c760043887412e365a4cdf8178a997 (diff)
downloadtxr-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.c6
1 files changed, 2 insertions, 4 deletions
diff --git a/ffi.c b/ffi.c
index 6b42d97d..298000ad 100644
--- a/ffi.c
+++ b/ffi.c
@@ -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);