[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [Gcl-devel] get-system-time-zone in wrong package
From: |
Camm Maguire |
Subject: |
Re: [Gcl-devel] get-system-time-zone in wrong package |
Date: |
23 Oct 2002 16:47:05 -0400 |
Hi Peter! This looks good to me, and I of course agree that it should
be internal to system.
Take care,
Peter Wood <address@hidden> writes:
> --k1lZvvs/B4yU6o8G
> Content-Type: text/plain; charset=us-ascii
> Content-Disposition: inline
>
> Hi
>
> The function get-system-time-zone (in o/unixtime.c) is built as an
> external symbol in the LISP package which means it ends up in
> COMMON-LISP. This is non-ansi, and I'd like to move it to SYSTEM.
>
> Is this ok?
>
> Regards,
> Peter
> --k1lZvvs/B4yU6o8G
> Content-Type: text/plain; charset=us-ascii
> Content-Disposition: attachment; filename="unixtime.c.patch"
>
> --- ../../TEST.cvs/gcl/o/unixtime.c Sat Oct 19 07:07:23 2002
> +++ o/unixtime.c Wed Oct 23 20:04:28 2002
> @@ -52,7 +52,7 @@
> #include <sys/timeb.h>
> int usleep ( unsigned int microseconds );
> #endif
> -void Lget_system_time_zone(void);
> +void siLget_system_time_zone(void);
> #endif /* __MINGW32__ and __GNUC__ */
>
> #ifdef BSD
> @@ -198,7 +198,7 @@
> make_function("SLEEP", Lsleep);
> make_function("GET-INTERNAL-RUN-TIME", Lget_internal_run_time);
> #if defined __MINGW32__ || defined __GNUC__
> - make_function("GET-SYSTEM-TIME-ZONE", Lget_system_time_zone);
> + make_si_function("GET-SYSTEM-TIME-ZONE", siLget_system_time_zone);
> #endif
> }
>
> @@ -244,7 +244,7 @@
>
> #if defined __MINGW32__ || defined __GNUC__
> void
> -Lget_system_time_zone(void)
> +siLget_system_time_zone(void)
> {
> check_arg(0);
> vs_push ( make_fixnum ( system_time_zone_helper() ) );
>
> --k1lZvvs/B4yU6o8G--
>
>
> _______________________________________________
> Gcl-devel mailing list
> address@hidden
> http://mail.gnu.org/mailman/listinfo/gcl-devel
>
>
--
Camm Maguire address@hidden
==========================================================================
"The earth is but one country, and mankind its citizens." -- Baha'u'llah