364 |
|
|
365 |
|
|
366 |
/* CFDate to a list of three integers as in a return value of |
/* CFDate to a list of three integers as in a return value of |
367 |
`current-time'xo. */ |
`current-time'. */ |
368 |
|
|
369 |
Lisp_Object |
Lisp_Object |
370 |
cfdate_to_lisp (date) |
cfdate_to_lisp (date) |
371 |
CFDateRef date; |
CFDateRef date; |
372 |
{ |
{ |
373 |
static CFGregorianDate epoch_gdate = {1970, 1, 1, 0, 0, 0.0}; |
static const CFGregorianDate epoch_gdate = {1970, 1, 1, 0, 0, 0.0}; |
374 |
static CFAbsoluteTime epoch = 0.0, sec; |
static CFAbsoluteTime epoch = 0.0, sec; |
375 |
int high, low; |
int high, low; |
376 |
|
|
668 |
return Qnil; |
return Qnil; |
669 |
|
|
670 |
result = Fcons (component, result); |
result = Fcons (component, result); |
671 |
while (binding = parse_binding (p)) |
while ((binding = parse_binding (p)) != '\0') |
672 |
{ |
{ |
673 |
if (binding == '*') |
if (binding == '*') |
674 |
result = Fcons (LOOSE_BINDING, result); |
result = Fcons (LOOSE_BINDING, result); |
3662 |
CFDate List of three integers date |
CFDate List of three integers date |
3663 |
(cf. `current-time') |
(cf. `current-time') |
3664 |
CFData Unibyte string data |
CFData Unibyte string data |
3665 |
CFArray Array array |
CFArray Vector array |
3666 |
CFDictionary Alist or hash table dictionary |
CFDictionary Alist or hash table dictionary |
3667 |
(depending on HASH-BOUND) |
(depending on HASH-BOUND) |
3668 |
|
|
4174 |
staticpro (&QCLIPBOARD); |
staticpro (&QCLIPBOARD); |
4175 |
|
|
4176 |
#if TARGET_API_MAC_CARBON |
#if TARGET_API_MAC_CARBON |
4177 |
Qstring = intern ("string"); |
Qstring = intern ("string"); staticpro (&Qstring); |
4178 |
staticpro (&Qstring); |
Qnumber = intern ("number"); staticpro (&Qnumber); |
4179 |
|
Qboolean = intern ("boolean"); staticpro (&Qboolean); |
4180 |
Qnumber = intern ("number"); |
Qdate = intern ("date"); staticpro (&Qdate); |
4181 |
staticpro (&Qnumber); |
Qdata = intern ("data"); staticpro (&Qdata); |
4182 |
|
Qarray = intern ("array"); staticpro (&Qarray); |
4183 |
Qboolean = intern ("boolean"); |
Qdictionary = intern ("dictionary"); staticpro (&Qdictionary); |
|
staticpro (&Qboolean); |
|
|
|
|
|
Qdate = intern ("date"); |
|
|
staticpro (&Qdate); |
|
|
|
|
|
Qdata = intern ("data"); |
|
|
staticpro (&Qdata); |
|
|
|
|
|
Qarray = intern ("array"); |
|
|
staticpro (&Qarray); |
|
|
|
|
|
Qdictionary = intern ("dictionary"); |
|
|
staticpro (&Qdictionary); |
|
4184 |
|
|
4185 |
Qxml = intern ("xml"); |
Qxml = intern ("xml"); |
4186 |
staticpro (&Qxml); |
staticpro (&Qxml); |