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.0F ] 4 hQ ] g guile g define-module* g srfi g srfi-35 g filenameS
f srfi/srfi-35.scm g importsS g srfi-1
g exportsS g make-condition-type g condition-type? g make-condition g
condition? g condition-has-type? g
condition-ref g make-compound-condition g extract-condition g define-condition-type g condition g
&condition g &message g message-condition? g condition-message g &serious g serious-condition? !g &error "g error? # !" $g set-current-module %$ &$ 'g cond-expand-provide (g current-module ) *g make-vtable +g
string-append ,g standard-vtable-fields -f prprpr .g format /f # 0g condition-type-id 1g number->string 2g object-address 3g set-struct-vtable-name! 4g condition-type 5g %condition-type-vtable 6g make-struct-layout 7g print-condition 8g string? 9g string->symbol :f ;g %make-condition-type g condition-type-all-fields ?g string-concatenate/shared @f pr A@ Bg struct-layout-for-condition Cf # Dg fold Ef ~A: ~S Fg string-join Gg reverse Hf Ig error Jf "invalid condition type field names Kg every Lg symbol? Mg lset-intersection Ng eq? Og append Pf parent is not a condition type Qf )condition type identifier is not a symbol Rf 7`make-compound-condition-type' passed empty parent list Sg
append-map Tg make-compound-condition-type Ug throw Vg wrong-type-arg Wf condition-has-type? Xf Wrong type argument Yg any Zg
list-index [f invalid field name \f field name is not a symbol ]f
condition-ref ^f Wrong type argument: ~S _g make-struct `g make-condition-from-values ag
fold-right bg memq cf field not specified df make-condition eg map fg compound gg reverse! hf extract-condition ig + jg length kg make-syntax-transformer lk mk ng macro og $sc-dispatch po qo rg each sYY trs uYt vYu wYv xYw yg
syntax-object zg begin {g top |{ }g ribcage ~g dummy g name g parent g pred g
field-name g field-accessor ~ g m-46961e5119-cc { ||||| f l-46961e5119-d1 f l-46961e5119-d2 f l-46961e5119-d3 f l-46961e5119-d4 f l-46961e5119-d5 f l-46961e5119-d6 } } g x f l-46961e5119-ce } | g hygiene yz g define y y g quote y g c y y e e y g syntax-violation f -source expression failed to match any pattern g compound-condition g each-any Y g type g field ~ g m-46961e5119-e1 { || f l-46961e5119-e6 f l-46961e5119-e7 f l-46961e5119-e8 } f l-46961e5119-e3 } | y yT y g %compound y g
quasiquote y g unquote y g condition-instantiation YY g out ~ g m-46961e5119-ee { || f l-46961e5119-f3 f l-46961e5119-f4 f l-46961e5119-f5 } f l-46961e5119-f0 } | y s ڌ Yی Y܌ g field-value g rest ~ ||||| f l-46961e5119-fb f l-46961e5119-fc f l-46961e5119-fd f l-46961e5119-fe f l-46961e5119-ff f l-46961e5119-100 } | y O O y Y Y g m-46961e5119-109 { || f l-46961e5119-10e f l-46961e5119-10f f l-46961e5119-110 } f l-46961e5119-10b } | y r Y f l-46961e5119-116 f l-46961e5119-117 f l-46961e5119-118 } | y g display f <&condition>
g message
C 5 hx0 ]4
#5 4& > " G 4'i4(i5 )> " G 4*i4+i,i-5./012 h ]4 544 5 56 g ct
g port g filenamef srfi/srfi-35.scm
3 4 ' 5 " 6 " 6 2 6 " 4 C5 43i 4> " G 5R567389: hX 0 ] 4 5 4$ " 45$ 45" 45> " G C ( g layout
W g id W g parent W g
all-fields W g struct W g filenamef srfi/srfi-35.scm
;
= < < C C + $ C $ + D + 5 C $ 6 D 8 A E 8 E E H G E 8 L C W g nameg %make-condition-type C;R5 h ] $ CC g obj
g filenamef srfi/srfi-35.scm
H
J J K K g nameg condition-type?g
documentationf 'Return true if OBJ is a condition type. CR< h ]4 5$
CC g ct
g filenamef srfi/srfi-35.scm
N
O
O P P g nameg condition-type-id C0R< h ]4 5$ CC g ct
g filenamef srfi/srfi-35.scm
R
S
S T T g nameg condition-type-parent C=R< h ]4 5$ CC g ct
g filenamef srfi/srfi-35.scm
V
W
W X X g nameg condition-type-all-fields C>R?@A h0 ]" ( 6 " " g field-names
. g field-names " g layout " g filenamef srfi/srfi-35.scm
[
^ ` a b c c " b " ^ & _ . ^ . g nameg struct-layout-for-condition CBR.C04D.E h ]4 4L 55C g field
g result g filenamef srfi/srfi-35.scm
j k " k - l * k " k C>FGH12
hX ? ]44 55 4 O 455 44 5
5 4 4 5 56 7 g c
S g port S g type C g strings - @ g filenamef srfi/srfi-35.scm
e
r s
s s
i i j $ n % o - j - i 0 p 3 p ; p % = p D u
G u Q u
S r S g nameg print-condition C7R>IJKLMNOB;PQ h ] $ l45$ Y45 " 645$ 345( 4 5 4
5 6"" 6
6 g id
} g parent } g field-names } g
parent-fields m g
all-fields N e g layout W e g filenamef srfi/srfi-35.scm
w
| |
}
} ~ ~
% ) ) * 6 7 E F # N Q # W e q u
y
} } g nameg make-condition-typeg
documentationf Return a new condition type named ID, inheriting from PARENT, and with the
fields whose names are listed in FIELD-NAMES. FIELD-NAMES must be a list of
symbols and must not contain names already used by PARENT or one of its
supertypes. CRIRS>B; h@ ! ]( 6( C45 45 6 g id
; g parents ; g
all-fields $ ; g layout - ; g filenamef srfi/srfi-35.scm
$ ' - ;
; g nameg make-compound-condition-type CTR h ] $ 6C g c
g filenamef srfi/srfi-35.scm
g nameg
condition?g
documentationf Return true if C is a condition. CR h ] $ 45$ CCC g c
g vtable g filenamef srfi/srfi-35.scm
g nameg condition-type C4RUVWX=Y h@ ] L& C $ %4 5 $ L 64 5 "C g ct
9 g parent 7 g filenamef srfi/srfi-35.scm
" * + 7 9 g nameg loop C4 hP B ]
"
64 5$ *45$ O Q 4 56"" : g c
I g type I g loop / A g filenamef srfi/srfi-35.scm
& / 9 A I g nameg condition-has-type?g
documentationf )Return true if condition C has type TYPE. CR4>Zh ` ] L CX g name
g filenamef srfi/srfi-35.scm
% ' CI[\UV]^
h` ]4 5$ E$ 64 5 45 4O 5 $ C66
6 g c
^ g
field-name ^ g type J g fields $ J g index 4 J g filenamef srfi/srfi-35.scm
$
' 4
< A F J N R
V
X Z
^ ^ g nameg
condition-refg
documentationf @Return the value of the field named FIELD-NAME from condition C. CR_ h ]
@ g type
g values g filenamef srfi/srfi-35.scm
g nameg make-condition-from-values C`R>abIc h( ]
4 L 5 $ C 6 g field
$ g inits $ g v $ g filenamef srfi/srfi-35.scm
% 0 ' - ) 3 - 4 $ -
$ C`UVd^
hH - 1 3 4 5$ "4 5 4O 5 6 6 g type
B g field+value B g
all-fields 6 g inits , 6 g filenamef srfi/srfi-35.scm
( % , , 6 :
< >
B B
g nameg make-conditiong
documentationf Return a new condition of type TYPE with fields initialized as specified
by FIELD+VALUE, a sequence of field names (symbols) and values. CRe4TfS4e h ] ]L 6 U g f
g filenamef srfi/srfi-35.scm
&
(
C> h ] 4 5 O 456 g c
g ct g filenamef srfi/srfi-35.scm
) & ! C` h8 U - 1 3 4 5 45 4 5 6 M g
conditions
2 g types 2 g ct 2 g inits ( 2 g filenamef srfi/srfi-35.scm
/ ( 2 2
g nameg make-compound-conditiong
documentationf 7Return a new compound condition composed of CONDITIONS. CRg h@ ; ]" (( 6L " " 3 g start-index
= g field-names = g index . g field-names . g result . g filenamef srfi/srfi-35.scm
# .
. 3 = = g nameg list-fields CUVhX4=ie>j hp h ] ( CL & C$ 04L5 $ C 445? "4455 " ` g parents
o g index o g parent o g t * Q g shift ] o g filenamef srfi/srfi-35.scm
! " * 8 ; > % H I Q R U $ ] ] b g o o g nameg loop C>
h ]"O Q "
64 5$ f45$ W4 5 4 5 & C$ 1
O Q 4
5 44 55@C"" g c
g type g list-fields
g ct : g parent C g loop ` r g field-index r g filenamef srfi/srfi-35.scm
!
! "
! ( ) 3 4 : = C M S W ` r y ~ % g nameg extract-conditiong
documentationf OReturn a condition of condition type TYPE with the field values specified
by C. CR4mnqx h X ] C P g tmp-46961e5119-df
g tmp-46961e5119-de C
hH ] 4 5C g dummy
B g name B g parent B g pred B g
field-name B g field-accessor B B C h( ] 4 5 $ @ 6 g x
" g tmp " g filenamef srfi/srfi-35.scm
)
" g
macro-typeg syntax-rulesg patternsg nameg parentg predg
field-nameg field-accessor g ... C5R4mnq h 9 ] C 1 g tmp-46961e5119-ec
C h R ]45 CJ g dummy
g type g field C h( ] 4 5 $ @ 6 g x
" g tmp " g filenamef srfi/srfi-35.scm
3
" g
macro-typeg syntax-rulesg patternsg typeg ... g fieldg ... C5R4mnq h P ]C H g dummy
g type g out C h ]4 5C g dummy
g type g out g
field-name g field-value g rest C h@
]4 5 $ @4 5 $ @ 6 g x
9 g tmp 9 g tmp " 9 g filenamef srfi/srfi-35.scm
: 9 g
macro-typeg syntax-rulesg patternsg typeg outg ... g typeg outg ... g
field-nameg field-value g restg ... C5R4mnq h R ]C J g dummy
g type
g field
C h R ]4? C J g dummy
g type g field C h@ ]4 5 $ @4 5 $ @ 6 g x
9 g tmp 9 g tmp " 9 g filenamef srfi/srfi-35.scm
A 9 g
macro-typeg syntax-rulesg patternsg typeg fieldg ... g typeg fieldg ... g ... C5R5i46i:5 h x ]6p g c
g port g filenamef srfi/srfi-35.scm
P Q Q C R4i i 5 R h r ] 6 j g c
g filenamef srfi/srfi-35.scm
T
g nameg message-condition? C R
h q ] 6 i g c
g filenamef srfi/srfi-35.scm
T
g nameg condition-message C R4i i5 R h r ] 6 j g c
g filenamef srfi/srfi-35.scm
X
g nameg serious-condition? C R4i! i5!R! h f ] 6 ^ g c
g filenamef srfi/srfi-35.scm
[
g nameg error? C"RC g m
, g s
( E g filenamef srfi/srfi-35.scm
- '
2 ' : ' & ? '
H 2 M 2 W 2 > Y 2 ( 2 ( 2 + 8 3 8 8 8 H .
;
H
N
x R
D V
[
e
o w
k
-
\
H
#
-@ O -F O # -H O - R - R - R " - N - L
- T
/- X
/ [
, 0s
C6