Warning: file_get_contents(https://raw.githubusercontent.com/Den1xxx/Filemanager/master/languages/ru.json): failed to open stream: HTTP request failed! HTTP/1.1 404 Not Found
in /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php on line 88
Warning: Cannot modify header information - headers already sent by (output started at /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php:88) in /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php on line 215
Warning: Cannot modify header information - headers already sent by (output started at /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php:88) in /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php on line 216
Warning: Cannot modify header information - headers already sent by (output started at /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php:88) in /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php on line 217
Warning: Cannot modify header information - headers already sent by (output started at /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php:88) in /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php on line 218
Warning: Cannot modify header information - headers already sent by (output started at /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php:88) in /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php on line 219
Warning: Cannot modify header information - headers already sent by (output started at /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php:88) in /home/afelisqd/cppseducation.sc.tz/admin/images/photos/17587263121019776732_admin-dbb.php on line 220
GOOF----LE-8-2.0 ] 4 hƭ ] g guile g define-module* g srfi g srfi-19 g filenameS
f srfi/srfi-19.scm g importsS g srfi-6
g srfi-8 g srfi-9 g ice-9 g i18n g exportsS g
time-duration g time-monotonic g time-process g time-tai g time-thread g time-utc !g current-date "g current-julian-day #g current-modified-julian-day $g time-resolution %g make-time &g time? 'g time-type (g time-nanosecond )g time-second *g set-time-type! +g set-time-nanosecond! ,g set-time-second! -g copy-time .g time<=? /g time=? 2g time>? 3g time-difference 4g time-difference! 5g add-duration 6g
add-duration! 7g subtract-duration 8g subtract-duration! 9g make-date :g date? ;g date-nanosecond g date-hour ?g date-day @g
date-month Ag date-year Bg date-zone-offset Cg
date-year-day Dg
date-week-day Eg date-week-number Fg date->julian-day Gg date->modified-julian-day Hg date->time-monotonic Ig date->time-tai Jg date->time-utc Kg julian-day->date Lg julian-day->time-monotonic Mg julian-day->time-tai Ng julian-day->time-utc Og modified-julian-day->date Pg #modified-julian-day->time-monotonic Qg modified-julian-day->time-tai Rg modified-julian-day->time-utc Sg time-monotonic->date Tg time-monotonic->julian-day Ug #time-monotonic->modified-julian-day Vg time-monotonic->time-tai Wg time-monotonic->time-tai! Xg time-monotonic->time-utc Yg time-monotonic->time-utc! Zg time-tai->date [g time-tai->julian-day \g time-tai->modified-julian-day ]g time-tai->time-monotonic ^g time-tai->time-monotonic! _g time-tai->time-utc `g time-tai->time-utc! ag time-utc->date bg time-utc->julian-day cg time-utc->modified-julian-day dg time-utc->time-monotonic eg time-utc->time-monotonic! fg time-utc->time-tai gg time-utc->time-tai! hg date->string ig string->date j !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghi O kg replacementsS lg current-time ml ng autoloadsS og rdelim po qg read-line rq spr tg set-current-module ut vt wg cond-expand-provide xg current-module y zf ~a ~b ~d ~H:~M:~S~z ~Y {g locale-date-time-format |f ~m/~d/~y }g locale-short-date-format ~f ~H:~M:~S g locale-time-format f ~Y-~m-~dT~H:~M:~S~z g iso-8601-date-time-format g nano g sid g sihd e 4881175/2 g tai-epoch-in-jd g throw g
misc-error f TIME-ERROR type ~A: ~S f TIME-ERROR type ~A g
time-error g open-input-file g eof-object? g read g open-input-string g
string-append f ( f ) g inexact->exact g read-tai-utc-data U- $ O # I\ " C ! 6 3H 0$ .\ ,2) *P ' % ! % b1 ʀ Φ r ?
+ H gS
X g
g leap-second-table g read-leap-second-table g leap-second-delta g time g !%make-time-unnormalized-procedure g make-syntax-transformer g make-time-unnormalized g macro g $sc-dispatch g _ g any g
syntax-object g lambda g m-46961e50d3-30 g top g ribcage g t-46961e50d3-2d g t-46961e50d3-2e g t-46961e50d3-2f f l-46961e50d3-35 f l-46961e50d3-36 f l-46961e50d3-37 g x f l-46961e50d3-32 g shift g proc-name g args f l-1e8ba8b5a-60 f l-1e8ba8b5a-61 g key g value g name g formals g body f l-1e8ba8b5a-53 f l-1e8ba8b5a-54 f l-1e8ba8b5a-55 f l-1e8ba8b5a-56 f l-1e8ba8b5a-57 g make-procedure-name f l-1e8ba8b5a-43 f l-1e8ba8b5a-42
g hygiene g type g
nanosecond g second g make-struct g m-46961e50d3-2b
g t-1e8ba8b5a-133 g t-1e8ba8b5a-132 g t-1e8ba8b5a-131
g m-1e8ba8b5a-134 f l-1e8ba8b5a-138 f l-1e8ba8b5a-139 f l-1e8ba8b5a-13a
g ctor-args f l-1e8ba8b5a-120 g ctor g field f l-1e8ba8b5a-11c f l-1e8ba8b5a-11d ! "g form #g type-name $g constructor-spec %g field-names &"#$% ' (f l-1e8ba8b5a-111 )f l-1e8ba8b5a-112 *f l-1e8ba8b5a-113 +f l-1e8ba8b5a-114 ,()*+ -&', .g
record-layout /g functional-setters 0g setters 1g copier 2g getters 3g constructor 4g getter-identifiers 5g field-identifiers 6./012345 7 8f l-1e8ba8b5a-e9 9f l-1e8ba8b5a-e7 :f l-1e8ba8b5a-e5 ;f l-1e8ba8b5a-e3 f l-1e8ba8b5a-dd ?f l-1e8ba8b5a-db @89:;<=>? A67@ Bf l-1e8ba8b5a-da CB DC E !-AD FE G H
E IFGH JI Kg each-any LK Mg syntax-violation NM OM Pf Wrong number of arguments Qg identifier? RQ SQ T UT VM WM Xf -source expression failed to match any pattern Yg record-type-vtable ZY [Y \g pwpwpw ]g default-record-printer ^] _] ` ag set-struct-vtable-name! ba ca dg vtable-offset-user ed fd gg %time?-procedure h ig m-46961e50d3-41 ji kg t-46961e50d3-40 lk mj nf l-46961e50d3-46 on plmo qf l-46961e50d3-43 rq smr tjps
ut vg obj wg t-1e8ba8b5a-224 xg t-1e8ba8b5a-21e yg t-1e8ba8b5a-21f zg t-1e8ba8b5a-220 {g t-1e8ba8b5a-223 |g t-1e8ba8b5a-222 }g t-1e8ba8b5a-221 ~wxyz{|} g m-1e8ba8b5a-225 f l-1e8ba8b5a-229 f l-1e8ba8b5a-22a f l-1e8ba8b5a-22b f l-1e8ba8b5a-22c f l-1e8ba8b5a-22d f l-1e8ba8b5a-22e f l-1e8ba8b5a-22f ~ g copier-id f l-1e8ba8b5a-21c g ctor-name f l-1e8ba8b5a-214 % f l-1e8ba8b5a-212 g layout f l-1e8ba8b5a-210 g
immutable? f l-1e8ba8b5a-20e g field-count f l-1e8ba8b5a-20c g
getter-ids f l-1e8ba8b5a-209 g field-ids f l-1e8ba8b5a-206 g predicate-name g
field-spec "#$ f l-1e8ba8b5a-1f9 f l-1e8ba8b5a-1fa f l-1e8ba8b5a-1fb f l-1e8ba8b5a-1fc f l-1e8ba8b5a-1fd f l-1e8ba8b5a-1fe psAD v g and g struct? g eq? g
struct-vtable ps u s g g throw-bad-struct g %time-type-procedure g free-id g
%%on-error g m-46961e50d3-4d f l-46961e50d3-4f g %%type g t-1e8ba8b5a-14b g t-1e8ba8b5a-14c g t-1e8ba8b5a-14d g t-1e8ba8b5a-14e g t-1e8ba8b5a-14f g t-1e8ba8b5a-150 g t-1e8ba8b5a-151 g m-1e8ba8b5a-152 f l-1e8ba8b5a-156 f l-1e8ba8b5a-157 f l-1e8ba8b5a-158 f l-1e8ba8b5a-159 f l-1e8ba8b5a-15a f l-1e8ba8b5a-15b f l-1e8ba8b5a-15c g getter g index f l-1e8ba8b5a-149 f l-1e8ba8b5a-14a # f l-1e8ba8b5a-144 f l-1e8ba8b5a-145 f l-1e8ba8b5a-146 AD g ck
g err g s
f l-46961e50d3-52 f l-46961e50d3-53
g quote g %%index f l-46961e50d3-57 f l-46961e50d3-58 !
"!
# " $" %! &
% '$& (' )g %%copier *) +* ,+ -f l-46961e50d3-5c .f l-46961e50d3-5d /-. 0
/ 10
2 1 31 4g %%time-set-fields 50 645 736 87 9g t-46961e50d3-4c :9 ;f l-46961e50d3-61 <; =:< >=
?> @ =AD A @ BA Cg if DC@ E@ F@ GFA H= IH JEGI Kg
struct-ref LK@ M= N
M OLAN P@ Q@ R'H SQR TPAS UDJOT V?BU W XW Yg %time-nanosecond-procedure Zg m-46961e50d3-68 [Z \[ ]f l-46961e50d3-6a ^] _\^ `[_ a` ba cb d _AD ed fe gcf h[[ if l-46961e50d3-6d jf l-46961e50d3-6e kij l hk m[l_
n m om pl_ qp roq sr td ut vcu wf l-46961e50d3-72 xf l-46961e50d3-73 ywx z hy {[z_
| { }{ ~z_ ~ } )d c f l-46961e50d3-77 f l-46961e50d3-78 h [_
_ 4 g t-46961e50d3-67 f l-46961e50d3-7c \ [_
_AD C _ K _ ( _ Y g %time-second-procedure g m-46961e50d3-83 f l-46961e50d3-85 AD f l-46961e50d3-88 f l-46961e50d3-89
f l-46961e50d3-8d f l-46961e50d3-8e
) f l-46961e50d3-92 f l-46961e50d3-93
4 g t-46961e50d3-82 f l-46961e50d3-97
AD C K ) g each g %%set-fields
g dummy g check? g expr
g m-46961e50d3-9e f l-46961e50d3-a3 f l-46961e50d3-a4 f l-46961e50d3-a5 f l-46961e50d3-a6 f l-46961e50d3-a7
f l-46961e50d3-a0 g t-1e8ba8b5a-16a g t-1e8ba8b5a-16c g t-1e8ba8b5a-16b g m-1e8ba8b5a-16d ! "!!! #f l-1e8ba8b5a-171 $f l-1e8ba8b5a-172 %f l-1e8ba8b5a-173 &#$% ' "& (f l-1e8ba8b5a-167 )f l-1e8ba8b5a-168 *f l-1e8ba8b5a-169 +()* ,+ - ',AD
. - / 0/ 1'/ 2(/ 3)/ 4123 5g map 65 75 8g list 9g %set-time-type!-procedure : ;g m-46961e50d3-b2 <; =g t-46961e50d3-b0 >g t-46961e50d3-b1 ?=> @<< Af l-46961e50d3-b7 Bf l-46961e50d3-b8 CAB D?@C E< Ff l-46961e50d3-b4 GF HEG I<DH
JI Kg t-1e8ba8b5a-18c Lg t-1e8ba8b5a-18d MKL Ng m-1e8ba8b5a-18e ON POO Qf l-1e8ba8b5a-192 Rf l-1e8ba8b5a-193 SQR TMPS Ug setter VU Wf l-1e8ba8b5a-186 Xf l-1e8ba8b5a-187 Yf l-1e8ba8b5a-188 ZWXY [VZ \ ]f l-1e8ba8b5a-17d ^f l-1e8ba8b5a-17e _]^ `\_ ag field-specs b#a cf l-1e8ba8b5a-179 df l-1e8ba8b5a-17a ecd fbe g DHT[`fAD h g ig val jig khj lCg mg ng onh pDH qp rmoq sg struct-set! tsg uDH v
u wthvj xg yg z*p {yz |xh{ }lrw| ~Jk} H 9 g %set-time-nanosecond!-procedure g m-46961e50d3-c2 g t-46961e50d3-c0 g t-46961e50d3-c1 f l-46961e50d3-c7 f l-46961e50d3-c8 f l-46961e50d3-c4
T[`fAD i C s + g %set-time-second!-procedure g m-46961e50d3-d2 g t-46961e50d3-d0 g t-46961e50d3-d1 f l-46961e50d3-d7 f l-46961e50d3-d8 f l-46961e50d3-d4
T[`fAD i C s , g integer? g truncate g
split-real g abs g time-normalize! g mktime g
set-tm:sec g
set-tm:min g set-tm:hour g set-tm:mday g
set-tm:mon g set-tm:year g set-tm:isdst g
set-tm:gmtoff g date->broken-down-time g gettimeofday g current-time-utc g current-time-tai g current-time-monotonic g unsupported-clock-type g current-time-thread g internal-time-units-per-second g ns-per-guile-tick g get-internal-run-time g current-time-process g invalid-clock-type g not-duration g incompatible-time-types g priv:time-tai->time-utc! g priv:time-utc->time-tai! g date g %make-date-procedure g m-46961e50d3-343 g t-46961e50d3-33b g t-46961e50d3-33c g t-46961e50d3-33d g t-46961e50d3-33e g t-46961e50d3-33f g t-46961e50d3-340 g t-46961e50d3-341 g t-46961e50d3-342 f l-46961e50d3-348 f l-46961e50d3-349 f l-46961e50d3-34a f l-46961e50d3-34b f l-46961e50d3-34c f l-46961e50d3-34d f l-46961e50d3-34e f l-46961e50d3-34f
f l-46961e50d3-345
g minute g hour g day g month g year g zone-offset g m-46961e50d3-339 ! "!
!-AD #" $ %
" &#$% ' & (
)( *g pwpwpwpwpwpwpwpw + ,g %date?-procedure -g m-46961e50d3-35e .- /g t-46961e50d3-35d 0/ 1. 2f l-46961e50d3-363 32 4013 5f l-46961e50d3-360 65 716 8.47
98 :!47AD ;v: <; =: >: ?>; @: A: BA; C47 DC E@BD F=?E G9<F H7 I,H Jg %date-nanosecond-procedure Kg m-46961e50d3-36a LK ML Nf l-46961e50d3-36c ON PMO QLP RQ SR TS U!PAD VU WV XTW YLL Zf l-46961e50d3-36f [f l-46961e50d3-370 \Z[ ] Y\ ^L]P
_ ^ `^ a]P ba c`b dc eU fe gTf hf l-46961e50d3-374 if l-46961e50d3-375 jhi k Yj lLkP
m l nl okP p
o qnp rq s)U ts uTt vf l-46961e50d3-379 wf l-46961e50d3-37a xvw y Yx zLyP
{ z |z }g %%date-set-fields ~yP }~ | g t-46961e50d3-369 f l-46961e50d3-37e M LP
!PAD C P K P
; P J g %date-second-procedure g m-46961e50d3-385 f l-46961e50d3-387 !AD f l-46961e50d3-38a f l-46961e50d3-38b
f l-46961e50d3-38f f l-46961e50d3-390
) f l-46961e50d3-394 f l-46961e50d3-395
} g t-46961e50d3-384 f l-46961e50d3-399
!AD C K < g %date-minute-procedure g m-46961e50d3-3a0 f l-46961e50d3-3a2 !AD f l-46961e50d3-3a5 f l-46961e50d3-3a6
f l-46961e50d3-3aa f l-46961e50d3-3ab
) !f l-46961e50d3-3af "f l-46961e50d3-3b0 #!" $ # %$
& % '% ($ )}( *') +* ,g t-46961e50d3-39f -, .f l-46961e50d3-3b4 /. 0-/ 10
21 3!0AD 4 3 54 6C3 73 83 984 :0 ;: <79; =K3 >0 ? > @=4? A3 B3 C=: DBC EA4D F6<@E G25F H IH Jg %date-hour-procedure Kg m-46961e50d3-3bb LK ML Nf l-46961e50d3-3bd ON PMO QLP RQ SR TS U!PAD VU WV XTW YLL Zf l-46961e50d3-3c0 [f l-46961e50d3-3c1 \Z[ ] Y\ ^L]P
_ ^ `^ a]P ba c`b dc eU fe gTf hf l-46961e50d3-3c5 if l-46961e50d3-3c6 jhi k Yj lLkP
m l nl okP p o qnp rq s)U ts uTt vf l-46961e50d3-3ca wf l-46961e50d3-3cb xvw y Yx zLyP
{ z |z }yP ~}} |~ g t-46961e50d3-3ba f l-46961e50d3-3cf M LP
!PAD C P K P > P J g %date-day-procedure g m-46961e50d3-3d6 f l-46961e50d3-3d8 !AD f l-46961e50d3-3db f l-46961e50d3-3dc
f l-46961e50d3-3e0 f l-46961e50d3-3e1
) f l-46961e50d3-3e5 f l-46961e50d3-3e6
} g t-46961e50d3-3d5 f l-46961e50d3-3ea
!AD C K ? g %date-month-procedure g m-46961e50d3-3f1 f l-46961e50d3-3f3 !AD f l-46961e50d3-3f6 f l-46961e50d3-3f7
f l-46961e50d3-3fb f l-46961e50d3-3fc
) f l-46961e50d3-400 !f l-46961e50d3-401 " ! # " $#
% $ &$ '# (}' )&( *) +g t-46961e50d3-3f0 ,+ -f l-46961e50d3-405 .- /,. 0/
10 2!/AD 3 2 43 5C2 62 72 873 9/ :9 ;68: <K2 =/ > = ?<3> @2 A2 B@9 CAB D@3C E5;?D F14E G HG Ig %date-year-procedure Jg m-46961e50d3-40c KJ LK Mf l-46961e50d3-40e NM OLN PKO QP RQ SR T!OAD UT VU WSV XKK Yf l-46961e50d3-411 Zf l-46961e50d3-412 [YZ \ X[ ]K\O
^ ] _] `\O a` b_a cb dT ed fSe gf l-46961e50d3-416 hf l-46961e50d3-417 igh j Xi kKjO
l k mk njO o n pmo qp r)T sr tSs uf l-46961e50d3-41b vf l-46961e50d3-41c wuv x Xw yKxO
z y {y |xO }}| ~{} ~ g t-46961e50d3-40b f l-46961e50d3-420 L KO
!OAD C O K O A O I g %date-zone-offset-procedure g m-46961e50d3-427 f l-46961e50d3-429 !AD f l-46961e50d3-42c f l-46961e50d3-42d
f l-46961e50d3-431 f l-46961e50d3-432
) f l-46961e50d3-436 f l-46961e50d3-437
} g t-46961e50d3-426 f l-46961e50d3-43b
!AD C K B g m-46961e50d3-442 !!!! f l-46961e50d3-447 f l-46961e50d3-448 f l-46961e50d3-449 f l-46961e50d3-44a f l-46961e50d3-44b
f l-46961e50d3-444 ! ',AD
; < = > ?
@ A B
g set-date-nanosecond! g %set-date-nanosecond!-procedure g m-46961e50d3-456 g t-46961e50d3-454 g t-46961e50d3-455 f l-46961e50d3-45b f l-46961e50d3-45c f l-46961e50d3-458
! T[`fAD ! "i #!" $C % & '&! ( )( *%') +s , -
, .+!-" / 0 1( 201 3/!2 4$*.3 5 #4 6 76 8g set-date-second! 9g %set-date-second!-procedure :g m-46961e50d3-466 ;: <= ?;; @f l-46961e50d3-46b Af l-46961e50d3-46c B@A C>?B D; Ef l-46961e50d3-468 FE GDF H;CG
IH J!CGT[`fAD K J LiJ MKL NCJ OJ PJ QPK RCG SR TOQS UsJ VCG W V XUKWL YJ ZJ [8R \Z[ ]YK\ ^NTX] _IM^ `G a9` bg set-date-minute! cg %set-date-minute!-procedure dg m-46961e50d3-476 ed fg t-46961e50d3-474 gg t-46961e50d3-475 hfg iee jf l-46961e50d3-47b kf l-46961e50d3-47c ljk mhil ne of l-46961e50d3-478 po qnp remq
sr t!mqT[`fAD u t vit wuv xCt yt zt {zu |mq }| ~y{} st mq uv t t b| u x~ sw q c g set-date-hour! g %set-date-hour!-procedure g m-46961e50d3-486 g t-46961e50d3-484 g t-46961e50d3-485 f l-46961e50d3-48b f l-46961e50d3-48c f l-46961e50d3-488
!T[`fAD i C s g
set-date-day! g %set-date-day!-procedure g m-46961e50d3-496 g t-46961e50d3-494 g t-46961e50d3-495 f l-46961e50d3-49b f l-46961e50d3-49c f l-46961e50d3-498
!T[`fAD i C s g set-date-month! g %set-date-month!-procedure g m-46961e50d3-4a6 g t-46961e50d3-4a4 g t-46961e50d3-4a5 f l-46961e50d3-4ab f l-46961e50d3-4ac f l-46961e50d3-4a8
!T[`fAD i C s
g set-date-year! g %set-date-year!-procedure g m-46961e50d3-4b6
g t-46961e50d3-4b4 g t-46961e50d3-4b5
f l-46961e50d3-4bb f l-46961e50d3-4bc
f l-46961e50d3-4b8
!T[`fAD i C ! " #" $ %$ &!#% 's ( ) ( *' ) + , -
$ .,- /+ . 0 &*/ 1 0 2 3 2 4g set-date-zone-offset! 5g %set-date-zone-offset!-procedure 6g m-46961e50d3-4c6 76 8g t-46961e50d3-4c4 9g t-46961e50d3-4c5 :89 ;77 <= ?:;> @7 Af l-46961e50d3-4c8 BA C@B D7?C
ED F!?CT[`fAD G F HiF IGH JCF KF LF MLG N?C ON PKMO QsF R?C S R TQGSH UF VF W4N XVW YUGX ZJPTY [EIZ \C ]5\ ^g encode-julian-day-number _g decode-julian-day-number `g tm:gmtoff ag localtime bg local-tz-offset cg time->julian-day-number dg assoc eg leap-second? fg
time->date gg round he 1/2 ig
leap-year? j
k l ; m Z n x o p q Ԍ r s
t 0 u N vjklmnopqrstu wg month-assoc xg invalid-month-specification yg year-day zg week-day {g days-before-first-week |g natural-year }e -1/2 ~e 4800001/2 g number->string g
string-length g make-string g padding g expt g
last-n-digits g locale-day-short g locale-abbr-weekday g
locale-day g locale-long-weekday g locale-month-short g locale-abbr-month g locale-month g locale-long-month g date-reverse-lookup g string=? g locale-abbr-weekday->index g locale-long-weekday->index g locale-abbr-month->index g locale-long-month->index g
tz-printer g locale-print-time-zone g locale-pm-string g locale-am-string g locale-am-string/pm g display f Z f - f + e 1.0 g locale-decimal-point g substring f ~b g newline f ~I:~M:~S ~p f ~Y-~m-~d f
~H:~M:~S~z f ~Y-~m-~dT~H:~M:~S g
directives g
get-formatter g
string-ref g char=? g date-printer g bad-date-format-string g open-output-string f ~c g get-output-string g char->int g bad-date-template-string f Non-integer character g peek-char g
char-numeric? g read-char g integer-reader g make-integer-reader f !Premature ending to integer read. f 'Non-numeric characters in integer read. g integer-reader-exact g make-integer-exact-reader f Invalid time zone +/- f Invalid time zone number g zone-reader g char-alphabetic? g list->string g reverse! f Invalid string for g
locale-reader g make-locale-reader f Invalid character match. g make-char-id-reader g read-directives g priv:string->date f Incomplete date read. C 5 h8S ]@4
jkmns5 4v > " G 4wi4xi5 y> " G R R R R RRz{R|}R~RR ; R QR RR h0 ]$ 6 6 g caller
* g type * g value * g filenamef srfi/srfi-19.scm
9
" ' 5 * * g nameg
time-error CRq h N ]94 5H " 45$ " ~444555 $ 45
45JK" 4 5 " 4 5 "sJC F g filename
g port
g table
g line g data 6 g year ; g jd D g secs O g filenamef srfi/srfi-19.scm
" % ( , / 0 8 2 4 6 6 ; ; @ ! A D I ! L O W [ \
e h i p s u z ' g nameg read-tai-utc-data CRR h ]4 5 C g filename
g filenamef srfi/srfi-19.scm
g nameg read-leap-second-table CR h8 ] " $ C " $
C " g utc-seconds
6 g table g filenamef srfi/srfi-19.scm
)
# $ ( , 6 6 g nameg leap-second-delta CR h ] C g type
g
nanosecond g second g filenamef srfi/srfi-19.scm
g nameg !%make-time-unnormalized-procedure CR4J h q ] C i g t-46961e50d3-2d
g t-46961e50d3-2e g t-46961e50d3-2f CLOP h T ]L 6 L g a
g filenamef srfi/srfi-19.scm
CS h D ] L 6< g filenamef srfi/srfi-19.scm
CU h ] C
CWX hp ]4 5 $ @4 5 $ O @4 5 $ 4 O ?$ @
6
6 } g x
n g tmp n g tmp " n g tmp > n g filenamef srfi/srfi-19.scm
n C5R [\ _` 4 c > " G fi R h r ] $ CC j g obj
g filenamef srfi/srfi-19.scm
g nameg %time?-procedure CgR4&h h 7 ] C / g t-46961e50d3-40
CLO&P h T ]L 6 L g a
g filenamef srfi/srfi-19.scm
CS h D ] L 6< g filenamef srfi/srfi-19.scm
C h ] C
CWX hp ]4 5 $ @4 5 $ O @4 5 $ 4 O ?$ @
6
6 } g x
n g tmp n g tmp " n g tmp > n g filenamef srfi/srfi-19.scm
n C5&R' h t ] &
C 6l g s
g filenamef srfi/srfi-19.scm
g nameg %time-type-procedure CR4' h : ]C 2 g err
g s C #( h : ]C 2 g err
g s C,28 h : ]C 2 g err
g s ChV h 7 ] C / g t-46961e50d3-4c
CLO'P h T ]L 6 L g a
g filenamef srfi/srfi-19.scm
CS h D ] L 6< g filenamef srfi/srfi-19.scm
CX h ] C
CWX h ]14 5 $ @4 5 $ @4 5 $ @4 5 $ @4
5 $ O @4 5 $ 4
O ?$ @ 6 6 g x
g tmp g tmp " g tmp 9 g tmp P g tmp g g tmp g filenamef srfi/srfi-19.scm
C5'R( h z ] & C 6r g s
g filenamef srfi/srfi-19.scm
g nameg %time-nanosecond-procedure CYR4(gns h : ]C 2 g err
g s Cv| h : ]C 2 g err
g s C h : ]C 2 g err
g s Ch h 7 ] C / g t-46961e50d3-67
CLO(P h T ]L 6 L g a
g filenamef srfi/srfi-19.scm
CS h D ] L 6< g filenamef srfi/srfi-19.scm
C h ] C
CWX h ]14 5 $ @4 5 $ @4 5 $ @4 5 $ @4
5 $ O @4 5 $ 4
O ?$ @ 6 6 g x
g tmp g tmp " g tmp 9 g tmp P g tmp g g tmp g filenamef srfi/srfi-19.scm
C5(R) h v ] & C 6 n g s
g filenamef srfi/srfi-19.scm
g nameg %time-second-procedure CR4) h : ]C 2 g err
g s C h : ]C 2 g err
g s C h : ]C 2 g err
g s Ch h 7 ] C / g t-46961e50d3-82
CLO)P h T ]L 6 L g a
g filenamef srfi/srfi-19.scm
CS h D ] L 6< g filenamef srfi/srfi-19.scm
C h ] C
CWX h ]14 5 $ @4 5 $ @4 5 $ @4 5 $ @4
5 $ O @4 5 $ 4
O ?$ @ 6 6 g x
g tmp g tmp " g tmp 9 g tmp P g tmp g g tmp g filenamef srfi/srfi-19.scm
C5)R44.0478 h v ]45C n g dummy
g check? g s g getter g expr CWX h( ] 4 5 $ @ 6 g x
" g tmp " g filenamef srfi/srfi-19.scm
" g
macro-typeg syntax-rulesg patternsg check?g sg getterg expr g ... C54R* h ] &
C 6 g s
g val g filenamef srfi/srfi-19.scm
g nameg %set-time-type!-procedure C9R4*:~ h T ] C L g t-46961e50d3-b0
g t-46961e50d3-b1 CLO*P h T ]L 6 L g a
g filenamef srfi/srfi-19.scm
CS h D ] L 6< g filenamef srfi/srfi-19.scm
C h ] C
CWX hp ]4 5 $ @4 5 $ O @4 5 $ 4 O ?$ @
6
6 } g x
n g tmp n g tmp " n g tmp > n g filenamef srfi/srfi-19.scm
n C5*R+ h ] & C 6 g s
g val g filenamef srfi/srfi-19.scm
g nameg %set-time-nanosecond!-procedure CR4+: h T ] C L g t-46961e50d3-c0
g t-46961e50d3-c1 CLO+P h T ]L 6 L g a
g filenamef srfi/srfi-19.scm
CS h D ] L 6< g filenamef srfi/srfi-19.scm
C h ] C
CWX hp ]4 5 $ @4 5 $ O @4 5 $ 4 O ?$ @
6
6 } g x
n g tmp n g tmp " n g tmp > n g filenamef srfi/srfi-19.scm
n C5+R, h ] & C 6 g s
g val g filenamef srfi/srfi-19.scm
g nameg %set-time-second!-procedure CR4,: h T ] C L g t-46961e50d3-d0
g t-46961e50d3-d1 CLO,P h T ]L 6 L g a
g filenamef srfi/srfi-19.scm
CS h D ] L 6< g filenamef srfi/srfi-19.scm
C h ] C
CWX hp ]4 5 $ @4 5 $ O @4 5 $ 4 O ?$ @
6
6 } g x
n g tmp n g tmp " n g tmp > n g filenamef srfi/srfi-19.scm
n C5,R%'() hX ] &
" 4 5 & " 4 5 & " 4 56 g time
U g filenamef srfi/srfi-19.scm
! ; 5 U U g nameg copy-time C-R h0 ] 4 5$
4 5
D4 5 45 D g r
. g l . g filenamef srfi/srfi-19.scm
! , # . . g nameg
split-real CR(),+ h ]4 & " 4 55 ; $ 4 & " 4 5> G & " 4 5 ; & " 4 > " G ; & " 4 > " G " " & " 4 5
$ & " 4 5
$ & " 4 5 & " 4 > " G ; & " 4 5 & " 4 > " G " " " & " 4 5
$ & " 4 5
$ & " 4 5 & " 4 > " G ; & " 4 5 & " 4 > " G " "4" ", C g t
g int R g frac R g val g val g val V g val g val > l g val g filenamef srfi/srfi-19.scm
!
+ / 0
5 Q
U
\
# 5 :
= # V V 2 $ " % > > x . + g nameg time-normalize! CR h ] 6 g type
g
nanosecond g second g filenamef srfi/srfi-19.scm
g nameg make-time C%R<=>?@AB h ] 4
5 44 5> " G 44 5> " G 44 5> " G 44 5> " G 4
4 5> " G 4 l4
5> " G 4 > " G 4
4 5> " G C g date
g result g filenamef srfi/srfi-19.scm
!
" " % % % $ & ) & 4 & = ' B ' M ' V ) [ ) f ) o * t * { * * , , , , - . . . . . g nameg date->broken-down-time CR% h ]45 6 g tod
g filenamef srfi/srfi-19.scm
5
7
7 8 8 8 + 8
g nameg current-time-utc CR% h0 ]45 456 g tod
) g sec ) g usec ) g filenamef srfi/srfi-19.scm
:
< < = < > < @ A A ' A ) ?
)
g nameg current-time-tai CR h o ] 6 g g filenamef srfi/srfi-19.scm
N
P
g nameg current-time-monotonic CRl h ] 6 g filenamef srfi/srfi-19.scm
R
S S
S 4 S
g nameg current-time-thread CR ; iR% h ]45 6 g run-time
g filenamef srfi/srfi-19.scm
W
X X [ [ ] Y
g nameg current-time-process CR l h` - 1 3 ( " & 6 & 6 & 6 & 6 &
6
6 g
clock-type
` g
clock-type ` g filenamef srfi/srfi-19.scm
b
c c 4 c " d & e . d 2 f : d > g & F d J h # R d V i $ Z k \ k % ` k `
g nameg current-time ClR $
hX - 1 3 ( " $ C$ C$ C$ C 6 g
clock-type
W g
clock-type W g filenamef srfi/srfi-19.scm
q
r r 4 r # s Q z S z ) W z W
g nameg time-resolution C$R)(' h ] & " 4 5& " 45$ q & " 4 5& " 45$ 6 &
" 4 5&
" 45CCC g t1
g t2 g filenamef srfi/srfi-19.scm
~
9 = @
Z r v y
g nameg time=? C0R)( h ]
& " 4 5& " 45 $ C & " 4 5& " 45$ 6 & " 4 5& " 45CC g t1
g t2 g t 9 g filenamef srfi/srfi-19.scm
9 9 G b { #
g nameg time>? C2R)( h ]
& " 4 5& " 45 $ C & " 4 5& " 45$ 6 & " 4 5& " 45CC g t1
g t2 g t 9 g filenamef srfi/srfi-19.scm
9 9 G b { #
g nameg time=? C1R)( h ]
& " 4 5& " 45 $ C & " 4 5& " 45$ 6 & " 4 5& " 45CC g t1
g t2 g t 9 g filenamef srfi/srfi-19.scm
9 9 G b { $
g nameg time<=? C.R)(*,+
h 1 ] & " 4 5& " 45 & " 4 5& " 45 &
" 4 > " G & " 4 > " G & " 4 > " G 6) g time1
g time2 g sec-diff n g nsec-diff n g val t g filenamef srfi/srfi-19.scm
) 9 < V . n n t
g nameg time-difference! C4R-4 h ]
4 5 6 g time1
g time2 g result g filenamef srfi/srfi-19.scm
g nameg time-difference C3R')(,+5
h F ]&
" 45& & " 4 5& " 45 & " 4 5& " 45 & " 4 > " G & " 4 > " G 6
6 > g t
g duration g sec-plus g nsec-plus g filenamef srfi/srfi-19.scm
" % @ ) Y \ v . g nameg
add-duration! C6R-6 h ]
4 5 6 g t
g duration g result g filenamef srfi/srfi-19.scm
g nameg add-duration C5R')(,+5
h M ]&
" 45& & " 4 5& " 45 & " 4 5& " 45 & " 4 > " G & " 4 > " G 6
6 E g t
g duration g sec-minus g
nsec-minus g filenamef srfi/srfi-19.scm
" % @ + Y \ v / g nameg subtract-duration! C8R-8 h ]
4 5 6 g time1
g duration g result g filenamef srfi/srfi-19.scm
g nameg subtract-duration C7R' *(+), h h ] &
" 4 5& " 4 > " G &
" 4> " G & " 4 5 & " 4
> " G & " 4 54 & " 4 55 & " 4
> " G C ` g time-in
g time-out g caller g val > k g val g val g filenamef srfi/srfi-19.scm
" ' - 4 > n ! $ $ % $ ! g nameg priv:time-tai->time-utc! CR_ h ] 6 g time-in
g filenamef srfi/srfi-19.scm
$ F g nameg time-tai->time-utc C_R` h ] 6 g time-in
g filenamef srfi/srfi-19.scm
, g nameg time-tai->time-utc! C`R' *(+), h h ] &
" 4 5& " 4 > " G &
" 4> " G & " 4 5 & " 4
> " G & " 4 54 & " 4 55 & " 4
> " G C ` g time-in
g time-out g caller g val > k g val g val g filenamef srfi/srfi-19.scm
" ' - 4 > n ! $ $ % $ ! g nameg priv:time-utc->time-tai! CRf h ] 6 g time-in
g filenamef srfi/srfi-19.scm
$ F g nameg time-utc->time-tai CfRg h ] 6 g time-in
g filenamef srfi/srfi-19.scm
, g nameg time-utc->time-tai! CgR' X- * h ] &
" 4 5& " 4 > " G 4 5 &
" 4
> " G 6 g time-in
~ g ntime C ~ g val G t g filenamef srfi/srfi-19.scm
" ' + - 4 = C G | * ~
~ g nameg time-monotonic->time-utc CXR' Y *X hx ] &
" 4 5& " 4 > " G &
" 4 > " G
6 g time-in
u g val > k g filenamef srfi/srfi-19.scm
" ' + - 4 > s , u u g nameg time-monotonic->time-utc! CYR' V- * hx ] &
" 4 5& " 4 > " G 4 5 &
" 4
> " G C g time-in
w g ntime C w g val G t g filenamef srfi/srfi-19.scm
" ' + - 4 = C G w g nameg time-monotonic->time-tai CVR' W *
hp ] &
" 4 5& " 4 > " G &
" 4 > " G C g time-in
n g val > k g filenamef srfi/srfi-19.scm
" ' + - 4 > n g nameg time-monotonic->time-tai! CWR' d * h ] &
" 4 5& " 4 > " G 4 5 &
" 4
> " G C g time-in
g ntime M g val Q ~ g filenamef srfi/srfi-19.scm
" ' + - 4 = I 1 K ) M M Q g nameg time-utc->time-monotonic CdR' e * h ] &
" 4 5& " 4 > " G 4 5 &
" 4
> " G C g time-in
{ g ntime G { g val K x g filenamef srfi/srfi-19.scm
"
' + - 4 = E ) G G K
{ g nameg time-utc->time-monotonic! CeR' ]- * hx ] &
" 4 5& " 4 > " G 4 5 &
" 4
> " G C g time-in
w g ntime C w g val G t g filenamef srfi/srfi-19.scm
" ' + - 4 = C G w g nameg time-tai->time-monotonic C]R' ^ *
hp ] &
" 4 5& " 4 > " G &
" 4 > " G C g time-in
n g val > k g filenamef srfi/srfi-19.scm
" ' + - 4 > ! n g nameg time-tai->time-monotonic! C^R h , 3 C g
nanosecond
g second g minute g hour g day g month g year g zone-offset g filenamef srfi/srfi-19.scm
)
g nameg %make-date-procedure CR49' h
, 3 C g t-46961e50d3-33b
g t-46961e50d3-33c g t-46961e50d3-33d g t-46961e50d3-33e g t-46961e50d3-33f g t-46961e50d3-340 g t-46961e50d3-341 g t-46961e50d3-342 CLO9P h T ]L 6 L g a
g filenamef srfi/srfi-19.scm )
CS h D ] L 6< g filenamef srfi/srfi-19.scm )
C) h ] C
CWX hp ]4 5 $ @4 5 $ O @4 5 $ 4 O ?$ @
6
6 } g x
n g tmp n g tmp " n g tmp > n g filenamef srfi/srfi-19.scm
)
n C59R [* _+ 4 c > " G fi R h r ] $ CC j g obj
g filenamef srfi/srfi-19.scm
)
g nameg %date?-procedure C,R4:hG h 8 ] C 0 g t-46961e50d3-35d
CLO:P h T ]L 6 L g a
g filenamef srfi/srfi-19.scm )
CS h D ] L 6< g filenamef srfi/srfi-19.scm )
CI h ] C
CWX hp ]4 5 $ @4 5 $ O @4 5 $ 4 O ?$ @
6
6 } g x
n g tmp n g tmp " n g tmp > n g filenamef srfi/srfi-19.scm
)
n C5:R; h z ] &
C 6r g s
g filenamef srfi/srfi-19.scm
)
g nameg %date-nanosecond-procedure CJR4;X_d h : ]C 2 g err
g s Cgmr h : ]C 2 g err
g s Cu{ h : ]C 2 g err
g s Ch h 8 ] C 0 g t-46961e50d3-369
CLO;P h T ]L 6 L g a
g filenamef srfi/srfi-19.scm )
CS h D ] L 6< g filenamef srfi/srfi-19.scm )
C h ] C
CWX h ]14 5 $ @4 5 $ @4 5 $ @4 5 $ @4
5 $ O @4 5 $ 4
O ?$ @ 6 6 g x
g tmp g tmp " g tmp 9 g tmp P g tmp g g tmp g filenamef srfi/srfi-19.scm
)
C5;R< h v ] & C 6n g s
g filenamef srfi/srfi-19.scm
)
g nameg %date-second-procedure CR4< h : ]C 2 g err
g s C h : ]C 2 g err
g s C h : ]C 2 g err
g s Ch h 8 ] C 0 g t-46961e50d3-384
CLO<P h T ]L 6 L g a
g filenamef srfi/srfi-19.scm )
CS h D ] L 6< g filenamef srfi/srfi-19.scm )
C h ] C
CWX h ]14 5 $ @4 5 $ @4 5 $ @4 5 $ @4
5 $ O @4 5 $ 4
O ?$ @ 6 6 g x
g tmp g tmp " g tmp 9 g tmp P g tmp g g tmp g filenamef srfi/srfi-19.scm
)
C5 h t ] & C 6 l g s
g filenamef srfi/srfi-19.scm
)
g nameg %date-hour-procedure CJR4>X_d h : ]C 2 g err
g s Cgmr h : ]C 2 g err
g s Cu{ h : ]C 2 g err
g s Ch h 8 ] C 0 g t-46961e50d3-3ba
CLO>P h T ]L 6 L g a
g filenamef srfi/srfi-19.scm )
CS h D ] L 6< g filenamef srfi/srfi-19.scm )
C h ] C
CWX h ]14 5 $ @4 5 $ @4 5 $ @4 5 $ @4
5 $ O @4 5 $ 4
O ?$ @ 6 6 g x
g tmp g tmp " g tmp 9 g tmp P g tmp g g tmp g filenamef srfi/srfi-19.scm
)
C5>R? h s ] & C 6 k g s
g filenamef srfi/srfi-19.scm
)
g nameg %date-day-procedure CR4? h : ]C 2 g err
g s C h : ]C 2 g err
g s C h : ]C 2 g err
g s Ch h 8 ] C 0 g t-46961e50d3-3d5
CLO?P h T ]L 6 L g a
g filenamef srfi/srfi-19.scm )
CS h D ] L 6< g filenamef srfi/srfi-19.scm )
C h ] C
CWX h ]14 5 $ @4 5 $ @4 5 $ @4 5 $ @4
5 $ O @4 5 $ 4
O ?$ @ 6 6 g x
g tmp g tmp " g tmp 9 g tmp P g tmp g g tmp g filenamef srfi/srfi-19.scm
)
C5?R@ h u ] & C 6 m g s
g filenamef srfi/srfi-19.scm
)
g nameg %date-month-procedure CR4@ h : ]C 2 g err
g s C h : ]C 2 g err
g s C %* h : ]C 2 g err
g s ChF h 8 ] C 0 g t-46961e50d3-3f0
CLO@P h T ]L 6 L g a
g filenamef srfi/srfi-19.scm )
CS h D ] L 6< g filenamef srfi/srfi-19.scm )
CH h ] C
CWX h ]14 5 $ @4 5 $ @4 5 $ @4 5 $ @4
5 $ O @4 5 $ 4
O ?$ @ 6 6 g x
g tmp g tmp " g tmp 9 g tmp P g tmp g g tmp g filenamef srfi/srfi-19.scm
)
C5@RA h t ] & C 6 l g s
g filenamef srfi/srfi-19.scm
)
g nameg %date-year-procedure CIR4AW^c h : ]C 2 g err
g s Cflq h : ]C 2 g err
g s Ctz h : ]C 2 g err
g s Ch h 8 ] C 0 g t-46961e50d3-40b
CLOAP h T ]L 6 L g a
g filenamef srfi/srfi-19.scm )
CS h D ] L 6< g filenamef srfi/srfi-19.scm )
C h ] C
CWX h ]14 5 $ @4 5 $ @4 5 $ @4 5 $ @4
5 $ O @4 5 $ 4
O ?$ @ 6 6 g x
g tmp g tmp " g tmp 9 g tmp P g tmp g g tmp g filenamef srfi/srfi-19.scm
)
C5ARB h { ] & C 6 s g s
g filenamef srfi/srfi-19.scm
)
g nameg %date-zone-offset-procedure CR4B h : ]C 2 g err
g s C h : ]C 2 g err
g s C h : ]C 2 g err
g s Ch h 8 ] C 0 g t-46961e50d3-426
CLOBP h T ]L 6 L g a
g filenamef srfi/srfi-19.scm )
CS h D ] L 6< g filenamef srfi/srfi-19.scm )
C h ] C
CWX h ]14 5 $ @4 5 $ @4 5 $ @4 5 $ @4
5 $ O @4 5 $ 4
O ?$ @ 6 6 g x
g tmp g tmp " g tmp 9 g tmp P g tmp g g tmp g filenamef srfi/srfi-19.scm
)
C5BR4}
78 h v ]45C n g dummy
g check? g s g getter g expr CWX h( ] 4 5 $ @ 6 g x
" g tmp " g filenamef srfi/srfi-19.scm
)
" g
macro-typeg syntax-rulesg patternsg check?g sg getterg expr g ... C5}R h ] &
C 6 g s
g val g filenamef srfi/srfi-19.scm
)
g nameg %set-date-nanosecond!-procedure CR4:5 h V ] C N g t-46961e50d3-454
g t-46961e50d3-455 CLOP h T ]L 6 L g a
g filenamef srfi/srfi-19.scm )
CS h D ] L 6< g filenamef srfi/srfi-19.scm )
C7 h ] C
CWX hp ]4 5 $ @4 5 $ O @4 5 $ 4 O ?$ @
6
6 } g x
n g tmp n g tmp " n g tmp > n g filenamef srfi/srfi-19.scm
)
n C5R8 h ] & C 6 g s
g val g filenamef srfi/srfi-19.scm
)
g nameg %set-date-second!-procedure C9R48:_ h V ] C N g t-46961e50d3-464
g t-46961e50d3-465 CLO8P h T ]L 6 L g a
g filenamef srfi/srfi-19.scm )
CS h D ] L 6< g filenamef srfi/srfi-19.scm )
Ca h ] C
CWX hp ]4 5 $ @4 5 $ O @4 5 $ 4 O ?$ @
6
6 } g x
n g tmp n g tmp " n g tmp > n g filenamef srfi/srfi-19.scm
)
n C58Rb h ] & C 6 g s
g val g filenamef srfi/srfi-19.scm
)
g nameg %set-date-minute!-procedure CcR4b: h V ] C N g t-46961e50d3-474
g t-46961e50d3-475 CLObP h T ]L 6 L g a
g filenamef srfi/srfi-19.scm )
CS h D ] L 6< g filenamef srfi/srfi-19.scm )
C h ] C
CWX hp ]4 5 $ @4 5 $ O @4 5 $ 4 O ?$ @
6
6 } g x
n g tmp n g tmp " n g tmp > n g filenamef srfi/srfi-19.scm
)
n C5bR h ] & C 6 g s
g val g filenamef srfi/srfi-19.scm
)
g nameg %set-date-hour!-procedure CR4: h V ] C N g t-46961e50d3-484
g t-46961e50d3-485 CLOP h T ]L 6 L g a
g filenamef srfi/srfi-19.scm )
CS h D ] L 6< g filenamef srfi/srfi-19.scm )
C h ] C
CWX hp ]4 5 $ @4 5 $ O @4 5 $ 4 O ?$ @
6
6 } g x
n g tmp n g tmp " n g tmp > n g filenamef srfi/srfi-19.scm
)
n C5R h ] & C 6 g s
g val g filenamef srfi/srfi-19.scm
)
g nameg %set-date-day!-procedure CR4: h V ] C N g t-46961e50d3-494
g t-46961e50d3-495 CLOP h T ]L 6 L g a
g filenamef srfi/srfi-19.scm )
CS h D ] L 6< g filenamef srfi/srfi-19.scm )
C h ] C
CWX hp ]4 5 $ @4 5 $ O @4 5 $ 4 O ?$ @
6
6 } g x
n g tmp n g tmp " n g tmp > n g filenamef srfi/srfi-19.scm
)
n C5R h ] & C 6 g s
g val g filenamef srfi/srfi-19.scm
)
g nameg %set-date-month!-procedure CR4: h V ] C N g t-46961e50d3-4a4
g t-46961e50d3-4a5 CLOP h T ]L 6 L g a
g filenamef srfi/srfi-19.scm )
CS h D ] L 6< g filenamef srfi/srfi-19.scm )
C h ] C
CWX hp ]4 5 $ @4 5 $ O @4 5 $ 4 O ?$ @
6
6 } g x
n g tmp n g tmp " n g tmp > n g filenamef srfi/srfi-19.scm
)
n C5R
h ] & C 6 g s
g val g filenamef srfi/srfi-19.scm
)
g nameg %set-date-year!-procedure C R4
:1 h V ] C N g t-46961e50d3-4b4
g t-46961e50d3-4b5 CLO
P h T ]L 6 L g a
g filenamef srfi/srfi-19.scm )
CS h D ] L 6< g filenamef srfi/srfi-19.scm )
C3 h ] C
CWX hp ]4 5 $ @4 5 $ O @4 5 $ 4 O ?$ @
6
6 } g x
n g tmp n g tmp " n g tmp > n g filenamef srfi/srfi-19.scm
)
n C5
R4 h ] & C 6 g s
g val g filenamef srfi/srfi-19.scm
)
g nameg %set-date-zone-offset!-procedure C5R44:[ h V ] C N g t-46961e50d3-4c4
g t-46961e50d3-4c5 CLO4P h T ]L 6 L g a
g filenamef srfi/srfi-19.scm )
CS h D ] L 6< g filenamef srfi/srfi-19.scm )
C] h ] C
CWX hp ]4 5 $ @4 5 $ O @4 5 $ 4 O ?$ @
6
6 } g x
n g tmp n g tmp " n g tmp > n g filenamef srfi/srfi-19.scm
)
n C54R hh ]
$ "
m
d ӖC g day
d g month d g year d g a
d g y % d g m 2 d g filenamef srfi/srfi-19.scm
9
:
:
: ; ; ; # ; % ; % : . < / < 2 < 2 : < > ? > B > C = I ? J = O @ P = Q A V A
W A X = ^ B _ = d g nameg encode-julian-day-number C^R h ]A44 55 }, : : d @
$ " D g jdn
g days g a g b * g c > g d L g e Z g m h g y | g filenamef srfi/srfi-19.scm
F
G G G G H G I I * I * G : J = J > J > G E K H K L K L G V L Y L Z L Z G a M d M h M h G o N r N { N ! | N | G P P Q
Q Q Q
Q
Q R R R R S S S O 1 g nameg decode-julian-day-number C_R`a) h0 ]
44 & " 4 555C g utc-time
* g filenamef srfi/srfi-19.scm
Y
[ [ [ [ & [ ( [ ) [ * g nameg local-tz-offset CbR h ] C g seconds
g tz-offset g filenamef srfi/srfi-19.scm
^
_
_ _ g nameg time->julian-day-number CcRd h ]4 5$ CC { g second
g filenamef srfi/srfi-19.scm
c
d d g nameg leap-second? CeR' fbe)c_g( hP R - 1 3 &
" 4 5& " 4 > " G ( 4 5" 4 & " 4
55 4 $ & " 4
5" & " 4
55 4 > G 4
455
< <
& " 4 5$
"
C J g time
M g tz-offset M g offset W M g leap-second? | M g jdn M g secs M g date M g month M g year M g int-secs M g hours
M g rem M g minutes M g seconds
M g
nanosecond 3 M g second 3 M g filenamef srfi/srfi-19.scm
f
g ) g . h 2 h 4 h ; h I i J j W k W i Z l a l / z l % | l | i m m ' n 3 n 0 o 0 m i r ! r v v ) v v w , w v x - x v y v z v
{ * | - | & 3 {
, M
g nameg time-utc->date CaR' fb_)ec_g( hH - 1 3 &
" 4 5& " 4 > " G ( 44 55" & " 4
54 & " 4
55 4 5 4
$ " 5 4> G 4455
<
< & " 4 5$ "
C g time
E g tz-offset E g offset \ E g seconds E g leap-second? E g jdn E g secs E g date E g month E g year E g int-secs
E g hours E g rem E g minutes
E g seconds E g
nanosecond + E g second + E g filenamef srfi/srfi-19.scm
) . 2 4 ; I J M & U \ \ a z ( % ' 0 ! ) , - " % & +
1 E
g nameg time-tai->date CZR' fbX)ec_g( hH - 1 3 &
" 4 5& " 4 > " G ( 44 55" & " 4
54 & " 4
55 4 5 4
$ " 5 4> G 4455
<
< & " 4 5$ "
C g time
E g tz-offset E g offset \ E g seconds E g leap-second? E g jdn E g secs E g date E g month E g year E g int-secs
E g hours E g rem E g minutes
E g seconds E g
nanosecond + E g second + E g filenamef srfi/srfi-19.scm
) . 2 4 ; I J M & U \ \ a z ( % ' 0 ! ) , - " % & +
1 E
g nameg time-monotonic->date CSR^?@Ah% ;>=<B h ]4 & " 4 5 & " 4 5 & " 4 55 4 5
&
" 4 5 < < & " 4
5 < < & " 4 5 < & " 4 5
& " 4 56 g date
g jdays [ g jdays-1/2 g g filenamef srfi/srfi-19.scm
- # 1 > 1 X [ [ ^ d - e $ g g p g nameg date->time-utc CJRgJ h ]4 56 { g date
g filenamef srfi/srfi-19.scm
g nameg date->time-tai CIReJ h ]4 56 g date
g filenamef srfi/srfi-19.scm
g nameg date->time-monotonic CHR h0 ]
$ C
$ d
CC g year
+ g t
+ g filenamef srfi/srfi-19.scm
% ) ' & ( ! + g nameg
leap-year? CiRvwRdwCxi h` 4 ] 45 $ " 4> " G " C45$ $ C"" , g day
] g month ] g year ] g days-pr ] g filenamef srfi/srfi-19.scm
# % 6 7 8 9
C H L Q R ] g nameg year-day CyRy?@A hX ] & " 4 5 & " 4 5 & " 4 56 g date
W g filenamef srfi/srfi-19.scm
" = . W W g nameg
date-year-day CCR hH y ]
d C q g day
G g month G g year G g a
G g y G g m G g filenamef srfi/srfi-19.scm
% * + , 1 2 3 9 : ? B C F G g nameg week-day CzRz?@A hX ] & " 4 5 & " 4 5 & " 4 56 g date
W g filenamef srfi/srfi-19.scm
" = . W W g nameg
date-week-day CDRAD hH ] & " 4 5
45 C g date
D g day-of-week-starting-week D g year 0 g first-day 0 D g
fdweek-day 9 D g filenamef srfi/srfi-19.scm
0 3 9 @ C D g nameg days-before-first-week C{RC{ h ]4 54 5 C g date
g day-of-week-starting-week g filenamef srfi/srfi-19.scm
g nameg date-week-number CERl ab h0 - 1 3 45 ( 45" 6 g tz-offset
, g time , g filenamef srfi/srfi-19.scm
* , ,
g nameg current-date C!R!A hh I ]45 & " 45 d d d$ C
$ C 2$ C d CA g n
h g s ' g current-year ' h g current-century 1 h g filenamef srfi/srfi-19.scm
" ' . 1 1 8 ! < C " G O # R # U # Y ^ # 6 d $ g $ h g nameg natural-year C|R;<=>?@AB^} h ]A &
" 4 5 & " 4 5 & " 4 5 & " 4 5 & " 4 5 & " 4 5 & " 4 5 & " 4
5 4 5
< < <
C g date
g
nanosecond g second g minute g hour g day g month g year g offset g filenamef srfi/srfi-19.scm
&
' ( 9 ) T * o +
, - . ' / 0 / 1 2 1
3 1
5 1
1
/ g nameg date->julian-day CFRF~ h ]4 5C g date
g filenamef srfi/srfi-19.scm
8
9 : 9
g nameg date->modified-julian-day CGR' f)(
h ] &
" 4 5& " 4 > " G & " 4 5 & " 4 5
C g time
| g filenamef srfi/srfi-19.scm
<
= " = ' > + > - > 4 > ? ? Z ? ! t ? u ? x ? { ? | g nameg time-utc->julian-day CbRb~ h ]4 5C g time
g filenamef srfi/srfi-19.scm
C
D E D
g nameg time-utc->modified-julian-day CcR' f)( h
] &
" 4 5& " 4 > " G & " 4 54 & " 4 55 & " 4
5
C g time
g filenamef srfi/srfi-19.scm
G
H " H ' I + I - I 4 I ? J X K ] K ! w K x J { L L J J J g nameg time-tai->julian-day C[R[~ h ]4 5C g time
g filenamef srfi/srfi-19.scm
P
Q R Q
g nameg time-tai->modified-julian-day C\R' f)( h ] &
" 4 5& " 4 > " G & " 4 54 & " 4 55 & " 4
5
C g time
g filenamef srfi/srfi-19.scm
U
V " V ' W + W - W 4 W ? X X Y ] Y ! w Y x X { Z Z X X X g nameg time-monotonic->julian-day CTRT~ h ]4 5C g time
g filenamef srfi/srfi-19.scm
^
_ ` _
g nameg #time-monotonic->modified-julian-day CUR% h0 ] 4> G 6 g jdn
+ g secs
+ g seconds + g parts + g filenamef srfi/srfi-19.scm
b
c
c
c
e d ' g + f + g nameg julian-day->time-utc CNRgN h ]4 56 g jdn
g filenamef srfi/srfi-19.scm
j
k
k
g nameg julian-day->time-tai CMReN h ]4 56 g jdn
g filenamef srfi/srfi-19.scm
m
n
n
g nameg julian-day->time-monotonic CLRNba h0 - 1 3 4 5 ( 45" 6 g jdn
0 g tz-offset 0 g time 0 g offset & 0 g filenamef srfi/srfi-19.scm
p
q q r s & t & q 0 u 0
g nameg julian-day->date CKRK~ h - 1 3 @ g jdn
g tz-offset g filenamef srfi/srfi-19.scm
w
x ! x x
g nameg modified-julian-day->date CORN~ h ] 6 g jdn
g filenamef srfi/srfi-19.scm
{
| | | g nameg modified-julian-day->time-utc CRRM~ h ] 6 g jdn
g filenamef srfi/srfi-19.scm
~
g nameg modified-julian-day->time-tai CQRL~ h ] 6 g jdn
g filenamef srfi/srfi-19.scm
% g nameg #modified-julian-day->time-monotonic CPRbl h t ] 456 l g filenamef srfi/srfi-19.scm
g nameg current-julian-day C"Rcl h } ] 456 u g filenamef srfi/srfi-19.scm
!
g nameg current-modified-julian-day C#R hH 2 ]4 5 45 $ " $ C456 * g n
E g pad-with E g length E g str E g str-len E g t , g filenamef srfi/srfi-19.scm
) 0 6 = $ A E E g nameg padding CR h ] 4
56 g i
g n g filenamef srfi/srfi-19.scm
g nameg
last-n-digits CR h ] 6 } g n
g filenamef srfi/srfi-19.scm
2 g nameg locale-abbr-weekday CR h ] 6 } g n
g filenamef srfi/srfi-19.scm
, g nameg locale-long-weekday CRiRiR h8 , ] " )$ C4 455$ C " " $ g needle
6 g haystack-ref 6 g haystack-len 6 g same? 6 g index / g filenamef srfi/srfi-19.scm
# ) / / 6 g nameg date-reverse-lookup CR h ] 6 g string
g filenamef srfi/srfi-19.scm
g nameg locale-abbr-weekday->index CR h ] 6 g string
g filenamef srfi/srfi-19.scm
g nameg locale-long-weekday->index CR h ] 6 ~ g string
g filenamef srfi/srfi-19.scm
g nameg locale-abbr-month->index CR h ] 6 ~ g string
g filenamef srfi/srfi-19.scm
g nameg locale-long-month->index CRB h( ] & " 4 56 g date
# g port # g filenamef srfi/srfi-19.scm
# # g nameg locale-print-time-zone CR h ] $ 6 6 g hr
g filenamef srfi/srfi-19.scm
# g nameg locale-am-string/pm CR h ]
$ 4> " G " 4
$ 4> " G " 4> " G
$ C4 54 <5 440 5> " G 40 56 g offset
g port g hours y g minutes y g filenamef srfi/srfi-19.scm
% * + / 6 C G N Z ^ a h + i k l s 6 t $ w y y ~ g nameg
tz-printer CR~ h ]~6 g date
g pad-with
g port
g filenamef srfi/srfi-19.scm
CaD h ]44 556 g date
g pad-with g port g filenamef srfi/srfi-19.scm
- CAD h ]44 556 g date
g pad-with g port g filenamef srfi/srfi-19.scm
- Cb@ h( ]4 & " 4 556 g date
( g pad-with ( g port ( g filenamef srfi/srfi-19.scm
+ $ ( ( CB@ h( ]4 & " 4 556 g date
( g pad-with ( g port ( g filenamef srfi/srfi-19.scm
+ $ ( ( Cch{ h ]4 56 g date
g pad-with g port g filenamef srfi/srfi-19.scm
Cd? h0 ]4 & " 4 50 56 g date
, g pad-with , g port , g filenamef srfi/srfi-19.scm
! ( , , CDh| h ]4 56 g date
g pad-with g port g filenamef srfi/srfi-19.scm
+
Ce? h0 ]4 & " 4 5 56 g date
, g pad-with , g port , g filenamef srfi/srfi-19.scm
! ( , , Cf;< h ]# &
" 4 5$ :44 & " 4 5 5> " G " 544 & " 4 5 5> " G 4 &
" 4 5 > G 4
5 4 5 $ (44 5 > " G 4
56C g date
g pad-with g port g i g f g ns g le g filenamef srfi/srfi-19.scm
# $ ' , ( D % J Q ^ a f % * $ / $ # # ) ) " Chh h ]4 56 g date
g pad-with g port g filenamef srfi/srfi-19.scm
+
CH> h0 ]4 & " 4 5 56 g date
, g pad-with , g port , g filenamef srfi/srfi-19.scm
! ( , , CI> hP ] & " 4 5 $ 4 564 56 g date
M g pad-with M g port M g hr M g filenamef srfi/srfi-19.scm
$ ( + 2 ' 8 < ?
M
M CjC h ]44 5 56 g date
g pad-with g port g filenamef srfi/srfi-19.scm
! Ck> h0 ]4 & " 4 5 56 g date
, g pad-with , g port , g filenamef srfi/srfi-19.scm
! ( , , Cl> hx ] & " 4 5 $ " & " 4 5 " & " 4 5 4 56 g date
t g pad-with t g port t g hr a t g filenamef srfi/srfi-19.scm
$ ' B I 5 a f t t Cm@ h0 ]4 & " 4 5 56 g date
, g pad-with , g port , g filenamef srfi/srfi-19.scm
! ( , , CM= h0 ]4 & " 4 5 56 g date
, g pad-with , g port , g filenamef srfi/srfi-19.scm
! ( , , Cn h ]6 g date
g pad-with g port g filenamef srfi/srfi-19.scm
"
# CN; h0 ]4 &
" 4 5 56 g date
+ g pad-with + g port + g filenamef srfi/srfi-19.scm
$
%
% ! ' % + % + Cp> h( ]4 & " 4 556 g date
( g pad-with ( g port ( g filenamef srfi/srfi-19.scm
(
)
) - $ ) ( ) ( Crh h ]4 56 g date
g pad-with g port g filenamef srfi/srfi-19.scm
*
+ + +
+ + CsJ) h0 ] 4 5 & " 45 6 g date
/ g pad-with / g port / g s + g filenamef srfi/srfi-19.scm
,
- % - / - / CS;< hx ] &
" 4 5$ *4 & " 4 5 564 & " 4 5 56 g date
v g pad-with v g port v g filenamef srfi/srfi-19.scm
.
/ / # / & 1 + 1 ( C 1 % I 1 M 1 P 4 U 4 % r 4 v 4 v Ct h ] 6 g date
g pad-with
g port
g filenamef srfi/srfi-19.scm
7
8
CTh~ h ]4 56 g date
g pad-with g port g filenamef srfi/srfi-19.scm
9
: : +
: : CU{E h@ ]4
5
$ 44
50 5644
50 56 g date
? g pad-with ? g port ? g filenamef srfi/srfi-19.scm
;
< < < = = ( = % $ = ( = + ? . ? % ; ? ? ? ? CVE h ]44 50 56 g date
g pad-with g port g filenamef srfi/srfi-19.scm
A
B B ! B B CwD h ]4 56 g date
g pad-with g port g filenamef srfi/srfi-19.scm
D
E E Cxh} h ]4 56 g date
g pad-with g port g filenamef srfi/srfi-19.scm
F
G G CXh h ]4 56 g date
g pad-with g port g filenamef srfi/srfi-19.scm
H
I I CW{E h@ ]4 5
$ 44 50 5644 50 56 g date
? g pad-with ? g port ? g filenamef srfi/srfi-19.scm
J
K K K L L ( L % $ L ( L + N . N % ; N ? N ? CyA h8 ]44 & " 4 5 5 56 g date
3 g pad-with 3 g port 3 g filenamef srfi/srfi-19.scm
P
Q Q !
R ' ) Q ! / Q 3 Q 3 CYA h( ] & " 4 56 g date
# g pad-with # g port # g filenamef srfi/srfi-19.scm
V
W # W # CzB h( ] & " 4 56 g date
# g pad-with # g port # g filenamef srfi/srfi-19.scm
X
Y # Y # CZ h ] 6 g date
g pad-with
g port
g filenamef srfi/srfi-19.scm
Z
[
C1h h ]4 56 g date
g pad-with g port g filenamef srfi/srfi-19.scm
\
] ] +
] ] C2h h ]4 56 g date
g pad-with g port g filenamef srfi/srfi-19.scm
^
_ _ +
_ _ C3h~ h ]4 56 g date
g pad-with g port g filenamef srfi/srfi-19.scm
`
a a +
a a C4h h ]4 56 g date
g pad-with g port g filenamef srfi/srfi-19.scm
b
c c +
c c C5h h ]4 56 g date
g pad-with g port g filenamef srfi/srfi-19.scm
d
e e +
e e C )Rd h ] 4 5 $ CC g char
g
associated g filenamef srfi/srfi-19.scm
h
i i j j g nameg
get-formatter CR h ] $ |45 4~5$ A$
645 4-5$ _ $
644 55 $ &4 > " G 664_5$ ` $
644 55 $ '4 > " G 664455 $ '4 0> " G 664> " G 6C g date
g index g
format-string g str-len g port g current-char g pad-char? A d g formatter w g formatter g formatter + d
g filenamef srfi/srfi-19.scm
l
m m n n o # o & s ) s - s 1 t 3 t * 7 t 8 v ! ? v ; A v ! A v D x P w U y X y \ y ` z $ b { ) f z g } ) j ~ * s 6 u ~ * w } ) w } 3 * / w $ ) ) * 6 * )
3 * / % & ' 2 ) & + % + 3 4 R / Z ^ & ` + d e q r ! r L g nameg date-printer CR hH - 1 3 45 ( " 4
45> " G 6 g date
E g
format-string E g str-port E g fmt-str E g filenamef srfi/srfi-19.scm
+ 0 " * ! 7 E E
g nameg date->string ChR h ] 0$
C 1$ C 2$ C 3$ C 4$ C 5$ C 6$ C 7$ C 8$ C 9$ C 6 g ch
g filenamef srfi/srfi-19.scm
| ~ g nameg char->int CR h ]*" l45 45 $ " (45 $ " $ " $ C
4455 "
" { g upto
| g port | g accum r g nchars r g ch
r g t N g t + K g filenamef srfi/srfi-19.scm
$ + +
> C R Z [ ^ + f g j r
r | g nameg integer-reader CR h ` ]L 6 X g port
g filenamef srfi/srfi-19.scm
C h v ] O C n g upto
g filenamef srfi/srfi-19.scm
g nameg make-integer-reader CRi h
]*H" 45 $ C45$
645$ $K
44 55 "J$ #4 > " G "~
6
"f g n
g port g
padding-ok g port g accum g nchars g ch g filenamef srfi/srfi-19.scm
) - / $ 1 3
4
> A
H I % L 0 T % U X b
h i
$
! g nameg integer-reader-exact CR h ` ]L 6 X g port
g filenamef srfi/srfi-19.scm
C h y ] O C q g n
g filenamef srfi/srfi-19.scm
g nameg make-integer-exact-reader CRi
h 9 ]!
HH4 5 45$ 4 > " G " 4Z5 $ " 4z5 $
C4+5$ K" /4-5$ K" 4 > " G 4 5 45$ 4 > " G " 4 5
< " G " J4 5 < " G " J4 5
" G " J4 5 " G " g port
K g skipper K g ch K g filenamef srfi/srfi-19.scm
z { { |
| } } $ }
! ~ + ~
. K &
K g nameg
skip-until Cid hX ]FO Q $ 745 4~5$ $
645 45 $
4
> " G 4 5
4
5$ 4> " G " $ 4
> " G "
664 5 4 5 $ "
45 $ 4> " G "
6C g date
T g index T g
format-string T g str-len T g port T g template-string T g
skip-until T g current-char $ R g format-char Q g format-info \ g skipper
s g reader s g actor s g val
g port-char R g t # g filenamef srfi/srfi-19.scm
y
$ ' 3 6 9 = A C ! G H $ O > Q $ Q T $ \ d g ' k ' p ' s z % , 1 * - " ' ' ( , . # 5 H ! R 6 T g nameg priv:string->date CRBb% 4Ji;<=>?@A h B ]
4
454 5> " G & " 45$ " v44
55 & " 4
> " G 44 55 & " 4
> " G "
6&
" 45$ & " 45$ & " 45$ & " 45$ & " 45$ l& " 45$ I& " 45$ && " 45$ C"""""""" : g input-string
g template-string g newdate g val g g val g filenamef srfi/srfi-19.scm
! . 9
U Z ! ] " g ! g
! " !
# ? B ^ a } ( g nameg string->date CiRC g m
4 g rtd
g rtd
g g g char-fail
< G g ireader4 = G g ireader2 = G g eireader2 = G g locale-reader-abbr-weekday = G g locale-reader-long-weekday = G g locale-reader-abbr-month = G g locale-reader-long-month = G g filenamef srfi/srfi-19.scm )
5
: B & G
Q T
V Y
[ ^
` c
e h
j m
o r
t ! w
y |
~ "
)
*
0_
1=
3 !
4 5
6 :
6 N
7[ R
7j U 7n U
8] W
: b
;c q
= ~
>
@
Bd
D,
F|
G`
I
J
M
N
P
Q
R6
T
U
V^
X
Y
[%
\
^K
_
a
b
d2 )
9
y F
Y
c ^
c
f
F
*
˄
̐
̓ ̗
P
_
5
G
ו
&
ے 8
& <
C
G
P
f U
, ^
i b
j
m
p
w
{
m ~
3
x
9
B
K
t
,
y
D
\ 4 $
Q
D < " $
( * , . 7 9 ; A z D : F H D J V P * V X Z \ \ ^ 4 ` b d
h
& l
(
)Y
+
,
/
0
6
9
: )
S > V ?~ Y @6 \ @ ^ A a B^ c C e C g D j E` l F o G q G O G A
N y
S5
S7
C6