
рдореЗрд░реА рдЯрд┐рдкреНрдкрдгрд┐рдпреЛрдВ рдХреЗ рдЕрдиреБрд╕рд╛рд░, рдХрдо рд╕реЗ рдХрдо рд╕рдкреНрддрд╛рд╣ рдореЗрдВ рдПрдХ рдмрд╛рд░
рдХреНрд▓реЛ рд▓рд┐рд╕реНрдЯ рдореЗрдВ рдпрд╛ рдХрд┐рд╕реА рдЕрдиреНрдп рд▓рд┐рд╕реНрдк рд╕реВрдЪреА рдореЗрдВ
, newbies рднреНрд░рдорд┐рдд рд╣реЛ рдЬрд╛рддреЗ рд╣реИрдВ рдХрд┐ рдкреИрдХреЗрдЬ рд╕реЗ рд╕рдВрдмрдВрдзрд┐рдд рдХреНрдпрд╛ рд╣реИред рд╡реЗ рдПрдХ рдкреИрдХреЗрдЬ рдХреЛ "рдбрд╛рдЙрдирд▓реЛрдб рдХрд░рдиреЗ" рдХреЗ рдмрд╛рд░реЗ рдореЗрдВ рдмрд╛рдд рдХрд░рддреЗ рд╣реИрдВ, рдПрдХ рдкреИрдХреЗрдЬ рдХреА рдЖрд╡рд╢реНрдпрдХрддрд╛ рд╣реЛрддреА рд╣реИ, рд╡реЗ рдЖрд╢реНрдЪрд░реНрдпрдЪрдХрд┐рдд рд╣реЛрддреЗ рд╣реИрдВ рдХрд┐ рд╕рд┐рд╕реНрдЯрдо рд▓реЛрдб рдХрд░рдиреЗ рдХреЗ рдмрд╛рдж рдЖрдкрдХреЛ
рдкреИрдХреЗрдЬ рд░реЛрд▓рд░реНрд╕ , рдЖрджрд┐ рдХрд╛ рдЙрдкрдпреЛрдЧ рдХрд░рдиреЗ рдХреА рдЖрд╡рд╢реНрдпрдХрддрд╛ рд╣реИред рдпрд╣ рдореБрдЭреЗ рдЧреБрд╕реНрд╕рд╛ рджрд┐рд▓рд╛рддрд╛ рд╣реИ, рдореБрдЭреЗ рдпрд╣ рднреА рд▓рдЧрддрд╛ рд╣реИ рдХрд┐ рдпрд╣ рдПрдХ рдХрд╛рд░рдг рд╣реЛ рд╕рдХрддрд╛ рд╣реИ рдХрд┐ рд╢реБрд░реБрдЖрддреА рд▓реЛрдЧ рдпрд╣ рд╕реЛрдЪрддреЗ рд╣реИрдВ рдХрд┐ рд▓рд┐рд╕реНрдк рдореЗрдВ рдкреБрд╕реНрддрдХрд╛рд▓рдпреЛрдВ рдХрд╛ рдЙрдкрдпреЛрдЧ рдХрд░рдирд╛ рд╡рд╛рд╕реНрддрд╡ рдореЗрдВ рдХреА рддреБрд▓рдирд╛ рдореЗрдВ рдЕрдзрд┐рдХ рдЬрдЯрд┐рд▓ рд╣реИред
рдЖрдорддреМрд░ рдкрд░ рдореИрдВ рдПрдХ рдЙрдкрдпреЛрдЧреА рд╕реНрдкрд╖реНрдЯреАрдХрд░рдг рд▓рд┐рдЦрдиреЗ рдХреА рдХреЛрд╢рд┐рд╢ рдХрд░рдирд╛ рдмрдВрдж рдХрд░ рджреЗрддрд╛ рд╣реВрдВ, рдФрд░ рд╕реНрд╡рд╛рднрд╛рд╡рд┐рдХ рд░реВрдк рд╕реЗ рдпрд╣ рд╕реНрдкрд╖реНрдЯреАрдХрд░рдг рдмрд╣реБрдд рд╕рд░рд▓ рд╣реИред рдореИрдВрдиреЗ рдпрд╣ рдкреГрд╖реНрда рдЗрд╕рд▓рд┐рдП рдмрдирд╛рдпрд╛ рддрд╛рдХрд┐ рдЕрдЧрд▓реА рдмрд╛рд░ рдореИрдВ рдЗрд╕реЗ рдпрд╣рд╛рдБ рднреЗрдЬ рд╕рдХреВрдБ, рдмрдЬрд╛рдп рдЗрд╕рдХреЗ рдХрд┐ рдмрд╛рд░-рдмрд╛рд░ рдПрдХ рд╣реА рдмрд╛рдд рд╕рдордЭрд╛рдКрдБред
рд╕рдмрд╕реЗ рдкрд╣рд▓реЗ, рдЖрдкрдХреЗ рдкрд╛рд╕ рдПрдХ рд╕реНрдкрд╖реНрдЯ рд╕рд┐рд░ рд╣реЛрдирд╛ рдЪрд╛рд╣рд┐рдПред "рдкреИрдХреЗрдЬ" рд╢рдмреНрдж рднрд╛рд░реА рднрд░рдХрдо рд╣реИред рдбреЗрдмрд┐рдпрди рдпрд╛ рдЬреЗрдВрдЯреВ рдЬреИрд╕реЗ рд▓рд┐рдирдХреНрд╕ рд╡рд┐рддрд░рдг рдореЗрдВ "рдкреИрдХреЗрдЬ," "рдкреИрдХреЗрдЬ" рдЬрд╛рд╡рд╛, рдкрд░реНрд▓, рдпрд╛ рдкрд╛рдпрдерди рдкреНрд░реЛрдЧреНрд░рд╛рдорд┐рдВрдЧ рднрд╛рд╖рд╛рдУрдВ рдореЗрдВ рд╣реИрдВред рдпрд╣ рд╕рдВрднрд╛рд╡рдирд╛ рд╣реИ рдХрд┐ рдЖрдк "рдкреИрдХреЗрдЬ" рдХреНрдпрд╛ рд╣реИ рдпрд╛ рдХреНрдпрд╛ рд╣реЛрдирд╛ рдЪрд╛рд╣рд┐рдП, рдЗрд╕рдХреЗ рдмрд╛рд░реЗ рдореЗрдВ рдПрдХ рдкрдХреНрд╖рдкрд╛рддреА рд░рд╛рдп рдХреЗ рд╕рд╛рде рд▓рд┐рд╕реНрдк рдХреЗ рдкрд╛рд╕ рдЖрдпрд╛ рдерд╛ред
рд╕рдВрдХреБрд▓
рдЖрдо рд▓рд┐рд╕реНрдк рдореЗрдВ
рдПрдХ рдкреИрдХреЗрдЬ рдПрдХ рднрд╛рд╖рд╛ рдХрд╛ рдПрдХ рдкреВрд░реНрдг рддрддреНрд╡ рд╣реИ рдЬрд┐рд╕рдХрд╛ рд╢рдмреНрджрд╛рд░реНрде рдорд╛рдирдХ рджреНрд╡рд╛рд░рд╛ рд╕реНрдкрд╖реНрдЯ рд░реВрдк рд╕реЗ рдкрд░рд┐рднрд╛рд╖рд┐рдд рдХрд┐рдпрд╛ рдЧрдпрд╛ рд╣реИред рдЗрд╕рдХреЗ рдЕрд▓рд╛рд╡рд╛, рдЗрд╕ рдкреГрд╖реНрда рдкрд░ рдЪрд░реНрдЪрд╛ рдХреА рдЧрдИ рд╕рднреА рд╢рд░реНрддреЛрдВ рдореЗрдВ, рдпрд╣ рдПрдХрдорд╛рддреНрд░ рдРрд╕рд╛ рд╣реИ рдЬрд┐рд╕рдХреА (рдЖрдо рд▓рд┐рд╕реНрдк рдХреЗ рд╕рдВрджрд░реНрдн рдореЗрдВ) рдПрдХ рдЕрд╕реНрдкрд╖реНрдЯ рдкрд░рд┐рднрд╛рд╖рд╛ рд╣реИред рдкреИрдХреЗрдЬ, рд╕рдЦреНрддреА рд╕реЗ рдмреЛрд▓ рд░рд╣реЗ рд╣реИрдВ, рдкрд╛рддреНрд░реЛрдВ рдХреЗ рд▓рд┐рдП рдХрдВрдЯреЗрдирд░ред рд╣рдо рдХрд╣ рд╕рдХрддреЗ рд╣реИрдВ рдХрд┐ рдЙрдиреНрд╣реЗрдВ рдЖрдкрдХреЗ рдХрд╛рд░реНрдпрдХреНрд░рдореЛрдВ рдореЗрдВ рдЕрд▓рдЧ рдирд╛рдорд╕реНрдерд╛рди рд╡реНрдпрд╡рд╕реНрдерд┐рдд рдХрд░рдиреЗ рдореЗрдВ рдорджрдж рдХрд░рдиреЗ рдХреА рдЖрд╡рд╢реНрдпрдХрддрд╛ рд╣реИред
рд╕рд╛рдорд╛рдиреНрдп рд▓рд┐рд╕реНрдк рдореЗрдВ рдкреИрдХреЗрдЬ рдмрдирд╛рдиреЗ, рд╕рдВрд╢реЛрдзрд┐рдд рдХрд░рдиреЗ, рдЬрд╛рдВрдЪ рдХрд░рдиреЗ рдФрд░ рд╣рдЯрд╛рдиреЗ рдХреЗ рд▓рд┐рдП рдлрд╝рдВрдХреНрд╢рди рдФрд░ рдореИрдХреНрд░реЛ рд╣реИрдВред рдкреИрдХреЗрдЬ (рдФрд░ рдкреНрд░рддреАрдХреЛрдВ) рдХрд╛ рдПрдХ рдмрд╣реБрдд рдЕрдЪреНрдЫрд╛ рдкрд░рд┐рдЪрдп рдкреАрдЯрд░ рд╕рд┐рдмреЗрд▓ рдХреЗ рдЙрддреНрдХреГрд╖реНрдЯ
рдкреНрд░реИрдХреНрдЯрд┐рдХрд▓ рдХреЙрдорди рд▓рд┐рд╕реНрдк рдХреЗ рдЕрдзреНрдпрд╛рдп 21 рдореЗрдВ рдкрд╛рдпрд╛ рдЬрд╛ рд╕рдХрддрд╛ рд╣реИред рд╢рдмреНрдж рдХреА рдкрд░рд┐рднрд╛рд╖рд╛
рдПрдПрдирдПрд╕рдЖрдИ рдХреЙрдорди рд▓рд┐рд╕реНрдк рд╡рд┐рдирд┐рд░реНрджреЗрд╢ рдХреЗ рдЕрдзреНрдпрд╛рдп 11 (рдСрдирд▓рд╛рдЗрди рд╕рдВрд╕реНрдХрд░рдг) рдореЗрдВ рдкрд╛рдИ рдЬрд╛рддреА рд╣реИред
рд╕рд╛рдорд╛рдиреНрдп рддреМрд░ рдкрд░, рдпрд╣ рд╕рднреА рдкреИрдХреЗрдЬреЛрдВ рдХреЗ рдмрд╛рд░реЗ рдореЗрдВ рд╣реИред рддрдХрдиреАрдХреА рд░реВрдк рд╕реЗ, рдЖрдк рдкреИрдХреЗрдЬ
рдбрд╛рдЙрдирд▓реЛрдб рдирд╣реАрдВ рдХрд░ рд░рд╣реЗ рд╣реИрдВред рдЖрдк рдХреЛрдб (
LOAD
рдХрд╛ рдЙрдкрдпреЛрдЧ рдХрд░рдХреЗ) рдбрд╛рдЙрдирд▓реЛрдб рдХрд░ рд╕рдХрддреЗ рд╣реИрдВ, рдЬреЛ рдмрджрд▓реЗ рдореЗрдВ рдкреИрдХреЗрдЬ рдмрдирд╛рдПрдЧрд╛, рдФрд░ рдпрд╣ рдПрдХ рдорд╣рддреНрд╡рдкреВрд░реНрдг рдЕрдВрддрд░ рд╣реИред
рдЗрд╕рдХреЗ рдЕрд▓рд╛рд╡рд╛, рдпрджрд┐ рдЖрдкрдХрд╛ рд▓рд┐рд╕реНрдк рд╢рд┐рдХрд╛рдпрдд рдХрд░рддрд╛ рд╣реИ рдХрд┐ рдЙрд╕реЗ рдХреЛрдИ рдкреИрдХреЗрдЬ рдирд╣реАрдВ рдорд┐рд▓ рд░рд╣рд╛ рд╣реИ, рддреЛ рдЗрд╕рдХрд╛ рдорддрд▓рдм рд╣реИ рдХрд┐ рд▓рд┐рд╕реНрдк рдХреЗ рд░реВрдк рдореЗрдВ рдкреИрдХреЗрдЬ рдЫрд╡рд┐ рдореЗрдВ рдирд╣реАрдВ рд╣реИ (рдпрд╛рдиреА,
FIND-PACKAGE
рд░рд┐рдЯрд░реНрди
NIL
), рдХреНрдпреЛрдВрдХрд┐ рдХрд┐рд╕реА рдиреЗ рднреА рдЗрд╕реЗ рдЕрднреА рддрдХ рдирд╣реАрдВ рдмрдирд╛рдпрд╛ рд╣реИред рдЗрд╕рдХрд╛ рдорддрд▓рдм рдпрд╣ рдирд╣реАрдВ рд╣реИ рдХрд┐ рд▓рд┐рд╕реНрдк рдорд╢реАрди рдиреЗ рдлрд╛рдЗрд▓ рд╕рд┐рд╕реНрдЯрдо рдХреЛ рдЦреЛрдЬрд╛ рдФрд░ рдХреБрдЫ рднреА рдирд╣реАрдВ рдорд┐рд▓рд╛ред (рдЗрд╕ рд╡рд┐рдлрд▓рддрд╛ рдХрд╛ рдПрдХ рд╕рд╛рдорд╛рдиреНрдп рдХрд╛рд░рдг рдпрд╣ рд╣реИ рдХрд┐ рдШрдЯрдирд╛рдПрдВ рдЧрд▓рдд рдХреНрд░рдо рдореЗрдВ рд╣реЛрддреА рд╣реИрдВред рдиреАрдЪреЗ рджреЗрдЦреЗрдВред)
рдкреНрд░рдгрд╛рд▓реА
рд╕рд┐рд╕реНрдЯрдо, рдкреИрдХреЗрдЬ рдХреЗ рд╡рд┐рдкрд░реАрдд,
рдорд╛рдирдХ рдореЗрдВ рднреА рдЙрд▓реНрд▓реЗрдЦ рдирд╣реАрдВ рдХрд┐рдпрд╛ рдЧрдпрд╛ рд╣реИред рд╣рд╛рд▓рд╛рдВрдХрд┐, рдЕрдиреБрднрд╡реА рд▓рд┐рд╕реНрдк рдкреНрд░реЛрдЧреНрд░рд╛рдорд░ рдЗрд╕ рд╢рдмреНрдж рдХреЛ рдЬрд╛рдирддреЗ рд╣реИрдВ рдХреНрдпреЛрдВрдХрд┐ рдЙрдиреНрд╣реЗрдВ рдХрд┐рд╕реА рдкреНрд░рдХрд╛рд░ рдХреЗ рд╕рд┐рд╕реНрдЯрдо рдбреЗрдлрд┐рдирд┐рд╢рди рдЯреВрд▓ рдХреЛ рдЬрд╛рдирдиреЗ рдФрд░ рд▓рд╛рдЧреВ рдХрд░рдиреЗ рдХреА рдЖрд╡рд╢реНрдпрдХрддрд╛ рд╣реЛрдЧреАред рдЖрдЬ рд╕рдмрд╕реЗ рдЙрд▓реНрд▓реЗрдЦрдиреАрдп
рдПрдПрд╕рдбреАрдПрдл рд╣реИ (рдЬреНрдпрд╛рджрд╛рддрд░ рдЦреБрд▓реЗ рд╕реНрд░реЛрдд рд▓рд┐рд╕реНрдк рдкреБрд╕реНрддрдХрд╛рд▓рдпреЛрдВ рджреНрд╡рд╛рд░рд╛ рдЙрдкрдпреЛрдЧ рдХрд┐рдпрд╛ рдЬрд╛рддрд╛ рд╣реИ); рдПрдХ рдЕрдиреНрдп рдкреНрд░рд╕рд┐рджреНрдз рд╕рд┐рд╕реНрдЯрдо рдбреЗрдлрд┐рдирд┐рд╢рди рдЯреВрд▓, рдЬреЛ
рдПрдПрд╕рдбреАрдПрдл рдХреА рддреБрд▓рдирд╛ рдореЗрдВ рдмрд╣реБрдд рдкреБрд░рд╛рдирд╛ рд╣реИ,
рдПрдордХреЗ рд╣реИ: рдбреАрдПрдлрдПрд╕рд╡рд╛рдИрдЖрд░рдо ред рдХреБрдЫ рдбреЗрд╡рд▓рдкрд░реНрд╕ рд╡рд┐рддрд░рдг рдХреЗ рд╕рд╛рде рдЕрдкрдиреЗ рд╕рд┐рд╕реНрдЯрдо рдбреЗрдлрд┐рдирд┐рд╢рди рдЯреВрд▓реНрд╕ рдХреА рднреА рдЖрдкреВрд░реНрддрд┐ рдХрд░рддреЗ рд╣реИрдВ, рдЙрджрд╛рд╣рд░рдг рдХреЗ рд▓рд┐рдП,
рд▓рд┐рд╕реНрдкрд╡рд░реНрдХреНрд╕ рдХреЗ рд▓рд┐рдП
рдХреЙрдорди рдбреЗрдлрд┐рд╕рд┐рдЯ рд╕рд┐рд╕реНрдЯрдо рджреЗрдЦреЗрдВред
рдЗрд╕ рдирд╕ рдореЗрдВ, рдПрдХ рдкреНрд░рдгрд╛рд▓реА, рд╕рдЦреНрддреА рд╕реЗ рдмреЛрд▓рдирд╛, рдЗрд╕реЗ рд╕рдВрд╕рд╛рдзрд┐рдд рдХрд░рдиреЗ рдХреЗ рд▓рд┐рдП рдХреЛрдб рдкреНрд▓рд╕ рдирд┐рд░реНрджреЗрд╢реЛрдВ рдХрд╛ рдПрдХ рд╕реЗрдЯ рд╣реИ, рдЙрджрд╛рд╣рд░рдг рдХреЗ рд▓рд┐рдП, рдЕрдиреНрдп рдкреНрд░рдгрд╛рд▓рд┐рдпреЛрдВ рдХреЗ рдЖрдзрд╛рд░ рдкрд░, рдкрд╣рд▓реА рдЬрдЧрд╣ рдореЗрдВ рдХреНрдпрд╛ рдбрд╛рдЙрдирд▓реЛрдб / рд╕рдВрдХрд▓рд┐рдд рдХрд┐рдпрд╛ рдЬрд╛рдирд╛ рдЪрд╛рд╣рд┐рдП, рдЖрджрд┐ред рджреВрд╕рд░реЗ рд╢рдмреНрджреЛрдВ рдореЗрдВ, рд╕рд┐рд╕реНрдЯрдо рдкрд░рд┐рднрд╛рд╖рд╛ рдЙрдкрдХрд░рдг
рдмрдирд╛рдиреЗ рдпрд╛
рдЪреАрдВрдЯреА рдХреЗ рд╕рдорд╛рди рд╣реИред
рдЗрд╕рдХреЗ рдЕрд▓рд╛рд╡рд╛, рд╕рд┐рд╕реНрдЯрдо рдбреЗрдлрд┐рдирд┐рд╢рди рдЯреВрд▓ рдЖрдорддреМрд░ рдкрд░ рдмрд╣реБрдд рдХреБрдЫ рдХрд░ рд╕рдХрддрд╛ рд╣реИ - рдХреЙрдорди рдбрд┐рдлреЗрдВрд╕ рд╕рд┐рд╕реНрдЯрдо, рдЙрджрд╛рд╣рд░рдг рдХреЗ рд▓рд┐рдП,
COM рдкреНрд░рдХрд╛рд░реЛрдВ рдХреА рд▓рд╛рдЗрдмреНрд░реЗрд░реА рдлрд╝рд╛рдЗрд▓реЛрдВ рдХреЛ рдПрдХреАрдХреГрдд рдХрд░ рд╕рдХрддрд╛ рд╣реИ, рдПрдПрд╕рдбреАрдПрдл рдкреВрд░реА рддрд░рд╣ рд╕реЗ рдПрдХреНрд╕реНрдЯреЗрдВрд╕рд┐рдмрд▓ рд╣реИ рдФрд░
рд╕реА рдореЗрдВ рдлрд╝рд╛рдЗрд▓реЛрдВ рдХреЛ
рд╕рдВрдХрд▓рд┐рдд рдХрд░рдиреЗ рдХреЗ
рд▓рд┐рдП , рдЕрдиреНрдп рдЪреАрдЬреЛрдВ рдХреЗ рдЕрд▓рд╛рд╡рд╛ рдЙрдкрдпреЛрдЧ рдХрд┐рдпрд╛ рдЧрдпрд╛ рдерд╛
ред рдпрд╣ рднреА рдЕрдХреНрд╕рд░ рд╡рд░реНрдгрд┐рдд рдкреНрд░рдгрд╛рд▓реА рдХреЗ
рдкрд░реАрдХреНрд╖рдг рд╕реВрдЯ рдХреЛ
рдкрд░рд┐рднрд╛рд╖рд┐рдд рдХрд░рдиреЗ рдХреЗ рд▓рд┐рдП рдЙрдкрдпреЛрдЧ рдХрд┐рдпрд╛ рдЬрд╛рддрд╛ рд╣реИред
рд╣рд╛рд▓рд╛рдВрдХрд┐ рдПрдПрд╕рдбреАрдПрдл рдХрд╛рдлреА рд▓реЛрдХрдкреНрд░рд┐рдп рд╣реИ, рдпрд╣ рд╕рд░реНрд╡рд╡реНрдпрд╛рдкреА рдирд╣реАрдВ рд╣реИред рдпрд╣ рдХрдИ Lisp рд╕рд┐рд╕реНрдЯрдо рдЬреИрд╕реЗ SBCL, OpenMCL рдпрд╛ AllegroCL рдХреЗ рд╕рд╛рде рдкреНрд░реАрд▓реЛрдбреЗрдб рдЖрддрд╛ рд╣реИ, рд╕рдмрд╕реЗ рдЕрдзрд┐рдХ рд╕рдВрднрд╛рд╡рдирд╛ рд╣реИ рдХрд┐ рдпрд╣ рдЕрдиреНрдп Lisp рд╕рд┐рд╕реНрдЯрдо рдореЗрдВ рдмреВрдЯ рд╣реЛрдЧрд╛, рд▓реЗрдХрд┐рди рдпрд╣ рддрдереНрдп рдЗрд╕реЗ рдХреЙрдорди рд▓рд┐рд╕реНрдк рдХрд╛ рд╣рд┐рд╕реНрд╕рд╛ рдирд╣реАрдВ рдмрдирд╛рддрд╛ рд╣реИред рдпрд╣ рдПрдХ рд╕реНрдкрд╖реНрдЯ рд╡рд┐рдирд┐рд░реНрджреЗрд╢ рдХреЗ рдмрд┐рдирд╛ рдФрд░ рд╡рд┐рднрд┐рдиреНрди рд╕рдВрд╕реНрдХрд░рдгреЛрдВ рдХреЗ рд╕рд╛рде рдХреЛрдб рдХрд╛ рдПрдХ рд╕реЗрдЯ рд╣реИ рдЬреЛ рдПрдХ рджреВрд╕рд░реЗ рдХреЗ рд╕рд╛рде рдЕрд╕рдВрдЧрдд рд╣реИрдВред
рд╕рдордЭ рдЬрд╛рдУ ...
рдореЙрдбреНрдпреВрд▓
рдорд╛рдирдХ рдХреЗрд╡рд▓ рд╕рддрд╣реА рддреМрд░ рдкрд░ рдореЙрдбреНрдпреВрд▓ рдХреЛ рдкрд░рд┐рднрд╛рд╖рд┐рдд рдХрд░рддрд╛ рд╣реИред
REQUIRE
,
PROVIDE
рдФрд░
*MODULES*
рдмрд╛рд░реЗ рдореЗрдВ рдЖрдкрдХреЛ рджреЛ рдмрд╛рддреЗрдВ рдЬрд╛рдирдиреЗ рдХреА рдЬрд░реВрд░рдд рд╣реИ - рдпрд╣ рдХрд╛рд░реНрдпрдХреНрд╖рдорддрд╛ рдкрджрд╛рд╡рдирдд рдФрд░ рдХрд╛рд░реНрдпрд╛рдиреНрд╡рдпрди рдирд┐рд░реНрднрд░ рд╣реИред рдЗрд╕ рддрдереНрдп рд╕реЗ рдкрд░реЗрд╢рд╛рди рди рд╣реЛрдВ рдХрд┐ рдпрд╣ рдХрд╛рд░реНрдпрдХреНрд╖рдорддрд╛ рдЕрдиреБрд╢рдВрд╕рд┐рдд рдирд╣реАрдВ рд╣реИред рдЖрдЬ рд╕рднреА рд╡рд┐рддрд░рдгреЛрдВ рдореЗрдВ рдпреЗ рдХрд╛рд░реНрдп рд╣реЛрддреЗ рд╣реИрдВ, рдФрд░ рд╕рдВрднрд╛рд╡рдирд╛ рд╣реИ рдХрд┐ рдПрдХ рдирдпрд╛ рдПрдПрдирдПрд╕рдЖрдИ рдорд╛рдирдХ рджрд┐рдЦрд╛рдИ рджреЗрдЧрд╛ рдФрд░ рд╕рднреА рдХрд╛рд░реНрдпрд╛рдиреНрд╡рдпрди рдЕрдЪрд╛рдирдХ рдЙрдиреНрд╣реЗрдВ рд╣рдЯрд╛ рджреЗрдВрдЧреЗ, рдЬрд╝рд╛рд╣рд┐рд░ рд╣реИ, рдЫреЛрдЯрд╛ред рдЪрд┐рдВрддрд╛ рдХреА
REQUIRE
рд╣реИ рдХрд┐
REQUIRE
рдПрдХ рд╕реБрд╡рд┐рдзрд╛рдЬрдирдХ рд▓реЗрдХрд┐рди рдкреЛрд░реНрдЯреЗрдмрд▓ рд╡рд┐рдзрд┐ рдирд╣реАрдВ рд╣реЛ рд╕рдХрддреА (рдЬрдм рддрдХ рдХрд┐ рдЖрдк рдкреЛрд░реНрдЯреЗрдмрд┐рд▓рд┐рдЯреА рддрдВрддреНрд░ рдХреЗ рдмрд╛рд░реЗ рдореЗрдВ рдЪрд┐рдВрддрд┐рдд рдирд╣реАрдВ рд╣реИрдВ, рдирд┐рд╢реНрдЪрд┐рдд рд░реВрдк рд╕реЗ)ред
рдЙрджрд╛рд╣рд░рдг рдХреЗ рд▓рд┐рдП, рд▓рд┐рд╕реНрдкрд╡рд░реНрдХреНрд╕ рдореЗрдВ рдЖрдк рдЙрдкрдпреЛрдЧ рдХрд░ рд╕рдХрддреЗ рд╣реИрдВ
(require "foreign-parser")
рдПрдХ
рдкрд╛рд░реНрд╕рд░ рдХреЛ рд▓реЛрдб рдХрд░рдиреЗ рдХреЗ рд▓рд┐рдП рдЬреЛ
C рдореЗрдВ рдкрд░рд┐рднрд╛рд╖рд╛рдПрдВ рдкрдврд╝ рд╕рдХрддрд╛ рд╣реИ , рд▓реЗрдХрд┐рди рдпрд╣ OpenMCL рдкрд░ рдХрд╛рдо рдирд╣реАрдВ рдХрд░реЗрдЧрд╛ред рдЖрдк рднреА рдХреЙрд▓ рдХрд░ рд╕рдХрддреЗ рд╣реИрдВ
(require :asdf)
OpenMCL рдкрд░ ASDF рдбрд╛рдЙрдирд▓реЛрдб рдХрд░рдиреЗ рдХреЗ рд▓рд┐рдП, рд▓реЗрдХрд┐рди LispWorks рдкрд░ рдирд╣реАрдВред
рдХреБрдЫ рд╡рд┐рддрд░рдг
REQUIRE
рдХреЛ рдХреЙрдиреНрдлрд╝рд┐рдЧрд░ рдХрд░рдиреЗ рдХреЗ рд▓рд┐рдП
рд╣реБрдХ рдХреА рдкреЗрд╢рдХрд╢ рдХрд░рддреЗ рд╣реИрдВ, рдФрд░
рд╕рд╛рдорд╛рдиреНрдп-рд▓рд┐рд╕реНрдк-рдирд┐рдпрдВрддреНрд░рдХ рдЬреИрд╕реЗ рдПрдХреНрд╕рдЯреЗрдВрд╢рди рд╣реЛрддреЗ рд╣реИрдВ рдЬреЛ REQUIRE рдХреЛ ASDF рд╕реЗ рдЬреЛрдбрд╝рддреЗ рд╣реИрдВ, рд▓реЗрдХрд┐рди рд╕рд╛рдорд╛рдиреНрдп рддреМрд░ рдкрд░, рдПрдХ рдореЙрдбреНрдпреВрд▓ рдРрд╕рд╛ рдХреБрдЫ рд╣реИ рдЬреЛ рдХрд╛рд░реНрдпрд╛рдиреНрд╡рдпрди-рд╡рд┐рд╢рд┐рд╖реНрдЯ рд╣реИ рдФрд░ рд╕рд┐рд╕реНрдЯрдо (ASDF) рдХреЗ рд╕рд╛рде рднреНрд░рдорд┐рдд рдирд╣реАрдВ рд╣реЛрдирд╛ рдЪрд╛рд╣рд┐рдП, рдФрд░ , рдЦрд╛рд╕рдХрд░ рдкреИрдХреЗрдЬ рдХреЗ рд╕рд╛рдеред
рдкреБрд╕реНрддрдХрд╛рд▓рдпреЛрдВ
рд╕рдмрд╕реЗ рдЕрдзрд┐рдХ рд╕рдВрднрд╛рд╡рдирд╛ рд╣реИ рдХрд┐ рдЖрдкрдХреЛ рд╕реНрдкрд╖реНрдЯ рдкрд░рд┐рднрд╛рд╖рд╛ рдирд╣реАрдВ рдорд┐рд▓реЗрдЧреА рдХрд┐ рдкреБрд╕реНрддрдХрд╛рд▓рдп рдХреНрдпрд╛ рд╣реИред рдЕрдзрд┐рдХрд╛рдВрд╢ рд▓реЛрдЧ рдЗрд╕реЗ рдПрдХ рдпрд╛ рдЕрдзрд┐рдХ рд╡рд┐рд╢рд┐рд╖реНрдЯ рдХрд╛рд░реНрдпреЛрдВ рдХреЛ рдХрд░рдиреЗ рдХреЗ рд▓рд┐рдП рдбрд┐рдЬрд╝рд╛рдЗрди рдХрд┐рдП рдЧрдП рдХреЛрдб рдХреЗ рд╕рдВрдЧреНрд░рд╣ рдХреЗ рд░реВрдк рдореЗрдВ рд╕реЛрдЪрддреЗ рд╣реИрдВ рдФрд░ рдПрдХ рдкреВрд░реЗ рдХреЗ рд░реВрдк рдореЗрдВ рд╡рд┐рддрд░рд┐рдд рдХрд┐рдпрд╛ рдЬрд╛рддрд╛ рд╣реИ, рдЖрдорддреМрд░ рдкрд░ рдПрдХ рд╕рдВрдкреАрдбрд╝рд┐рдд рд╕рдВрдЧреНрд░рд╣ рдХреЗ рд░реВрдк рдореЗрдВ рдЬрд┐рд╕реЗ рдХрд╣реАрдВ рд╕реЗ рдбрд╛рдЙрдирд▓реЛрдб рдХрд┐рдпрд╛ рдЬрд╛ рд╕рдХрддрд╛ рд╣реИред рд╡рд╛рд╕реНрддрд╡ рдореЗрдВ, рдпрд╣ рдЕрд╕реНрдкрд╖реНрдЯ рдкрд░рд┐рднрд╛рд╖рд╛ рд╣реИ, рдореБрдЭреЗ рд▓рдЧрддрд╛ рд╣реИ, рд▓рд┐рд╕реНрдк рдореЗрдВ рд▓рд┐рдЦреЗ рдЧрдП рдХрд╛рд░реНрдпрдХреНрд░рдореЛрдВ рдХреЗ рдмрд╛рд░реЗ рдореЗрдВ рдмрд╛рдд рдХрд░рддреЗ рд╕рдордп рд╕рдмрд╕реЗ рдЙрдкрдпреБрдХреНрддред рдЕрдзрд┐рдХрд╛рдВрд╢ рд▓рд┐рд╕реНрдк рдкреБрд╕реНрддрдХрд╛рд▓рдпреЛрдВ рдореЗрдВ рдЖрдЬ рдПрдХ рдкреНрд░рдгрд╛рд▓реА рдкрд░рд┐рднрд╛рд╖рд╛ (рдПрдПрд╕рдбреАрдПрдл) рд╢рд╛рдорд┐рд▓ рд╣реИ, рд▓реЗрдХрд┐рди рдпрд╣ рдЖрд╡рд╢реНрдпрдХ рдирд╣реАрдВ рд╣реИред рд╢рд╛рдпрдж, рдкреНрд░рд╛рдкреНрдд рдХрд░рдиреЗ рдХреА рд╡рд┐рдзрд┐ рдХреЗ рдЖрдзрд╛рд░ рдкрд░, рдпрд╣ рдЖрдкрдХреЗ рд▓рд┐рд╕реНрдк-рд╕рд┐рд╕реНрдЯрдо рдореЗрдВ рдПрдХ рдореЙрдбреНрдпреВрд▓ рд╣реЛрдЧрд╛, рд▓реЗрдХрд┐рди рдпрд╣ рднреА рдЖрд╡рд╢реНрдпрдХ рдирд╣реАрдВ рд╣реИред рдЗрд╕рдХреЗ рдЕрддрд┐рд░рд┐рдХреНрдд, рдПрдХ рдкреБрд╕реНрддрдХрд╛рд▓рдп рдЖрдорддреМрд░ рдкрд░ рдПрдХ рдпрд╛ рдЕрдзрд┐рдХ рдкреИрдХреЗрдЬреЛрдВ рдХреЛ рдкрд░рд┐рднрд╛рд╖рд┐рдд рдХрд░рддрд╛ рд╣реИ, рдпрд╛ рдпрд╣ рдХрд┐рд╕реА рдХреЛ рдкрд░рд┐рднрд╛рд╖рд┐рдд рдирд╣реАрдВ рдХрд░ рд╕рдХрддрд╛ рд╣реИред
рдФрд░, рд╕рдордЭреМрддреЗ рд╕реЗ, рдпрд╛ рд╢рд╛рдпрдж рдХрд▓реНрдкрдирд╛ рдХреА рдХрдореА рдХреЗ рдХрд╛рд░рдг, рдПрдХ рд╕реНрдерд┐рддрд┐ рдЙрддреНрдкрдиреНрди рд╣реЛ рд╕рдХрддреА рд╣реИ рдФрд░ рдЕрдХреНрд╕рд░ рд╡рд┐рдХрд╕рд┐рдд рд╣реЛрддреА рд╣реИ рдЬрдм рдХреЗрдпреВ рд▓рд╛рдЗрдмреНрд░реЗрд░реА рдХреЗрдпреВ рд╕рд┐рд╕реНрдЯрдо рдХреА рдкрд░рд┐рднрд╛рд╖рд╛ рдХреЗ рд╕рд╛рде рдЖрддреА рд╣реИ, рдЬрд┐рд╕реЗ рдХреЗрдпреВ рдореЙрдбреНрдпреВрд▓ рдХреЗ рд░реВрдк рдореЗрдВ рдбрд╛рдЙрдирд▓реЛрдб рдХрд┐рдпрд╛ рдЬрд╛ рд╕рдХрддрд╛ рд╣реИред рдХреЛрдб рдбрд╛рдЙрдирд▓реЛрдб рдХрд░рдиреЗ рдХреЗ рдмрд╛рдж, "рдХреВ" рдирд╛рдордХ рдПрдХ рдирдпрд╛ рдкреИрдХреЗрдЬ рдкреНрд░рд╛рдкреНрдд рдХрд░реЗрдВред рдПрдХ рд╣реА рдирд╛рдо рдХреЗ рд╕рд╛рде рдЪрд╛рд░ рдЕрд▓рдЧ-рдЕрд▓рдЧ рд╕рдВрд╕реНрдерд╛рдПрдБ! рдореИрдВ рдорд╛рдирддрд╛ рд╣реВрдВ рдХрд┐ рдпрд╣ рднреНрд░рд╛рдордХ рд╣реИ, рд▓реЗрдХрд┐рди рдореБрдЭреЗ рдЙрдореНрдореАрдж рд╣реИ рдХрд┐ рдкрд┐рдЫрд▓реЗ рдХреБрдЫ рдкреИрд░рд╛рдЧреНрд░рд╛рдлреЛрдВ рдиреЗ рд╕реНрдерд┐рддрд┐ рдХреЛ рдереЛрдбрд╝рд╛ рд╕реНрдкрд╖реНрдЯ рдХрд░рдиреЗ рдореЗрдВ рдорджрдж рдХреА рд╣реИред
рд▓реЗрдХрд┐рди рдореЗрд░реЗ рд▓рд┐рдП рдЕрднреА рднреА рдХреБрдЫ рднреА рдХрд╛рдо рдирд╣реАрдВ рдХрд░рддрд╛ рд╣реИ!
рдЕрдХреНрд╕рд░ рд▓реЛрдЧ рд╢рд┐рдХрд╛рдпрдд рдХрд░рддреЗ рд╣реИрдВ рдХрд┐ рд╡реЗ рдЗрд╕ рддрд░рд╣ рдХреЗ рдХреЛрдб рд╡рд╛рд▓реА рдлрд╛рдЗрд▓ рдХреЛ рд╕рдВрдХрд▓рд┐рдд рдирд╣реАрдВ рдХрд░ рд╕рдХрддреЗ рд╣реИрдВ:
рдРрд╕рд╛ рдХреНрдпреЛрдВ? рдореИрдВ рдЗрд╕ рдлрд╝рд╛рдЗрд▓ рдХреЛ рдХреНрдпреЛрдВ рдбрд╛рдЙрдирд▓реЛрдб рдХрд░ рд╕рдХрддрд╛ рд╣реВрдВ, рд▓реЗрдХрд┐рди рдЗрд╕реЗ рд╕рдВрдХрд▓рд┐рдд рдирд╣реАрдВ рдХрд░ рд╕рдХрддрд╛? рдФрд░ рд▓реЛрдб рдХрд░рдиреЗ рдХреЗ рдмрд╛рдж рдореИрдВ рдЗрд╕реЗ рдХреНрдпреЛрдВ рд╕рдВрдХрд▓рд┐рдд рдХрд░ рд╕рдХрддрд╛ рд╣реВрдВ? рдХреНрдпрд╛ рдпрд╣ рдЕрдЬреАрдм рдирд╣реАрдВ рд╣реИ?
рдирд╣реАрдВ, рдЕрдЬреАрдм рдирд╣реАрдВ рд╣реИред рдХрдВрдкрд╛рдЗрд▓рд░ рдкрд╣рд▓реЗ рдлреЙрд░реНрдо рдХреЛ рдкрдврд╝рддрд╛ рд╣реИ (рдЬреЛ рд╕рдВрдХрд▓рд┐рдд рдХрд░рдиреЗ рдХреЗ рд▓рд┐рдП рдПрдХ рдирд┐рд░реНрджреЗрд╢ рд╣реИ - рдпрджрд┐ рдЖрд╡рд╢реНрдпрдХ рд╣реЛ - рдФрд░ CL-PPCRE рд╕рд┐рд╕реНрдЯрдо рдХреЛ рд▓реЛрдб рдХрд░реЗрдВ, рд▓реЗрдХрд┐рди рдЗрд╕реЗ рдирд┐рд╖реНрдкрд╛рджрд┐рдд рди рдХрд░реЗрдВред рдЕрдВрдд рдореЗрдВ, рдХрдВрдкрд╛рдЗрд▓рд░ рдХреЛ рдХреЗрд╡рд▓ рдХреЛрдб рдХреЛ рд╕рдВрдХрд▓рд┐рдд рдХрд░рдиреЗ рдореЗрдВ рд░реБрдЪрд┐ рд╣реИред рдкрд╣рд▓реЗ рдлреЙрд░реНрдо рдХреЛ рдирд┐рд╖реНрдкрд╛рджрд┐рдд рдХрд░рдиреЗ рдХреЗ рдмрд╛рдж, рд╡рд╣ рджреВрд╕рд░реЗ рд░реВрдк рдореЗрдВ рдХрд╛рд░реНрдп рдХрд░рддрд╛ рд╣реИ, рдлрд╝рдВрдХреНрд╢рди рдХреА рдкрд░рд┐рднрд╛рд╖рд╛ рдХреЗ рд▓рд┐рдПред рдпрд╣рд╛рдВ рдПрдХ рддреНрд░реБрдЯрд┐ рд╕рдВрджреЗрд╢ рд╕рдВрднрд╡ рд╣реИ, рдХреНрдпреЛрдВрдХрд┐ рдЗрд╕ рдлреЙрд░реНрдо рдХреЛ рдкрдврд╝рдиреЗ рдХреА рдХреЛрд╢рд┐рд╢ рдХрд░рдиреЗ рд╡рд╛рд▓рд╛ рдПрдХ рд▓рд┐рд╕реНрдк рд╕реНрдХреИрдирд░ "рд╕реАрдПрд▓-рдкреАрдкреАрд╕реАрдЖрд░рдИ: рд╕реНрдХреИрди" рд╡рд░реНрдгреЛрдВ рдХреЗ рдЕрдиреБрдХреНрд░рдо рдХрд╛ рдкрддрд╛ рд▓рдЧрд╛рдПрдЧрд╛, рдЬрд┐рд╕реЗ рд╕реАрдПрд▓-рдкреАрдкреАрд╕реАрдЖрд░рдИ рдкреИрдХреЗрдЬ рд╕реЗ
рдПрдХ рдмрд╛рд╣рд░реА рдЪрд░рд┐рддреНрд░ рдХрд╛ рд╕рдВрдХреЗрдд рджреЗрдирд╛ рдЪрд╛рд╣рд┐рдП, рд▓реЗрдХрд┐рди рд╕реАрдПрд▓-рдкреАрдкреАрд╕реАрдЖрд░рдИ рдкреИрдХреЗрдЬ рдЕрднреА рддрдХ рдореМрдЬреВрдж рдирд╣реАрдВ рд╣реИред рд╕рд┐рд╕реНрдЯрдо рдмреВрдЯ CL-PPCRE, рдЕрдиреНрдп рдмрд╛рддреЛрдВ рдХреЗ рдЕрд▓рд╛рд╡рд╛, CL-PPCRE рдкреИрдХреЗрдЬ рдмрдирд╛рдпрд╛ рдЬрд╛ рд░рд╣рд╛ рд╣реИ, рд▓реЗрдХрд┐рди рдпрд╣ рдЕрднреА рддрдХ рдирд╣реАрдВ рд╣реБрдЖ рд╣реИред CLHS рдХреЗ
рдЕрдзреНрдпрд╛рдп 3 рдХреЛ рдкрдврд╝реЗрдВред
рдЖрдк рджреВрд╕рд░реЗ рдлреЙрд░реНрдо рдХреЛ рдкрдврд╝рдиреЗ рд╕реЗ рдкрд╣рд▓реЗ CL-PPCRE рд▓реЛрдб рдХрд░рдиреЗ рдХреЗ рд▓рд┐рдП рдХрдВрдкрд╛рдЗрд▓рд░ рдХреЛ рдмрддрд╛рдиреЗ рдХреЗ рд▓рд┐рдП
EVAL-WHEN
рдХрд╛ рдЙрдкрдпреЛрдЧ рдХрд░ рд╕рдХрддреЗ рд╣реИрдВред рд╣рд╛рд▓рд╛рдБрдХрд┐, рдЖрдкрдХреЛ рдЕрдкрдирд╛ рдХреЛрдб рд╡реНрдпрд╡рд╕реНрдерд┐рдд рдХрд░рдиреЗ рдХрд╛ рджреВрд╕рд░рд╛ рддрд░реАрдХрд╛ рдЦреЛрдЬрдирд╛ рдЪрд╛рд╣рд┐рдПред рдкрд╣рд▓рд╛ рдлрд╝реЙрд░реНрдо рдХреЗрд╡рд▓ рдпрд╣ рдШреЛрд╖рдгрд╛ рдХрд░ рд░рд╣рд╛ рд╣реИ рдХрд┐ рдЖрдкрдХрд╛ рдХреЛрдб CL-PPCRE рд╕рд┐рд╕реНрдЯрдо рдкрд░ рдирд┐рд░реНрднрд░ рдХрд░рддрд╛ рд╣реИред рдпрд╣ рд▓рд┐рд╕реНрдк рдХреЛрдб рдХреЗ рд╕рдорд╛рди рдлрд╝рд╛рдЗрд▓ рдореЗрдВ рдирд╣реАрдВ рд╣реЛрдирд╛ рдЪрд╛рд╣рд┐рдПред рдЕрдкрдиреЗ рдХрд╛рд░реНрдпрдХреНрд░рдо рдХреЗ рд▓рд┐рдП
рдПрдХ рд╕рд┐рд╕реНрдЯрдо рдкрд░рд┐рднрд╛рд╖рд╛ рд▓рд┐рдЦреЗрдВ рдФрд░ рд╡рд╣рд╛рдВ рдирд┐рд░реНрднрд░рддрд╛рдПрдВ рдбрд╛рд▓реЗрдВред