diff options
| author | Kaz Kylheku <kaz@kylheku.com> | 2022-01-06 20:03:25 -0800 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2022-01-06 20:03:25 -0800 |
| commit | 07a0d613fceaf12fd7bf2f900223ac925908c76e (patch) | |
| tree | 7d8ded9098d1e715af35b5cc8b6e7ea97097f543 /sysif.c | |
| parent | 5983e14cf97bd1302151ffc3dbc53451acdc87e9 (diff) | |
| download | txr-07a0d613fceaf12fd7bf2f900223ac925908c76e.tar.gz txr-07a0d613fceaf12fd7bf2f900223ac925908c76e.tar.bz2 txr-07a0d613fceaf12fd7bf2f900223ac925908c76e.zip | |
Casts have crept into the code not wrapped by macros.
It is against TXR coding conventions to use the C cast
notation. The usage creeps into the code. To find instances of
this, we must compile using GNU g++, and add -Wold-style-cast
via EXTRA_FLAGS.
* eval.c (prof_call): Use macro instead of cast.
* ffi.c (pad_retval, ffi_varray_alloc, make_ffi_type_union,
carray_dup, carray_replace, uint_carray, int_carray,
put_carray, fill_carray): Likewise.
* itypes.c (c_i64, c_u64): Likewise.
* lib.c (cyr, chk_xalloc, spilt_str_keep, vector,
cobj_register): Likewise.
* linenoise.c (record_undo): Likewise. Also, drop one
superfluous cast: wstrdup_fn returns wchar_t *.
(flash, edit_insert, edit_insert_str): Use macro instead of cast.
* mpi/mpi.c (s_mp_ispow2d): Likewise.
* parser.c (lino_getch): Likewise.
* rand.c (make_random_state, random_buf): Likewise.
* stream.c (generic_get_line, do_parse_mode): Likewise.
* struct.c (get_duplicate_supers, call_initfun_chain,
call_postinitfun_chain): Likewise.
* sysif.c (c_time): Likewise.
* tree.c (tr_insert): Likewise.
Diffstat (limited to 'sysif.c')
| -rw-r--r-- | sysif.c | 4 |
1 files changed, 3 insertions, 1 deletions
@@ -1227,7 +1227,9 @@ static val exit_star_wrap(val status) time_t c_time(val time, val self) { - return if3(convert(time_t, -1) > 0, (time_t) c_unum(time, self), (time_t) c_num(time, self)); + return if3(convert(time_t, -1) > 0, + convert(time_t, c_unum(time, self)), + convert(time_t, c_num(time, self))); } val num_time(time_t time) |