/ BCI NET 2 / BCI NET 2.iso / archives / programming / source / a2.0bemacs-src.lha / Emacs-19.25 / lisp / cal-dst.elc

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 13 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 72 6d 73 40 6d 6f 6c |piled by| rms@mol|
|00000020| 65 2e 67 6e 75 2e 61 69 | 2e 6d 69 74 2e 65 64 75 |e.gnu.ai|.mit.edu|
|00000030| 20 6f 6e 20 4d 6f 6e 20 | 4d 61 79 20 33 30 20 30 | on Mon |May 30 0|
|00000040| 36 3a 32 37 3a 32 37 20 | 31 39 39 34 0a 3b 3b 3b |6:27:27 |1994.;;;|
|00000050| 20 66 72 6f 6d 20 66 69 | 6c 65 20 2f 68 6f 6d 65 | from fi|le /home|
|00000060| 2f 66 73 66 2f 72 6d 73 | 2f 65 31 39 2f 6c 69 73 |/fsf/rms|/e19/lis|
|00000070| 70 2f 63 61 6c 2d 64 73 | 74 2e 65 6c 0a 3b 3b 3b |p/cal-ds|t.el.;;;|
|00000080| 20 65 6d 61 63 73 20 76 | 65 72 73 69 6f 6e 20 31 | emacs v|ersion 1|
|00000090| 39 2e 32 33 2e 39 30 2e | 31 2e 0a 3b 3b 3b 20 62 |9.23.90.|1..;;; b|
|000000a0| 79 74 65 63 6f 6d 70 20 | 76 65 72 73 69 6f 6e 20 |ytecomp |version |
|000000b0| 46 53 46 20 32 2e 31 30 | 0a 3b 3b 3b 20 6f 70 74 |FSF 2.10|.;;; opt|
|000000c0| 69 6d 69 7a 61 74 69 6f | 6e 20 69 73 20 6f 6e 2e |imizatio|n is on.|
|000000d0| 0a 3b 3b 3b 20 74 68 69 | 73 20 66 69 6c 65 20 75 |.;;; thi|s file u|
|000000e0| 73 65 73 20 6f 70 63 6f | 64 65 73 20 77 68 69 63 |ses opco|des whic|
|000000f0| 68 20 64 6f 20 6e 6f 74 | 20 65 78 69 73 74 20 69 |h do not| exist i|
|00000100| 6e 20 45 6d 61 63 73 20 | 31 38 2e 0a 0a 28 69 66 |n Emacs |18...(if|
|00000110| 20 28 61 6e 64 20 28 62 | 6f 75 6e 64 70 20 27 65 | (and (b|oundp 'e|
|00000120| 6d 61 63 73 2d 76 65 72 | 73 69 6f 6e 29 0a 09 20 |macs-ver|sion).. |
|00000130| 28 6f 72 20 28 61 6e 64 | 20 28 62 6f 75 6e 64 70 |(or (and| (boundp|
|00000140| 20 27 65 70 6f 63 68 3a | 3a 76 65 72 73 69 6f 6e | 'epoch:|:version|
|00000150| 29 20 65 70 6f 63 68 3a | 3a 76 65 72 73 69 6f 6e |) epoch:|:version|
|00000160| 29 0a 09 20 20 20 20 20 | 28 73 74 72 69 6e 67 2d |)..     |(string-|
|00000170| 6c 65 73 73 70 20 65 6d | 61 63 73 2d 76 65 72 73 |lessp em|acs-vers|
|00000180| 69 6f 6e 20 22 31 39 22 | 29 29 29 0a 20 20 20 20 |ion "19"|))).    |
|00000190| 28 65 72 72 6f 72 20 22 | 60 2f 68 6f 6d 65 2f 66 |(error "|`/home/f|
|000001a0| 73 66 2f 72 6d 73 2f 65 | 31 39 2f 6c 69 73 70 2f |sf/rms/e|19/lisp/|
|000001b0| 63 61 6c 2d 64 73 74 2e | 65 6c 27 20 77 61 73 20 |cal-dst.|el' was |
|000001c0| 63 6f 6d 70 69 6c 65 64 | 20 66 6f 72 20 45 6d 61 |compiled| for Ema|
|000001d0| 63 73 20 31 39 22 29 29 | 0a 0a 28 72 65 71 75 69 |cs 19"))|..(requi|
|000001e0| 72 65 20 28 71 75 6f 74 | 65 20 63 61 6c 65 6e 64 |re (quot|e calend|
|000001f0| 61 72 29 29 0a 28 64 65 | 66 76 61 72 20 63 61 6c |ar)).(de|fvar cal|
|00000200| 65 6e 64 61 72 2d 63 75 | 72 72 65 6e 74 2d 74 69 |endar-cu|rrent-ti|
|00000210| 6d 65 2d 7a 6f 6e 65 2d | 63 61 63 68 65 20 6e 69 |me-zone-|cache ni|
|00000220| 6c 20 22 5c 0a 43 61 63 | 68 65 20 66 6f 72 20 72 |l "\.Cac|he for r|
|00000230| 65 73 75 6c 74 20 6f 66 | 20 63 61 6c 65 6e 64 61 |esult of| calenda|
|00000240| 72 2d 63 75 72 72 65 6e | 74 2d 74 69 6d 65 2d 7a |r-curren|t-time-z|
|00000250| 6f 6e 65 2e 22 29 0a 28 | 64 65 66 76 61 72 20 63 |one.").(|defvar c|
|00000260| 61 6c 65 6e 64 61 72 2d | 73 79 73 74 65 6d 2d 74 |alendar-|system-t|
|00000270| 69 6d 65 2d 62 61 73 69 | 73 20 28 62 79 74 65 2d |ime-basi|s (byte-|
|00000280| 63 6f 64 65 20 22 c0 19 | c2 1b c2 1c c5 1e 06 5c |code "..|.......\|
|00000290| 66 0b 53 c7 5f 5c 5c 1e | 08 0b c9 56 83 43 00 0e |f.S._\\.|...V.C..|
|000002a0| 08 0b ca 5f cb 5c 5c cc | a5 5a 16 08 0e 06 ca a6 |..._.\\.|.Z......|
|000002b0| cd 55 83 43 00 0e 06 ce | a6 cd 55 83 3e 00 0e 06 |.U.C....|..U.>...|
|000002c0| cf a6 cd 55 83 43 00 0e | 08 54 16 08 0e 08 2c 09 |...U.C..|.T....,.|
|000002d0| d0 5f 09 ca a5 09 ce a5 | 5b 09 cf a5 5c 5c 5c 5c |._......|[...\\\\|
|000002e0| 5c 5c 5c 5c 29 87 22 20 | 5b 31 39 36 39 20 70 72 |\\\\)." |[1969 pr|
|000002f0| 69 6f 72 2d 79 65 61 72 | 73 20 31 20 6d 6f 6e 74 |ior-year|s 1 mont|
|00000300| 68 20 64 61 79 20 31 39 | 37 30 20 79 65 61 72 20 |h day 19|70 year |
|00000310| 33 31 20 64 61 79 2d 6f | 66 2d 79 65 61 72 20 32 |31 day-o|f-year 2|
|00000320| 20 34 20 32 33 20 31 30 | 20 30 20 31 30 30 20 34 | 4 23 10| 0 100 4|
|00000330| 30 30 20 33 36 35 5d 20 | 36 29 20 22 5c 0a 41 62 |00 365] |6) "\.Ab|
|00000340| 73 6f 6c 75 74 65 20 64 | 61 74 65 20 6f 66 20 73 |solute d|ate of s|
|00000350| 74 61 72 74 69 6e 67 20 | 64 61 74 65 20 6f 66 20 |tarting |date of |
|00000360| 73 79 73 74 65 6d 20 63 | 6c 6f 63 6b 2e 22 29 0a |system c|lock.").|
|00000370| 28 64 65 66 61 6c 69 61 | 73 20 27 63 61 6c 65 6e |(defalia|s 'calen|
|00000380| 64 61 72 2d 61 62 73 6f | 6c 75 74 65 2d 66 72 6f |dar-abso|lute-fro|
|00000390| 6d 2d 74 69 6d 65 20 23 | 5b 28 78 20 75 74 63 2d |m-time #|[(x utc-|
|000003a0| 64 69 66 66 29 20 22 08 | 40 19 08 41 1a 0b 5c 6e |diff) ".|@..A..\n|
|000003b0| a7 83 10 00 5c 6e 82 12 | 00 5c 6e 40 5c 5c 1c c5 |....\n..|.\n@\\..|
|000003c0| 09 c6 5c 22 c7 5f c8 5c | 66 c9 5c 22 5c 5c 1e 5c |..\"._.\|f.\"\\.\|
|000003d0| 6e 0e 0b c8 09 c6 5c 22 | c7 5f c8 0e 5c 6e c6 5c |n.....\"|._..\n.\|
|000003e0| 22 5c 5c 5c 5c c5 0e 5c | 6e c6 5c 22 c9 5f c5 5c |"\\\\..\|n.\"._.\|
|000003f0| 66 c9 5c 22 5c 5c 2c 42 | 87 22 20 5b 78 20 68 20 |f.\"\\,B|." [x h |
|00000400| 78 74 61 69 6c 20 75 74 | 63 2d 64 69 66 66 20 6c |xtail ut|c-diff l|
|00000410| 20 6d 6f 64 20 36 37 35 | 20 35 31 32 20 66 6c 6f | mod 675| 512 flo|
|00000420| 6f 72 20 31 32 38 20 75 | 20 63 61 6c 65 6e 64 61 |or 128 u| calenda|
|00000430| 72 2d 73 79 73 74 65 6d | 2d 74 69 6d 65 2d 62 61 |r-system|-time-ba|
|00000440| 73 69 73 5d 20 35 20 22 | 5c 0a 41 62 73 6f 6c 75 |sis] 5 "|\.Absolu|
|00000450| 74 65 20 6c 6f 63 61 6c | 20 64 61 74 65 20 6f 66 |te local| date of|
|00000460| 20 74 69 6d 65 20 58 3b | 20 6c 6f 63 61 6c 20 74 | time X;| local t|
|00000470| 69 6d 65 20 69 73 20 55 | 54 43 2d 44 49 46 46 20 |ime is U|TC-DIFF |
|00000480| 73 65 63 6f 6e 64 73 20 | 66 72 6f 6d 20 55 54 43 |seconds |from UTC|
|00000490| 2e 0a 0a 58 20 69 73 20 | 28 48 49 47 48 20 2e 20 |...X is |(HIGH . |
|000004a0| 4c 4f 57 29 20 6f 72 20 | 28 48 49 47 48 20 4c 4f |LOW) or |(HIGH LO|
|000004b0| 57 20 2e 20 49 47 4e 4f | 52 45 44 29 20 77 68 65 |W . IGNO|RED) whe|
|000004c0| 72 65 20 48 49 47 48 20 | 61 6e 64 20 4c 4f 57 20 |re HIGH |and LOW |
|000004d0| 61 72 65 20 74 68 65 0a | 68 69 67 68 20 61 6e 64 |are the.|high and|
|000004e0| 20 6c 6f 77 20 31 36 20 | 62 69 74 73 2c 20 72 65 | low 16 |bits, re|
|000004f0| 73 70 65 63 74 69 76 65 | 6c 79 2c 20 6f 66 20 74 |spective|ly, of t|
|00000500| 68 65 20 6e 75 6d 62 65 | 72 20 6f 66 20 73 65 63 |he numbe|r of sec|
|00000510| 6f 6e 64 73 20 73 69 6e | 63 65 0a 31 39 37 30 2d |onds sin|ce.1970-|
|00000520| 30 31 2d 30 31 20 30 30 | 3a 30 30 3a 30 30 20 55 |01-01 00|:00:00 U|
|00000530| 54 43 2c 20 69 67 6e 6f | 72 69 6e 67 20 6c 65 61 |TC, igno|ring lea|
|00000540| 70 20 73 65 63 6f 6e 64 | 73 2e 0a 0a 52 65 74 75 |p second|s...Retu|
|00000550| 72 6e 73 20 74 68 65 20 | 70 61 69 72 20 28 41 42 |rns the |pair (AB|
|00000560| 53 2d 44 41 54 45 20 2e | 20 53 45 43 4f 4e 44 53 |S-DATE .| SECONDS|
|00000570| 29 20 77 68 65 72 65 20 | 53 45 43 4f 4e 44 53 20 |) where |SECONDS |
|00000580| 61 66 74 65 72 20 6c 6f | 63 61 6c 20 6d 69 64 6e |after lo|cal midn|
|00000590| 69 67 68 74 20 6f 6e 0a | 61 62 73 6f 6c 75 74 65 |ight on.|absolute|
|000005a0| 20 64 61 74 65 20 41 42 | 53 2d 44 41 54 45 20 69 | date AB|S-DATE i|
|000005b0| 73 20 74 68 65 20 65 71 | 75 69 76 61 6c 65 6e 74 |s the eq|uivalent|
|000005c0| 20 6d 6f 6d 65 6e 74 20 | 74 6f 20 58 2e 22 5d 29 | moment |to X."])|
|000005d0| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 63 61 6c 65 |.(defali|as 'cale|
|000005e0| 6e 64 61 72 2d 74 69 6d | 65 2d 66 72 6f 6d 2d 61 |ndar-tim|e-from-a|
|000005f0| 62 73 6f 6c 75 74 65 20 | 23 5b 28 61 62 73 2d 64 |bsolute |#[(abs-d|
|00000600| 61 74 65 20 73 29 20 22 | 08 09 5a 1a c3 5c 6e c4 |ate s) "|..Z..\n.|
|00000610| 5c 22 c5 5f c6 0e 07 c8 | 5c 22 5c 5c 1e 09 5c 6e |\"._....|\"\\..\n|
|00000620| c6 5c 6e c4 5c 22 c5 5f | c6 0e 09 c4 5c 22 5c 5c |.\n.\"._|....\"\\|
|00000630| 5c 5c c3 0e 09 c4 5c 22 | c8 5f c3 0e 07 c8 5c 22 |\\....\"|._....\"|
|00000640| 5c 5c 2a 42 87 22 20 5b | 61 62 73 2d 64 61 74 65 |\\*B." [|abs-date|
|00000650| 20 63 61 6c 65 6e 64 61 | 72 2d 73 79 73 74 65 6d | calenda|r-system|
|00000660| 2d 74 69 6d 65 2d 62 61 | 73 69 73 20 61 20 6d 6f |-time-ba|sis a mo|
|00000670| 64 20 35 31 32 20 31 36 | 33 20 66 6c 6f 6f 72 20 |d 512 16|3 floor |
|00000680| 73 20 31 32 38 20 75 5d | 20 35 20 22 5c 0a 54 69 |s 128 u]| 5 "\.Ti|
|00000690| 6d 65 20 6f 66 20 61 62 | 73 6f 6c 75 74 65 20 64 |me of ab|solute d|
|000006a0| 61 74 65 20 41 42 53 2d | 44 41 54 45 2c 20 53 20 |ate ABS-|DATE, S |
|000006b0| 73 65 63 6f 6e 64 73 20 | 61 66 74 65 72 20 6d 69 |seconds |after mi|
|000006c0| 64 6e 69 67 68 74 2e 0a | 0a 52 65 74 75 72 6e 73 |dnight..|.Returns|
|000006d0| 20 74 68 65 20 70 61 69 | 72 20 28 48 49 47 48 20 | the pai|r (HIGH |
|000006e0| 2e 20 4c 4f 57 29 20 77 | 68 65 72 65 20 48 49 47 |. LOW) w|here HIG|
|000006f0| 48 20 61 6e 64 20 4c 4f | 57 20 61 72 65 20 74 68 |H and LO|W are th|
|00000700| 65 20 68 69 67 68 20 61 | 6e 64 20 6c 6f 77 0a 31 |e high a|nd low.1|
|00000710| 36 20 62 69 74 73 2c 20 | 72 65 73 70 65 63 74 69 |6 bits, |respecti|
|00000720| 76 65 6c 79 2c 20 6f 66 | 20 74 68 65 20 6e 75 6d |vely, of| the num|
|00000730| 62 65 72 20 6f 66 20 73 | 65 63 6f 6e 64 73 20 31 |ber of s|econds 1|
|00000740| 39 37 30 2d 30 31 2d 30 | 31 20 30 30 3a 30 30 3a |970-01-0|1 00:00:|
|00000750| 30 30 20 55 54 43 2c 0a | 69 67 6e 6f 72 69 6e 67 |00 UTC,.|ignoring|
|00000760| 20 6c 65 61 70 20 73 65 | 63 6f 6e 64 73 2c 20 74 | leap se|conds, t|
|00000770| 68 61 74 20 69 73 20 74 | 68 65 20 65 71 75 69 76 |hat is t|he equiv|
|00000780| 61 6c 65 6e 74 20 6d 6f | 6d 65 6e 74 20 74 6f 20 |alent mo|ment to |
|00000790| 53 20 73 65 63 6f 6e 64 | 73 20 61 66 74 65 72 0a |S second|s after.|
|000007a0| 6d 69 64 6e 69 67 68 74 | 20 55 54 43 20 6f 6e 20 |midnight| UTC on |
|000007b0| 61 62 73 6f 6c 75 74 65 | 20 64 61 74 65 20 41 42 |absolute| date AB|
|000007c0| 53 2d 44 41 54 45 2e 22 | 5d 29 0a 28 64 65 66 61 |S-DATE."|]).(defa|
|000007d0| 6c 69 61 73 20 27 63 61 | 6c 65 6e 64 61 72 2d 6e |lias 'ca|lendar-n|
|000007e0| 65 78 74 2d 74 69 6d 65 | 2d 7a 6f 6e 65 2d 74 72 |ext-time|-zone-tr|
|000007f0| 61 6e 73 69 74 69 6f 6e | 20 23 5b 28 74 69 6d 65 |ansition| #[(time|
|00000800| 29 20 22 c0 19 c2 1b c4 | 0d 21 89 1e 06 40 1e 07 |) ".....|.!...@..|
|00000810| c8 1e 09 c8 1e 5c 6e 0e | 07 1e 0b cc 1e 0d 0e 07 |.....\n.|........|
|00000820| 0e 0b 3d 83 41 00 0d 40 | 0e 0d 40 0b 5f 5c 5c ce |..=.A..@|..@._\\.|
|00000830| 42 16 09 c4 0e 09 21 89 | 16 5c 6e 40 16 0b 0e 0d |B.....!.|.\n@....|
|00000840| 41 89 16 0d 84 1a 00 0e | 07 85 c7 00 0e 0b 85 c7 |A.......|........|
|00000850| 00 0e 07 0e 0b 3d 3f 85 | c7 00 0d 41 1e 0f 0d 40 |.....=?.|...A...@|
|00000860| 0e 0f a7 83 65 00 0e 0f | 82 68 00 0e 0f 40 42 1e |....e...|.h...@B.|
|00000870| 10 c8 1e 11 0e 10 41 0e | 09 41 5c 5c 1e 12 0e 10 |......A.|.A\\....|
|00000880| 40 0e 09 40 0e 12 09 a5 | 5c 5c 5c 5c 1e 13 d4 0e |@..@....|\\\\....|
|00000890| 13 d5 5c 22 1e 16 0e 13 | 0e 16 5a d7 a5 0e 16 09 |..\"....|..Z.....|
|000008a0| 5f 0e 12 09 a6 5c 5c d7 | a5 42 16 11 0e 10 0e 11 |_....\\.|.B......|
|000008b0| 2b 9a 84 c4 00 c4 0e 11 | 21 40 0e 0b 3d 83 bc 00 |+.......|!@..=...|
|000008c0| 0e 11 16 09 82 6e 00 0e | 11 89 16 10 82 70 00 0e |.....n..|.....p..|
|000008d0| 09 2b 2e 08 87 22 20 5b | 36 35 35 33 36 20 62 61 |.+..." [|65536 ba|
|000008e0| 73 65 20 31 32 30 20 71 | 75 61 72 74 65 72 2d 6d |se 120 q|uarter-m|
|000008f0| 75 6c 74 69 70 6c 65 20 | 63 75 72 72 65 6e 74 2d |ultiple |current-|
|00000900| 74 69 6d 65 2d 7a 6f 6e | 65 20 74 69 6d 65 20 74 |time-zon|e time t|
|00000910| 69 6d 65 2d 7a 6f 6e 65 | 20 74 69 6d 65 2d 75 74 |ime-zone| time-ut|
|00000920| 63 2d 64 69 66 66 20 6e | 69 6c 20 68 69 20 68 69 |c-diff n|il hi hi|
|00000930| 2d 7a 6f 6e 65 20 68 69 | 2d 75 74 63 2d 64 69 66 |-zone hi|-utc-dif|
|00000940| 66 20 28 32 20 31 20 33 | 29 20 71 75 61 72 74 65 |f (2 1 3|) quarte|
|00000950| 72 73 20 30 20 74 61 69 | 6c 20 6c 6f 20 70 72 6f |rs 0 tai|l lo pro|
|00000960| 62 65 20 6c 73 75 6d 20 | 68 73 75 6d 20 6c 6f 67 |be lsum |hsum log|
|00000970| 61 6e 64 20 31 20 68 73 | 75 6d 6f 64 64 20 32 5d |and 1 hs|umodd 2]|
|00000980| 20 35 20 22 5c 0a 52 65 | 74 75 72 6e 20 74 68 65 | 5 "\.Re|turn the|
|00000990| 20 74 69 6d 65 20 6f 66 | 20 74 68 65 20 6e 65 78 | time of| the nex|
|000009a0| 74 20 74 69 6d 65 20 7a | 6f 6e 65 20 74 72 61 6e |t time z|one tran|
|000009b0| 73 69 74 69 6f 6e 20 61 | 66 74 65 72 20 54 49 4d |sition a|fter TIM|
|000009c0| 45 2e 0a 42 6f 74 68 20 | 54 49 4d 45 20 61 6e 64 |E..Both |TIME and|
|000009d0| 20 74 68 65 20 72 65 73 | 75 6c 74 20 61 72 65 20 | the res|ult are |
|000009e0| 61 63 63 65 70 74 61 62 | 6c 65 20 61 72 67 75 6d |acceptab|le argum|
|000009f0| 65 6e 74 73 20 74 6f 20 | 63 75 72 72 65 6e 74 2d |ents to |current-|
|00000a00| 74 69 6d 65 2d 7a 6f 6e | 65 2e 0a 52 65 74 75 72 |time-zon|e..Retur|
|00000a10| 6e 20 6e 69 6c 20 69 66 | 20 6e 6f 20 73 75 63 68 |n nil if| no such|
|00000a20| 20 74 72 61 6e 73 69 74 | 69 6f 6e 20 63 61 6e 20 | transit|ion can |
|00000a30| 62 65 20 66 6f 75 6e 64 | 2e 22 5d 29 0a 28 64 65 |be found|."]).(de|
|00000a40| 66 61 6c 69 61 73 20 27 | 63 61 6c 65 6e 64 61 72 |falias '|calendar|
|00000a50| 2d 74 69 6d 65 2d 7a 6f | 6e 65 2d 64 61 79 6c 69 |-time-zo|ne-dayli|
|00000a60| 67 68 74 2d 72 75 6c 65 | 73 20 23 5b 28 61 62 73 |ght-rule|s #[(abs|
|00000a70| 2d 64 61 74 65 20 75 74 | 63 2d 64 69 66 66 29 20 |-date ut|c-diff) |
|00000a80| 22 c0 09 21 1a 09 c3 a6 | 1c 5c 6e 40 1d 5c 6e 41 |"..!....|.\n@.\nA|
|00000a90| 40 1e 06 5c 6e 41 41 40 | 1e 07 0d c8 55 83 3b 00 |@..\nAA@|....U.;.|
|00000aa0| 0e 07 c9 a6 ca 55 83 3b | 00 0e 07 cb a6 ca 55 83 |.....U.;|......U.|
|00000ab0| 37 00 0e 07 cc a6 ca 55 | 83 3b 00 cd 82 3f 00 ce |7......U|.;...?..|
|00000ac0| 0d 53 48 1e 0f d0 d1 0d | 0e 06 d2 46 43 0e 06 d3 |.SH.....|...FC...|
|00000ad0| 57 85 58 00 d4 d5 5c 66 | 0d d2 af 05 43 0e 06 0e |W.X...\f|....C...|
|00000ae0| 0f c3 5a 56 85 6a 00 d4 | d6 5c 66 0d d2 af 05 43 |..ZV.j..|.\f....C|
|00000af0| d7 1e 18 c8 0e 06 d9 5a | 5d 53 1e 1a 0e 06 0e 0f |.......Z|]S......|
|00000b00| d3 5a 5e 0e 1a 54 89 16 | 1a 59 83 98 00 d4 d5 5c |.Z^..T..|.Y.....\|
|00000b10| 66 0d d2 0e 1a af 06 0e | 18 42 16 18 82 76 00 29 |f.......|.B...v.)|
|00000b20| 0e 18 29 24 1e 1b d6 0e | 1c 5a 1e 1d 0e 07 54 1e |..)$....|.Z....T.|
|00000b30| 12 0e 1b d7 1e 1e 1e 1f | 0e 1f 40 89 1e 20 40 d4 |........|..@.. @.|
|00000b40| 3d 83 c7 00 e1 e2 0e 20 | 41 42 21 82 4e 01 0e 20 |=...... |AB!.N.. |
|00000b50| 40 c0 3d 83 d8 00 e1 0e | 20 41 40 21 82 4e 01 e1 |@.=.....| A@!.N..|
|00000b60| 0e 20 21 89 1e 23 41 41 | 40 53 1e 24 0e 23 40 1e |. !..#AA|@S.$.#@.|
|00000b70| 25 0e 23 41 40 1e 26 0e | 23 41 41 40 1e 12 0e 26 |%.#A@.&.|#AA@...&|
|00000b80| 0e 25 53 e7 5f 5c 5c 1e | 28 0e 25 c8 56 83 35 01 |.%S._\\.|(.%.V.5.|
|00000b90| 0e 28 0e 25 c9 5f e9 5c | 5c ea a5 5a 16 28 0e 12 |.(.%._.\|\..Z.(..|
|00000ba0| c9 a6 ca 55 83 35 01 0e | 12 cb a6 ca 55 83 30 01 |...U.5..|....U.0.|
|00000bb0| 0e 12 cc a6 ca 55 83 35 | 01 0e 28 54 16 28 0e 28 |.....U.5|..(T.(.(|
|00000bc0| 2c 0e 24 eb 5f 0e 24 c9 | a5 0e 24 cb a5 5b 0e 24 |,.$._.$.|..$..[.$|
|00000bd0| cc a5 5c 5c 5c 5c 5c 5c | 5c 5c 2a 1a ec ed 5c 6e |..\\\\\\|\\*...\n|
|00000be0| 0e 1d 5c 22 21 ec ed 5c | 6e 54 0e 1d 5c 22 21 9a |..\"!..\|nT..\"!.|
|00000bf0| 84 69 01 0e 20 0e 1e 42 | 16 1e 0e 1f 41 89 16 1f |.i.. ..B|....A...|
|00000c00| 2a 84 b1 00 0e 1e 83 7e | 01 0e 1e 9f 82 82 01 0e |*......~|........|
|00000c10| 1b 40 43 16 1b 0e 12 54 | 16 12 0e 1b 41 2a 84 aa |.@C....T|....A*..|
|00000c20| 00 0e 1b 40 2e 09 87 22 | 20 5b 63 61 6c 65 6e 64 |...@..."| [calend|
|00000c30| 61 72 2d 67 72 65 67 6f | 72 69 61 6e 2d 66 72 6f |ar-grego|rian-fro|
|00000c40| 6d 2d 61 62 73 6f 6c 75 | 74 65 20 61 62 73 2d 64 |m-absolu|te abs-d|
|00000c50| 61 74 65 20 64 61 74 65 | 20 37 20 77 65 65 6b 64 |ate date| 7 weekd|
|00000c60| 61 79 20 6d 20 64 20 79 | 20 32 20 34 20 30 20 31 |ay m d y| 2 4 0 1|
|00000c70| 30 30 20 34 30 30 20 32 | 39 20 5b 33 31 20 32 38 |00 400 2|9 [31 28|
|00000c80| 20 33 31 20 33 30 20 33 | 31 20 33 30 20 33 31 20 | 31 30 3|1 30 31 |
|00000c90| 33 31 20 33 30 20 33 31 | 20 33 30 20 33 31 5d 20 |31 30 31| 30 31] |
|00000ca0| 6c 61 73 74 20 61 70 70 | 65 6e 64 20 6c 69 73 74 |last app|end list|
|00000cb0| 20 79 65 61 72 20 38 20 | 63 61 6c 65 6e 64 61 72 | year 8 |calendar|
|00000cc0| 2d 6e 74 68 2d 6e 61 6d | 65 64 2d 64 61 79 20 31 |-nth-nam|ed-day 1|
|00000cd0| 20 2d 31 20 6e 69 6c 20 | 6c 20 36 20 6a 20 63 61 | -1 nil |l 6 j ca|
|00000ce0| 6e 64 69 64 61 74 65 2d | 72 75 6c 65 73 20 75 74 |ndidate-|rules ut|
|00000cf0| 63 2d 64 69 66 66 20 70 | 72 65 76 64 61 79 2d 73 |c-diff p|revday-s|
|00000d00| 65 63 20 6e 65 77 2d 72 | 75 6c 65 73 20 72 75 6c |ec new-r|ules rul|
|00000d10| 65 73 20 72 75 6c 65 20 | 65 76 61 6c 20 63 61 6c |es rule |eval cal|
|00000d20| 65 6e 64 61 72 2d 6e 74 | 68 2d 6e 61 6d 65 64 2d |endar-nt|h-named-|
|00000d30| 61 62 73 64 61 79 20 67 | 20 70 72 69 6f 72 2d 79 |absday g| prior-y|
|00000d40| 65 61 72 73 20 6d 6f 6e | 74 68 20 64 61 79 20 33 |ears mon|th day 3|
|00000d50| 31 20 64 61 79 2d 6f 66 | 2d 79 65 61 72 20 32 33 |1 day-of|-year 23|
|00000d60| 20 31 30 20 33 36 35 20 | 63 75 72 72 65 6e 74 2d | 10 365 |current-|
|00000d70| 74 69 6d 65 2d 7a 6f 6e | 65 20 63 61 6c 65 6e 64 |time-zon|e calend|
|00000d80| 61 72 2d 74 69 6d 65 2d | 66 72 6f 6d 2d 61 62 73 |ar-time-|from-abs|
|00000d90| 6f 6c 75 74 65 5d 20 31 | 31 20 22 5c 0a 52 65 74 |olute] 1|1 "\.Ret|
|00000da0| 75 72 6e 20 64 61 79 6c | 69 67 68 74 20 74 72 61 |urn dayl|ight tra|
|00000db0| 6e 73 69 74 69 6f 6e 20 | 72 75 6c 65 20 66 6f 72 |nsition |rule for|
|00000dc0| 20 41 42 53 2d 44 41 54 | 45 2c 20 55 54 43 2d 44 | ABS-DAT|E, UTC-D|
|00000dd0| 49 46 46 20 73 65 63 20 | 6f 66 66 73 65 74 20 66 |IFF sec |offset f|
|00000de0| 72 6f 6d 20 55 54 43 2e | 0a 41 42 53 2d 44 49 46 |rom UTC.|.ABS-DIF|
|00000df0| 46 20 6d 75 73 74 20 73 | 70 65 63 69 66 79 20 61 |F must s|pecify a|
|00000e00| 20 64 61 79 20 74 68 61 | 74 20 63 6f 6e 74 61 69 | day tha|t contai|
|00000e10| 6e 73 20 61 20 64 61 79 | 6c 69 67 68 74 20 73 61 |ns a day|light sa|
|00000e20| 76 69 6e 67 73 20 74 72 | 61 6e 73 69 74 69 6f 6e |vings tr|ansition|
|00000e30| 2e 0a 54 68 65 20 72 65 | 73 75 6c 74 20 68 61 73 |..The re|sult has|
|00000e40| 20 74 68 65 20 70 72 6f | 70 65 72 20 66 6f 72 6d | the pro|per form|
|00000e50| 20 66 6f 72 20 63 61 6c | 65 6e 64 61 72 2d 64 61 | for cal|endar-da|
|00000e60| 79 6c 69 67 68 74 2d 73 | 61 76 69 6e 67 73 2d 73 |ylight-s|avings-s|
|00000e70| 74 61 72 74 73 27 2e 22 | 5d 29 0a 28 64 65 66 61 |tarts'."|]).(defa|
|00000e80| 6c 69 61 73 20 27 63 61 | 6c 65 6e 64 61 72 2d 63 |lias 'ca|lendar-c|
|00000e90| 75 72 72 65 6e 74 2d 74 | 69 6d 65 2d 7a 6f 6e 65 |urrent-t|ime-zone|
|00000ea0| 20 23 5b 6e 69 6c 20 22 | 08 86 c2 00 c1 20 1a c3 | #[nil "|..... ..|
|00000eb0| 5c 6e 21 89 1c 40 1d 5c | 66 41 40 1e 06 0d 84 25 |\n!..@.\|fA@....%|
|00000ec0| 00 c7 89 0e 06 89 c7 89 | 89 89 af 08 82 bf 00 c8 |........|........|
|00000ed0| 5c 6e 21 89 1e 09 85 32 | 00 c8 0e 09 21 89 1e 5c |\n!....2|....!..\|
|00000ee0| 6e 84 48 00 0d cb a5 cc | 0e 06 89 c7 89 cc 89 af |n.H.....|........|
|00000ef0| 08 82 be 00 c3 0e 09 21 | 89 1e 0d 40 1e 0e 0e 0d |.......!|...@....|
|00000f00| 41 40 1e 0f d0 0e 09 0d | 5c 22 1e 11 d0 0e 5c 6e |A@......|\"....\n|
|00000f10| 0e 0e 5c 22 1e 12 d3 0e | 11 40 0d 5c 22 1e 14 d3 |..\"....|.@.\"...|
|00000f20| 0e 12 40 0e 0e 5c 22 1e | 15 0e 11 41 cb a5 1e 16 |..@..\".|...A....|
|00000f30| 0e 12 41 cb a5 1e 17 0d | 0e 0e 5e cb a5 d8 0d 0e |..A.....|..^.....|
|00000f40| 0e 5a 21 cb a5 0d 0e 0e | 57 83 ac 00 0e 06 0e 0f |.Z!.....|W.......|
|00000f50| 0e 14 0e 15 0e 16 0e 17 | af 06 82 ba 00 0e 0f 0e |........|........|
|00000f60| 06 0e 15 0e 14 0e 17 0e | 16 af 06 2e 09 42 42 2a |........|.....BB*|
|00000f70| 2c 89 10 87 22 20 5b 63 | 61 6c 65 6e 64 61 72 2d |,..." [c|alendar-|
|00000f80| 63 75 72 72 65 6e 74 2d | 74 69 6d 65 2d 7a 6f 6e |current-|time-zon|
|00000f90| 65 2d 63 61 63 68 65 20 | 63 75 72 72 65 6e 74 2d |e-cache |current-|
|00000fa0| 74 69 6d 65 20 74 30 20 | 63 75 72 72 65 6e 74 2d |time t0 |current-|
|00000fb0| 74 69 6d 65 2d 7a 6f 6e | 65 20 74 30 2d 7a 6f 6e |time-zon|e t0-zon|
|00000fc0| 65 20 74 30 2d 75 74 63 | 2d 64 69 66 66 20 74 30 |e t0-utc|-diff t0|
|00000fd0| 2d 6e 61 6d 65 20 6e 69 | 6c 20 63 61 6c 65 6e 64 |-name ni|l calend|
|00000fe0| 61 72 2d 6e 65 78 74 2d | 74 69 6d 65 2d 7a 6f 6e |ar-next-|time-zon|
|00000ff0| 65 2d 74 72 61 6e 73 69 | 74 69 6f 6e 20 74 31 20 |e-transi|tion t1 |
|00001000| 74 32 20 36 30 20 30 20 | 74 31 2d 7a 6f 6e 65 20 |t2 60 0 |t1-zone |
|00001010| 74 31 2d 75 74 63 2d 64 | 69 66 66 20 74 31 2d 6e |t1-utc-d|iff t1-n|
|00001020| 61 6d 65 20 63 61 6c 65 | 6e 64 61 72 2d 61 62 73 |ame cale|ndar-abs|
|00001030| 6f 6c 75 74 65 2d 66 72 | 6f 6d 2d 74 69 6d 65 20 |olute-fr|om-time |
|00001040| 74 31 2d 64 61 74 65 2d | 73 65 63 20 74 32 2d 64 |t1-date-|sec t2-d|
|00001050| 61 74 65 2d 73 65 63 20 | 63 61 6c 65 6e 64 61 72 |ate-sec |calendar|
|00001060| 2d 74 69 6d 65 2d 7a 6f | 6e 65 2d 64 61 79 6c 69 |-time-zo|ne-dayli|
|00001070| 67 68 74 2d 72 75 6c 65 | 73 20 74 31 2d 72 75 6c |ght-rule|s t1-rul|
|00001080| 65 73 20 74 32 2d 72 75 | 6c 65 73 20 74 31 2d 74 |es t2-ru|les t1-t|
|00001090| 69 6d 65 20 74 32 2d 74 | 69 6d 65 20 61 62 73 5d |ime t2-t|ime abs]|
|000010a0| 20 39 20 22 5c 0a 52 65 | 74 75 72 6e 20 55 54 43 | 9 "\.Re|turn UTC|
|000010b0| 20 64 69 66 66 65 72 65 | 6e 63 65 2c 20 64 73 74 | differe|nce, dst|
|000010c0| 20 6f 66 66 73 65 74 2c | 20 6e 61 6d 65 73 20 61 | offset,| names a|
|000010d0| 6e 64 20 72 75 6c 65 73 | 20 66 6f 72 20 63 75 72 |nd rules| for cur|
|000010e0| 72 65 6e 74 20 74 69 6d | 65 20 7a 6f 6e 65 2e 0a |rent tim|e zone..|
|000010f0| 0a 52 65 74 75 72 6e 73 | 20 28 55 54 43 2d 44 49 |.Returns| (UTC-DI|
|00001100| 46 46 20 44 53 54 2d 4f | 46 46 53 45 54 20 53 54 |FF DST-O|FFSET ST|
|00001110| 44 2d 5a 4f 4e 45 20 44 | 53 54 2d 5a 4f 4e 45 20 |D-ZONE D|ST-ZONE |
|00001120| 44 53 54 2d 53 54 41 52 | 54 53 20 44 53 54 2d 45 |DST-STAR|TS DST-E|
|00001130| 4e 44 53 0a 44 53 54 2d | 53 54 41 52 54 53 2d 54 |NDS.DST-|STARTS-T|
|00001140| 49 4d 45 20 44 53 54 2d | 45 4e 44 53 2d 54 49 4d |IME DST-|ENDS-TIM|
|00001150| 45 29 2c 20 62 61 73 65 | 64 20 6f 6e 20 61 20 68 |E), base|d on a h|
|00001160| 65 75 72 69 73 74 69 63 | 20 70 72 6f 62 69 6e 67 |euristic| probing|
|00001170| 20 6f 66 20 77 68 61 74 | 20 74 68 65 0a 73 79 73 | of what| the.sys|
|00001180| 74 65 6d 20 6b 6e 6f 77 | 73 3a 0a 0a 55 54 43 2d |tem know|s:..UTC-|
|00001190| 44 49 46 46 20 69 73 20 | 61 6e 20 69 6e 74 65 67 |DIFF is |an integ|
|000011a0| 65 72 20 73 70 65 63 69 | 66 79 69 6e 67 20 74 68 |er speci|fying th|
|000011b0| 65 20 6e 75 6d 62 65 72 | 20 6f 66 20 6d 69 6e 75 |e number| of minu|
|000011c0| 74 65 73 20 64 69 66 66 | 65 72 65 6e 63 65 20 62 |tes diff|erence b|
|000011d0| 65 74 77 65 65 6e 0a 20 | 20 20 20 73 74 61 6e 64 |etween. |   stand|
|000011e0| 61 72 64 20 74 69 6d 65 | 20 69 6e 20 74 68 65 20 |ard time| in the |
|000011f0| 63 75 72 72 65 6e 74 20 | 74 69 6d 65 20 7a 6f 6e |current |time zon|
|00001200| 65 20 61 6e 64 20 43 6f | 6f 72 64 69 6e 61 74 65 |e and Co|ordinate|
|00001210| 64 20 55 6e 69 76 65 72 | 73 61 6c 20 54 69 6d 65 |d Univer|sal Time|
|00001220| 0a 20 20 20 20 28 47 72 | 65 65 6e 77 69 63 68 20 |.    (Gr|eenwich |
|00001230| 4d 65 61 6e 20 54 69 6d | 65 29 2e 20 20 41 20 6e |Mean Tim|e).  A n|
|00001240| 65 67 61 74 69 76 65 20 | 76 61 6c 75 65 20 6d 65 |egative |value me|
|00001250| 61 6e 73 20 77 65 73 74 | 20 6f 66 20 47 72 65 65 |ans west| of Gree|
|00001260| 6e 77 69 63 68 2e 0a 44 | 53 54 2d 4f 46 46 53 45 |nwich..D|ST-OFFSE|
|00001270| 54 20 69 73 20 61 6e 20 | 69 6e 74 65 67 65 72 20 |T is an |integer |
|00001280| 67 69 76 69 6e 67 20 74 | 68 65 20 64 61 79 6c 69 |giving t|he dayli|
|00001290| 67 68 74 20 73 61 76 69 | 6e 67 73 20 74 69 6d 65 |ght savi|ngs time|
|000012a0| 20 6f 66 66 73 65 74 20 | 69 6e 20 6d 69 6e 75 74 | offset |in minut|
|000012b0| 65 73 2e 0a 53 54 44 2d | 5a 4f 4e 45 20 69 73 20 |es..STD-|ZONE is |
|000012c0| 61 20 73 74 72 69 6e 67 | 20 67 69 76 69 6e 67 20 |a string| giving |
|000012d0| 74 68 65 20 6e 61 6d 65 | 20 6f 66 20 74 68 65 20 |the name| of the |
|000012e0| 74 69 6d 65 20 7a 6f 6e | 65 20 77 68 65 6e 20 6e |time zon|e when n|
|000012f0| 6f 20 73 65 61 73 6f 6e | 61 6c 20 74 69 6d 65 0a |o season|al time.|
|00001300| 20 20 20 20 61 64 6a 75 | 73 74 6d 65 6e 74 20 69 |    adju|stment i|
|00001310| 73 20 69 6e 20 65 66 66 | 65 63 74 2e 0a 44 53 54 |s in eff|ect..DST|
|00001320| 2d 5a 4f 4e 45 20 69 73 | 20 61 20 73 74 72 69 6e |-ZONE is| a strin|
|00001330| 67 20 67 69 76 69 6e 67 | 20 74 68 65 20 6e 61 6d |g giving| the nam|
|00001340| 65 20 6f 66 20 74 68 65 | 20 74 69 6d 65 20 7a 6f |e of the| time zo|
|00001350| 6e 65 20 77 68 65 6e 20 | 74 68 65 72 65 20 69 73 |ne when |there is|
|00001360| 20 61 20 73 65 61 73 6f | 6e 61 6c 0a 20 20 20 20 | a seaso|nal.    |
|00001370| 74 69 6d 65 20 61 64 6a | 75 73 74 6d 65 6e 74 20 |time adj|ustment |
|00001380| 69 6e 20 65 66 66 65 63 | 74 2e 0a 44 53 54 2d 53 |in effec|t..DST-S|
|00001390| 54 41 52 54 53 20 61 6e | 64 20 44 53 54 2d 45 4e |TARTS an|d DST-EN|
|000013a0| 44 53 20 61 72 65 20 73 | 65 78 70 73 20 69 6e 20 |DS are s|exps in |
|000013b0| 74 68 65 20 76 61 72 69 | 61 62 6c 65 20 60 79 65 |the vari|able `ye|
|000013c0| 61 72 27 20 67 69 76 69 | 6e 67 20 74 68 65 20 64 |ar' givi|ng the d|
|000013d0| 61 79 6c 69 67 68 74 0a | 20 20 20 20 73 61 76 69 |aylight.|    savi|
|000013e0| 6e 67 73 20 74 69 6d 65 | 20 73 74 61 72 74 20 61 |ngs time| start a|
|000013f0| 6e 64 20 65 6e 64 20 72 | 75 6c 65 73 2c 20 69 6e |nd end r|ules, in|
|00001400| 20 74 68 65 20 66 6f 72 | 6d 20 65 78 70 65 63 74 | the for|m expect|
|00001410| 65 64 20 62 79 0a 20 20 | 20 20 60 63 61 6c 65 6e |ed by.  |  `calen|
|00001420| 64 61 72 2d 64 61 79 6c | 69 67 68 74 2d 73 61 76 |dar-dayl|ight-sav|
|00001430| 69 6e 67 73 2d 73 74 61 | 72 74 73 27 2e 0a 44 53 |ings-sta|rts'..DS|
|00001440| 54 2d 53 54 41 52 54 53 | 2d 54 49 4d 45 20 61 6e |T-STARTS|-TIME an|
|00001450| 64 20 44 53 54 2d 45 4e | 44 53 2d 54 49 4d 45 20 |d DST-EN|DS-TIME |
|00001460| 61 72 65 20 69 6e 74 65 | 67 65 72 73 20 67 69 76 |are inte|gers giv|
|00001470| 69 6e 67 20 74 68 65 20 | 6e 75 6d 62 65 72 20 6f |ing the |number o|
|00001480| 66 20 6d 69 6e 75 74 65 | 73 0a 20 20 20 20 61 66 |f minute|s.    af|
|00001490| 74 65 72 20 6d 69 64 6e | 69 67 68 74 20 74 68 61 |ter midn|ight tha|
|000014a0| 74 20 64 61 79 6c 69 67 | 68 74 20 73 61 76 69 6e |t daylig|ht savin|
|000014b0| 67 73 20 74 69 6d 65 20 | 73 74 61 72 74 73 20 61 |gs time |starts a|
|000014c0| 6e 64 20 65 6e 64 73 2e | 0a 0a 49 66 20 74 68 65 |nd ends.|..If the|
|000014d0| 20 6c 6f 63 61 6c 20 61 | 72 65 61 20 64 6f 65 73 | local a|rea does|
|000014e0| 20 6e 6f 74 20 75 73 65 | 20 61 20 73 65 61 73 6f | not use| a seaso|
|000014f0| 6e 61 6c 20 74 69 6d 65 | 20 61 64 6a 75 73 74 6d |nal time| adjustm|
|00001500| 65 6e 74 2c 20 53 54 44 | 2d 5a 4f 4e 45 20 61 6e |ent, STD|-ZONE an|
|00001510| 64 0a 44 53 54 2d 5a 4f | 4e 45 20 61 72 65 20 65 |d.DST-ZO|NE are e|
|00001520| 71 75 61 6c 2c 20 61 6e | 64 20 61 6c 6c 20 74 68 |qual, an|d all th|
|00001530| 65 20 44 53 54 2d 2a 20 | 69 6e 74 65 67 65 72 20 |e DST-* |integer |
|00001540| 76 61 72 69 61 62 6c 65 | 73 20 61 72 65 20 30 2e |variable|s are 0.|
|00001550| 0a 0a 53 6f 6d 65 20 6f | 70 65 72 61 74 69 6e 67 |..Some o|perating|
|00001560| 20 73 79 73 74 65 6d 73 | 20 63 61 6e 6e 6f 74 20 | systems| cannot |
|00001570| 70 72 6f 76 69 64 65 20 | 61 6c 6c 20 74 68 69 73 |provide |all this|
|00001580| 20 69 6e 66 6f 72 6d 61 | 74 69 6f 6e 20 74 6f 20 | informa|tion to |
|00001590| 45 6d 61 63 73 3b 20 69 | 6e 20 74 68 69 73 0a 63 |Emacs; i|n this.c|
|000015a0| 61 73 65 2c 20 60 63 61 | 6c 65 6e 64 61 72 2d 63 |ase, `ca|lendar-c|
|000015b0| 75 72 72 65 6e 74 2d 74 | 69 6d 65 2d 7a 6f 6e 65 |urrent-t|ime-zone|
|000015c0| 27 20 72 65 74 75 72 6e | 73 20 61 20 6c 69 73 74 |' return|s a list|
|000015d0| 20 63 6f 6e 74 61 69 6e | 69 6e 67 20 6e 69 6c 20 | contain|ing nil |
|000015e0| 66 6f 72 20 74 68 65 20 | 64 61 74 61 0a 69 74 20 |for the |data.it |
|000015f0| 63 61 6e 27 74 20 66 69 | 6e 64 2e 22 5d 29 0a 28 |can't fi|nd."]).(|
|00001600| 63 61 6c 65 6e 64 61 72 | 2d 63 75 72 72 65 6e 74 |calendar|-current|
|00001610| 2d 74 69 6d 65 2d 7a 6f | 6e 65 29 0a 28 64 65 66 |-time-zo|ne).(def|
|00001620| 76 61 72 20 63 61 6c 65 | 6e 64 61 72 2d 74 69 6d |var cale|ndar-tim|
|00001630| 65 2d 7a 6f 6e 65 20 28 | 62 79 74 65 2d 63 6f 64 |e-zone (|byte-cod|
|00001640| 65 20 22 08 40 86 06 00 | c1 87 22 20 5b 63 61 6c |e ".@...|.." [cal|
|00001650| 65 6e 64 61 72 2d 63 75 | 72 72 65 6e 74 2d 74 69 |endar-cu|rrent-ti|
|00001660| 6d 65 2d 7a 6f 6e 65 2d | 63 61 63 68 65 20 2d 33 |me-zone-|cache -3|
|00001670| 30 30 5d 20 31 29 20 22 | 5c 0a 2a 4e 75 6d 62 65 |00] 1) "|\.*Numbe|
|00001680| 72 20 6f 66 20 6d 69 6e | 75 74 65 73 20 64 69 66 |r of min|utes dif|
|00001690| 66 65 72 65 6e 63 65 20 | 62 65 74 77 65 65 6e 20 |ference |between |
|000016a0| 6c 6f 63 61 6c 20 73 74 | 61 6e 64 61 72 64 20 74 |local st|andard t|
|000016b0| 69 6d 65 20 61 74 0a 60 | 63 61 6c 65 6e 64 61 72 |ime at.`|calendar|
|000016c0| 2d 6c 6f 63 61 74 69 6f | 6e 2d 6e 61 6d 65 27 20 |-locatio|n-name' |
|000016d0| 61 6e 64 20 43 6f 6f 72 | 64 69 6e 61 74 65 64 20 |and Coor|dinated |
|000016e0| 55 6e 69 76 65 72 73 61 | 6c 20 28 47 72 65 65 6e |Universa|l (Green|
|000016f0| 77 69 63 68 29 20 54 69 | 6d 65 2e 20 20 46 6f 72 |wich) Ti|me.  For|
|00001700| 0a 65 78 61 6d 70 6c 65 | 2c 20 2d 33 30 30 20 66 |.example|, -300 f|
|00001710| 6f 72 20 4e 65 77 20 59 | 6f 72 6b 20 43 69 74 79 |or New Y|ork City|
|00001720| 2c 20 2d 34 38 30 20 66 | 6f 72 20 4c 6f 73 20 41 |, -480 f|or Los A|
|00001730| 6e 67 65 6c 65 73 2e 22 | 29 0a 28 64 65 66 76 61 |ngeles."|).(defva|
|00001740| 72 20 63 61 6c 65 6e 64 | 61 72 2d 64 61 79 6c 69 |r calend|ar-dayli|
|00001750| 67 68 74 2d 74 69 6d 65 | 2d 6f 66 66 73 65 74 20 |ght-time|-offset |
|00001760| 28 62 79 74 65 2d 63 6f | 64 65 20 22 08 41 40 86 |(byte-co|de ".A@.|
|00001770| 07 00 c1 87 22 20 5b 63 | 61 6c 65 6e 64 61 72 2d |...." [c|alendar-|
|00001780| 63 75 72 72 65 6e 74 2d | 74 69 6d 65 2d 7a 6f 6e |current-|time-zon|
|00001790| 65 2d 63 61 63 68 65 20 | 36 30 5d 20 31 29 20 22 |e-cache |60] 1) "|
|000017a0| 5c 0a 2a 4e 75 6d 62 65 | 72 20 6f 66 20 6d 69 6e |\.*Numbe|r of min|
|000017b0| 75 74 65 73 20 64 69 66 | 66 65 72 65 6e 63 65 20 |utes dif|ference |
|000017c0| 62 65 74 77 65 65 6e 20 | 64 61 79 6c 69 67 68 74 |between |daylight|
|000017d0| 20 73 61 76 69 6e 67 73 | 20 61 6e 64 20 73 74 61 | savings| and sta|
|000017e0| 6e 64 61 72 64 20 74 69 | 6d 65 2e 0a 20 20 0a 49 |ndard ti|me..  .I|
|000017f0| 66 20 74 68 65 20 6c 6f | 63 61 6c 65 20 6e 65 76 |f the lo|cale nev|
|00001800| 65 72 20 75 73 65 73 20 | 64 61 79 6c 69 67 68 74 |er uses |daylight|
|00001810| 20 73 61 76 69 6e 67 73 | 20 74 69 6d 65 2c 20 73 | savings| time, s|
|00001820| 65 74 20 74 68 69 73 20 | 74 6f 20 30 2e 22 29 0a |et this |to 0.").|
|00001830| 28 64 65 66 76 61 72 20 | 63 61 6c 65 6e 64 61 72 |(defvar |calendar|
|00001840| 2d 73 74 61 6e 64 61 72 | 64 2d 74 69 6d 65 2d 7a |-standar|d-time-z|
|00001850| 6f 6e 65 2d 6e 61 6d 65 | 20 28 62 79 74 65 2d 63 |one-name| (byte-c|
|00001860| 6f 64 65 20 22 08 41 41 | 40 86 08 00 c1 87 22 20 |ode ".AA|@....." |
|00001870| 5b 63 61 6c 65 6e 64 61 | 72 2d 63 75 72 72 65 6e |[calenda|r-curren|
|00001880| 74 2d 74 69 6d 65 2d 7a | 6f 6e 65 2d 63 61 63 68 |t-time-z|one-cach|
|00001890| 65 20 22 45 53 54 22 5d | 20 31 29 20 22 5c 0a 2a |e "EST"]| 1) "\.*|
|000018a0| 41 62 62 72 65 76 69 61 | 74 65 64 20 6e 61 6d 65 |Abbrevia|ted name|
|000018b0| 20 6f 66 20 73 74 61 6e | 64 61 72 64 20 74 69 6d | of stan|dard tim|
|000018c0| 65 20 7a 6f 6e 65 20 61 | 74 20 60 63 61 6c 65 6e |e zone a|t `calen|
|000018d0| 64 61 72 2d 6c 6f 63 61 | 74 69 6f 6e 2d 6e 61 6d |dar-loca|tion-nam|
|000018e0| 65 27 2e 0a 46 6f 72 20 | 65 78 61 6d 70 6c 65 2c |e'..For |example,|
|000018f0| 20 5c 22 45 53 54 5c 22 | 20 69 6e 20 4e 65 77 20 | \"EST\"| in New |
|00001900| 59 6f 72 6b 20 43 69 74 | 79 2c 20 5c 22 50 53 54 |York Cit|y, \"PST|
|00001910| 5c 22 20 66 6f 72 20 4c | 6f 73 20 41 6e 67 65 6c |\" for L|os Angel|
|00001920| 65 73 2e 22 29 0a 28 64 | 65 66 76 61 72 20 63 61 |es.").(d|efvar ca|
|00001930| 6c 65 6e 64 61 72 2d 64 | 61 79 6c 69 67 68 74 2d |lendar-d|aylight-|
|00001940| 74 69 6d 65 2d 7a 6f 6e | 65 2d 6e 61 6d 65 20 28 |time-zon|e-name (|
|00001950| 62 79 74 65 2d 63 6f 64 | 65 20 22 c0 09 9b 40 86 |byte-cod|e "...@.|
|00001960| 08 00 c2 87 22 20 5b 33 | 20 63 61 6c 65 6e 64 61 |...." [3| calenda|
|00001970| 72 2d 63 75 72 72 65 6e | 74 2d 74 69 6d 65 2d 7a |r-curren|t-time-z|
|00001980| 6f 6e 65 2d 63 61 63 68 | 65 20 22 45 44 54 22 5d |one-cach|e "EDT"]|
|00001990| 20 32 29 20 22 5c 0a 2a | 41 62 62 72 65 76 69 61 | 2) "\.*|Abbrevia|
|000019a0| 74 65 64 20 6e 61 6d 65 | 20 6f 66 20 64 61 79 6c |ted name| of dayl|
|000019b0| 69 67 68 74 2d 73 61 76 | 69 6e 67 73 20 74 69 6d |ight-sav|ings tim|
|000019c0| 65 20 7a 6f 6e 65 20 61 | 74 20 60 63 61 6c 65 6e |e zone a|t `calen|
|000019d0| 64 61 72 2d 6c 6f 63 61 | 74 69 6f 6e 2d 6e 61 6d |dar-loca|tion-nam|
|000019e0| 65 27 2e 0a 46 6f 72 20 | 65 78 61 6d 70 6c 65 2c |e'..For |example,|
|000019f0| 20 5c 22 45 44 54 5c 22 | 20 69 6e 20 4e 65 77 20 | \"EDT\"| in New |
|00001a00| 59 6f 72 6b 20 43 69 74 | 79 2c 20 5c 22 50 44 54 |York Cit|y, \"PDT|
|00001a10| 5c 22 20 66 6f 72 20 4c | 6f 73 20 41 6e 67 65 6c |\" for L|os Angel|
|00001a20| 65 73 2e 22 29 0a 28 70 | 75 74 20 28 71 75 6f 74 |es.").(p|ut (quot|
|00001a30| 65 20 63 61 6c 65 6e 64 | 61 72 2d 64 61 79 6c 69 |e calend|ar-dayli|
|00001a40| 67 68 74 2d 73 61 76 69 | 6e 67 73 2d 73 74 61 72 |ght-savi|ngs-star|
|00001a50| 74 73 29 20 28 71 75 6f | 74 65 20 72 69 73 6b 79 |ts) (quo|te risky|
|00001a60| 2d 6c 6f 63 61 6c 2d 76 | 61 72 69 61 62 6c 65 29 |-local-v|ariable)|
|00001a70| 20 74 29 0a 28 64 65 66 | 76 61 72 20 63 61 6c 65 | t).(def|var cale|
|00001a80| 6e 64 61 72 2d 64 61 79 | 6c 69 67 68 74 2d 73 61 |ndar-day|light-sa|
|00001a90| 76 69 6e 67 73 2d 73 74 | 61 72 74 73 20 28 62 79 |vings-st|arts (by|
|00001aa0| 74 65 2d 63 6f 64 65 20 | 22 c0 09 9b 40 86 0f 00 |te-code |"...@...|
|00001ab0| 5c 6e c3 55 3f 85 0f 00 | c4 87 22 20 5b 34 20 63 |\n.U?...|.." [4 c|
|00001ac0| 61 6c 65 6e 64 61 72 2d | 63 75 72 72 65 6e 74 2d |alendar-|current-|
|00001ad0| 74 69 6d 65 2d 7a 6f 6e | 65 2d 63 61 63 68 65 20 |time-zon|e-cache |
|00001ae0| 63 61 6c 65 6e 64 61 72 | 2d 64 61 79 6c 69 67 68 |calendar|-dayligh|
|00001af0| 74 2d 74 69 6d 65 2d 6f | 66 66 73 65 74 20 30 20 |t-time-o|ffset 0 |
|00001b00| 28 63 61 6c 65 6e 64 61 | 72 2d 6e 74 68 2d 6e 61 |(calenda|r-nth-na|
|00001b10| 6d 65 64 2d 64 61 79 20 | 31 20 30 20 34 20 79 65 |med-day |1 0 4 ye|
|00001b20| 61 72 29 5d 20 32 29 20 | 22 5c 0a 2a 53 65 78 70 |ar)] 2) |"\.*Sexp|
|00001b30| 20 67 69 76 69 6e 67 20 | 74 68 65 20 64 61 74 65 | giving |the date|
|00001b40| 20 6f 6e 20 77 68 69 63 | 68 20 64 61 79 6c 69 67 | on whic|h daylig|
|00001b50| 68 74 20 73 61 76 69 6e | 67 73 20 74 69 6d 65 20 |ht savin|gs time |
|00001b60| 73 74 61 72 74 73 2e 0a | 54 68 69 73 20 69 73 20 |starts..|This is |
|00001b70| 61 6e 20 65 78 70 72 65 | 73 73 69 6f 6e 20 69 6e |an expre|ssion in|
|00001b80| 20 74 68 65 20 76 61 72 | 69 61 62 6c 65 20 60 79 | the var|iable `y|
|00001b90| 65 61 72 27 20 77 68 6f | 73 65 20 76 61 6c 75 65 |ear' who|se value|
|00001ba0| 20 67 69 76 65 73 20 74 | 68 65 20 47 72 65 67 6f | gives t|he Grego|
|00001bb0| 72 69 61 6e 0a 64 61 74 | 65 20 69 6e 20 74 68 65 |rian.dat|e in the|
|00001bc0| 20 66 6f 72 6d 20 28 6d | 6f 6e 74 68 20 64 61 79 | form (m|onth day|
|00001bd0| 20 79 65 61 72 29 20 6f | 6e 20 77 68 69 63 68 20 | year) o|n which |
|00001be0| 64 61 79 6c 69 67 68 74 | 20 73 61 76 69 6e 67 73 |daylight| savings|
|00001bf0| 20 74 69 6d 65 20 73 74 | 61 72 74 73 2e 20 20 49 | time st|arts.  I|
|00001c00| 74 20 69 73 0a 75 73 65 | 64 20 74 6f 20 64 65 74 |t is.use|d to det|
|00001c10| 65 72 6d 69 6e 65 20 74 | 68 65 20 73 74 61 72 74 |ermine t|he start|
|00001c20| 69 6e 67 20 64 61 74 65 | 20 6f 66 20 64 61 79 6c |ing date| of dayl|
|00001c30| 69 67 68 74 20 73 61 76 | 69 6e 67 73 20 74 69 6d |ight sav|ings tim|
|00001c40| 65 20 66 6f 72 20 74 68 | 65 20 68 6f 6c 69 64 61 |e for th|e holida|
|00001c50| 79 0a 6c 69 73 74 20 61 | 6e 64 20 66 6f 72 20 63 |y.list a|nd for c|
|00001c60| 6f 72 72 65 63 74 69 6e | 67 20 74 69 6d 65 73 20 |orrectin|g times |
|00001c70| 6f 66 20 64 61 79 20 69 | 6e 20 74 68 65 20 73 6f |of day i|n the so|
|00001c80| 6c 61 72 20 61 6e 64 20 | 6c 75 6e 61 72 20 63 61 |lar and |lunar ca|
|00001c90| 6c 63 75 6c 61 74 69 6f | 6e 73 2e 0a 0a 46 6f 72 |lculatio|ns...For|
|00001ca0| 20 65 78 61 6d 70 6c 65 | 2c 20 69 66 20 64 61 79 | example|, if day|
|00001cb0| 6c 69 67 68 74 20 73 61 | 76 69 6e 67 73 20 74 69 |light sa|vings ti|
|00001cc0| 6d 65 20 69 73 20 6d 61 | 6e 64 61 74 65 64 20 74 |me is ma|ndated t|
|00001cd0| 6f 20 73 74 61 72 74 20 | 6f 6e 20 4f 63 74 6f 62 |o start |on Octob|
|00001ce0| 65 72 20 31 2c 0a 79 6f | 75 20 77 6f 75 6c 64 20 |er 1,.yo|u would |
|00001cf0| 73 65 74 20 60 63 61 6c | 65 6e 64 61 72 2d 64 61 |set `cal|endar-da|
|00001d00| 79 6c 69 67 68 74 2d 73 | 61 76 69 6e 67 73 2d 73 |ylight-s|avings-s|
|00001d10| 74 61 72 74 73 27 20 74 | 6f 0a 0a 20 20 20 20 20 |tarts' t|o..     |
|00001d20| 20 27 28 31 30 20 31 20 | 79 65 61 72 29 0a 0a 49 | '(10 1 |year)..I|
|00001d30| 66 20 69 74 20 73 74 61 | 72 74 73 20 6f 6e 20 74 |f it sta|rts on t|
|00001d40| 68 65 20 66 69 72 73 74 | 20 53 75 6e 64 61 79 20 |he first| Sunday |
|00001d50| 69 6e 20 41 70 72 69 6c | 2c 20 79 6f 75 20 77 6f |in April|, you wo|
|00001d60| 75 6c 64 20 73 65 74 20 | 69 74 20 74 6f 0a 0a 20 |uld set |it to.. |
|00001d70| 20 20 20 20 20 27 28 63 | 61 6c 65 6e 64 61 72 2d |     '(c|alendar-|
|00001d80| 6e 74 68 2d 6e 61 6d 65 | 64 2d 64 61 79 20 31 20 |nth-name|d-day 1 |
|00001d90| 30 20 34 20 79 65 61 72 | 29 0a 0a 49 66 20 74 68 |0 4 year|)..If th|
|00001da0| 65 20 6c 6f 63 61 6c 65 | 20 6e 65 76 65 72 20 75 |e locale| never u|
|00001db0| 73 65 73 20 64 61 79 6c | 69 67 68 74 20 73 61 76 |ses dayl|ight sav|
|00001dc0| 69 6e 67 73 20 74 69 6d | 65 2c 20 73 65 74 20 74 |ings tim|e, set t|
|00001dd0| 68 69 73 20 74 6f 20 6e | 69 6c 2e 22 29 0a 28 70 |his to n|il.").(p|
|00001de0| 75 74 20 28 71 75 6f 74 | 65 20 63 61 6c 65 6e 64 |ut (quot|e calend|
|00001df0| 61 72 2d 64 61 79 6c 69 | 67 68 74 2d 73 61 76 69 |ar-dayli|ght-savi|
|00001e00| 6e 67 73 2d 65 6e 64 73 | 29 20 28 71 75 6f 74 65 |ngs-ends|) (quote|
|00001e10| 20 72 69 73 6b 79 2d 6c | 6f 63 61 6c 2d 76 61 72 | risky-l|ocal-var|
|00001e20| 69 61 62 6c 65 29 20 74 | 29 0a 28 64 65 66 76 61 |iable) t|).(defva|
|00001e30| 72 20 63 61 6c 65 6e 64 | 61 72 2d 64 61 79 6c 69 |r calend|ar-dayli|
|00001e40| 67 68 74 2d 73 61 76 69 | 6e 67 73 2d 65 6e 64 73 |ght-savi|ngs-ends|
|00001e50| 20 28 62 79 74 65 2d 63 | 6f 64 65 20 22 c0 09 9b | (byte-c|ode "...|
|00001e60| 40 86 0f 00 5c 6e c3 55 | 3f 85 0f 00 c4 87 22 20 |@...\n.U|?....." |
|00001e70| 5b 35 20 63 61 6c 65 6e | 64 61 72 2d 63 75 72 72 |[5 calen|dar-curr|
|00001e80| 65 6e 74 2d 74 69 6d 65 | 2d 7a 6f 6e 65 2d 63 61 |ent-time|-zone-ca|
|00001e90| 63 68 65 20 63 61 6c 65 | 6e 64 61 72 2d 64 61 79 |che cale|ndar-day|
|00001ea0| 6c 69 67 68 74 2d 74 69 | 6d 65 2d 6f 66 66 73 65 |light-ti|me-offse|
|00001eb0| 74 20 30 20 28 63 61 6c | 65 6e 64 61 72 2d 6e 74 |t 0 (cal|endar-nt|
|00001ec0| 68 2d 6e 61 6d 65 64 2d | 64 61 79 20 2d 31 20 30 |h-named-|day -1 0|
|00001ed0| 20 31 30 20 79 65 61 72 | 29 5d 20 32 29 20 22 5c | 10 year|)] 2) "\|
|00001ee0| 0a 2a 53 65 78 70 20 67 | 69 76 69 6e 67 20 74 68 |.*Sexp g|iving th|
|00001ef0| 65 20 64 61 74 65 20 6f | 6e 20 77 68 69 63 68 20 |e date o|n which |
|00001f00| 64 61 79 6c 69 67 68 74 | 20 73 61 76 69 6e 67 73 |daylight| savings|
|00001f10| 20 74 69 6d 65 20 65 6e | 64 73 2e 0a 54 68 69 73 | time en|ds..This|
|00001f20| 20 69 73 20 61 6e 20 65 | 78 70 72 65 73 73 69 6f | is an e|xpressio|
|00001f30| 6e 20 69 6e 20 74 68 65 | 20 76 61 72 69 61 62 6c |n in the| variabl|
|00001f40| 65 20 60 79 65 61 72 27 | 20 77 68 6f 73 65 20 76 |e `year'| whose v|
|00001f50| 61 6c 75 65 20 67 69 76 | 65 73 20 74 68 65 20 47 |alue giv|es the G|
|00001f60| 72 65 67 6f 72 69 61 6e | 0a 64 61 74 65 20 69 6e |regorian|.date in|
|00001f70| 20 74 68 65 20 66 6f 72 | 6d 20 28 6d 6f 6e 74 68 | the for|m (month|
|00001f80| 20 64 61 79 20 79 65 61 | 72 29 20 6f 6e 20 77 68 | day yea|r) on wh|
|00001f90| 69 63 68 20 64 61 79 6c | 69 67 68 74 20 73 61 76 |ich dayl|ight sav|
|00001fa0| 69 6e 67 73 20 74 69 6d | 65 20 65 6e 64 73 2e 20 |ings tim|e ends. |
|00001fb0| 20 49 74 20 69 73 0a 75 | 73 65 64 20 74 6f 20 64 | It is.u|sed to d|
|00001fc0| 65 74 65 72 6d 69 6e 65 | 20 74 68 65 20 73 74 61 |etermine| the sta|
|00001fd0| 72 74 69 6e 67 20 64 61 | 74 65 20 6f 66 20 64 61 |rting da|te of da|
|00001fe0| 79 6c 69 67 68 74 20 73 | 61 76 69 6e 67 73 20 74 |ylight s|avings t|
|00001ff0| 69 6d 65 20 66 6f 72 20 | 74 68 65 20 68 6f 6c 69 |ime for |the holi|
|00002000| 64 61 79 0a 6c 69 73 74 | 20 61 6e 64 20 66 6f 72 |day.list| and for|
|00002010| 20 63 6f 72 72 65 63 74 | 69 6e 67 20 74 69 6d 65 | correct|ing time|
|00002020| 73 20 6f 66 20 64 61 79 | 20 69 6e 20 74 68 65 20 |s of day| in the |
|00002030| 73 6f 6c 61 72 20 61 6e | 64 20 6c 75 6e 61 72 20 |solar an|d lunar |
|00002040| 63 61 6c 63 75 6c 61 74 | 69 6f 6e 73 2e 0a 0a 46 |calculat|ions...F|
|00002050| 6f 72 20 65 78 61 6d 70 | 6c 65 2c 20 69 66 20 64 |or examp|le, if d|
|00002060| 61 79 6c 69 67 68 74 20 | 73 61 76 69 6e 67 73 20 |aylight |savings |
|00002070| 74 69 6d 65 20 65 6e 64 | 73 20 6f 6e 20 74 68 65 |time end|s on the|
|00002080| 20 6c 61 73 74 20 53 75 | 6e 64 61 79 20 69 6e 20 | last Su|nday in |
|00002090| 4f 63 74 6f 62 65 72 3a | 0a 0a 20 20 20 20 20 20 |October:|..      |
|000020a0| 27 28 63 61 6c 65 6e 64 | 61 72 2d 6e 74 68 2d 6e |'(calend|ar-nth-n|
|000020b0| 61 6d 65 64 2d 64 61 79 | 20 2d 31 20 30 20 31 30 |amed-day| -1 0 10|
|000020c0| 20 79 65 61 72 29 0a 0a | 49 66 20 74 68 65 20 6c | year)..|If the l|
|000020d0| 6f 63 61 6c 65 20 6e 65 | 76 65 72 20 75 73 65 73 |ocale ne|ver uses|
|000020e0| 20 64 61 79 6c 69 67 68 | 74 20 73 61 76 69 6e 67 | dayligh|t saving|
|000020f0| 73 20 74 69 6d 65 2c 20 | 73 65 74 20 74 68 69 73 |s time, |set this|
|00002100| 20 74 6f 20 6e 69 6c 2e | 22 29 0a 28 64 65 66 76 | to nil.|").(defv|
|00002110| 61 72 20 63 61 6c 65 6e | 64 61 72 2d 64 61 79 6c |ar calen|dar-dayl|
|00002120| 69 67 68 74 2d 73 61 76 | 69 6e 67 73 2d 73 74 61 |ight-sav|ings-sta|
|00002130| 72 74 73 2d 74 69 6d 65 | 20 28 62 79 74 65 2d 63 |rts-time| (byte-c|
|00002140| 6f 64 65 20 22 c0 09 9b | 40 86 08 00 c2 87 22 20 |ode "...|@....." |
|00002150| 5b 36 20 63 61 6c 65 6e | 64 61 72 2d 63 75 72 72 |[6 calen|dar-curr|
|00002160| 65 6e 74 2d 74 69 6d 65 | 2d 7a 6f 6e 65 2d 63 61 |ent-time|-zone-ca|
|00002170| 63 68 65 20 31 32 30 5d | 20 32 29 20 22 5c 0a 2a |che 120]| 2) "\.*|
|00002180| 4e 75 6d 62 65 72 20 6f | 66 20 6d 69 6e 75 74 65 |Number o|f minute|
|00002190| 73 20 61 66 74 65 72 20 | 6d 69 64 6e 69 67 68 74 |s after |midnight|
|000021a0| 20 74 68 61 74 20 64 61 | 79 6c 69 67 68 74 20 73 | that da|ylight s|
|000021b0| 61 76 69 6e 67 73 20 74 | 69 6d 65 20 73 74 61 72 |avings t|ime star|
|000021c0| 74 73 2e 22 29 0a 28 64 | 65 66 76 61 72 20 63 61 |ts.").(d|efvar ca|
|000021d0| 6c 65 6e 64 61 72 2d 64 | 61 79 6c 69 67 68 74 2d |lendar-d|aylight-|
|000021e0| 73 61 76 69 6e 67 73 2d | 65 6e 64 73 2d 74 69 6d |savings-|ends-tim|
|000021f0| 65 20 28 62 79 74 65 2d | 63 6f 64 65 20 22 c0 09 |e (byte-|code "..|
|00002200| 9b 40 86 08 00 5c 6e 87 | 22 20 5b 37 20 63 61 6c |.@...\n.|" [7 cal|
|00002210| 65 6e 64 61 72 2d 63 75 | 72 72 65 6e 74 2d 74 69 |endar-cu|rrent-ti|
|00002220| 6d 65 2d 7a 6f 6e 65 2d | 63 61 63 68 65 20 63 61 |me-zone-|cache ca|
|00002230| 6c 65 6e 64 61 72 2d 64 | 61 79 6c 69 67 68 74 2d |lendar-d|aylight-|
|00002240| 73 61 76 69 6e 67 73 2d | 73 74 61 72 74 73 2d 74 |savings-|starts-t|
|00002250| 69 6d 65 5d 20 32 29 20 | 22 5c 0a 2a 4e 75 6d 62 |ime] 2) |"\.*Numb|
|00002260| 65 72 20 6f 66 20 6d 69 | 6e 75 74 65 73 20 61 66 |er of mi|nutes af|
|00002270| 74 65 72 20 6d 69 64 6e | 69 67 68 74 20 74 68 61 |ter midn|ight tha|
|00002280| 74 20 64 61 79 6c 69 67 | 68 74 20 73 61 76 69 6e |t daylig|ht savin|
|00002290| 67 73 20 74 69 6d 65 20 | 65 6e 64 73 2e 22 29 0a |gs time |ends.").|
|000022a0| 28 70 72 6f 76 69 64 65 | 20 28 71 75 6f 74 65 20 |(provide| (quote |
|000022b0| 63 61 6c 2d 64 73 74 29 | 29 0a                   |cal-dst)|).      |
+--------+-------------------------+-------------------------+--------+--------+