mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-03-03 03:00:34 -08:00
Code Issues Projects Releases Packages Wiki Activity

Remove unused definitions.

Browse source
This commit is contained in:
jjgarcia 2002-09-03 11:54:25 +00:00
parent 5339a44232
commit 475c8627a6
2 changed files with 0 additions and 13 deletions
Download patch file Download diff file Expand all files Collapse all files

1
src/c/time.d
View file

@ -151,7 +151,6 @@ init_unixtime(void)
{
beginning = time(0);
make_si_special("*DEFAULT-TIME-ZONE*", MAKE_FIXNUM(TIME_ZONE));
make_constant("INTERNAL-TIME-UNITS-PER-SECOND", MAKE_FIXNUM(HZ));
Jan1st1970UT =

12
src/h/object.h
View file

@ -553,18 +553,6 @@ typedef enum {
FALSE : x == Cnil ? TRUE : \
(FEtype_error_list(x), FALSE))
#define endp(obje) endp1(obje)
#define TIME_ZONE (-1)
#ifdef WORDS_BIGENDIAN
#define HIND 0
#define LIND 1
#else /* little endian */
#define HIND 1 /* (int) of double where the exponent and most signif is */
#define LIND 0 /* low part of a double */
#endif /* WORDS_BIGENDIAN */
#ifdef __cplusplus
}
#endif