web-archive-net.com » NET » M » MAZAMA.NET

Total: 124

Choose link from "Titles, links and description words view":

Or switch to "Titles and links view".
  • Pocket Scheme Language Reference
    m c l o s e d o c t e t s t r e a m n o t a n i n p u t o c t e t s t r e a m n o t a n o u t p u t p o r t c l o s e d p o r t n o t a n i n p u t p o r t 0 H t r u n c a t e i f e x i s t s a p p e n d i f e x i s t s e r r o r i f e x i s t s u p d a t e m u s t e x i s t i n p u t o u t p u t n o t a r a w f i l e c o u l d n t a p p e n d c o u l d n t t r u n c a t e u n k n o w n o u t p u t f i l e m o d e t o o m a n y o u t p u t f i l e b u f f e r s i z e s t o o m a n y o u t p u t f i l e m o d e s u n k n o w n o u t p u t f i l e o p t i o n c a n t s e t p o s i t i o n o n a p p e n d m o d e f i l e c o u l d n o t o p e n c o u l d n t g e t p o s i t i o n c o u l d n t s e t p o s i t i o n o f f s e t i n t o f i l e t o o l a r g e u n k n o w n c l o s e d f i l e t f x 0 4 x x 0 2 x c n e w l i n e s p a c e D O n e x t i t e r a t i o n i n v a l i d r a d i x f o r i n e x a c t n u m b e r i n v a l i d r a d i x l o l X l d 0 g q u a s i q u o t e u n q u o t e u n q u o t e s p l i c i n g u n r e c o g n i z e d l i t e r a l s y n t a x e i d b x o E I D B X O E n d o f f i l e w i t h i n c h a r a c t e r l i t e r a l u n r e c o g n i z e d c h a r a c t e r l i t e r a l n e w l i n e s p a c e E n d o f f i l e w i t h i n s t r i n g l i t e r a l E e S s F f D d L l m i s p l a c e d d o t i n l i s t u n q u o t e o r u n q u o t e s p l i c i n g n o t i n q u a s i q u o t e t e m p l a t e U n e x p e c t e d r i g h t p a r e n t h e s i s U n e x p e c t e d e n d o f f i l e b u f f e r o v e r f l o w s t r i n g o r s y m b o l t o o l o n g i n v a l i d n u m e r i c l i t e r a l s t r i n g n u m b e r i n v a l i d b a s e m i s s i n g c l o s i n g p a r e n t h e s i s a t e n d o f l i s t d e f a u l t e x c e p t i o n h a n d l e r U n h a n d l e d e x c e p t i o n i n p u t o u t p u t e x n i o e x n u s e r a c c e s s v i o l a t i o n o r d a t a m i s a l i g n m e n t f a i l e d t o a l l o c a t e s t o r a g e f r o m s y s t e m e x n h e a p u s e r i n t e r r u p t e x n b r e a k f a i l e d t o r e s e t t o t o p l e v e l c o u l d n o t u n w i n d d y n a m i c s t a t e E R R O R C R I T I C A L E R R O R E R R O R p r e b o o t F A T A L E R R O R d u r i n g c r i t i c a l c o d e s e c t i o n n o t a p r o c e d u r e o f o n e a r g u m e n t e x n s y s t e m w a r n i n g n o d i r e c t o r y c o u l d n o t l o a d f i l e n o t a P o c k e t S c h e m e e x t e n s i o n i n i t p s c h e m e e x t c o u l d n o t l o a d P o c k e t S c h e m e e x t e n s i o n m o d u l e s c a r c d r c a d r v e c t o r l i s t a p p e n d n o t n u l l e q z e r o p a i r v e c t o r d y n a m i c w i n d e r r o r c a l l e c c u r r e n t e x c e p t i o n h a n d l e r r a i s e o r a n d d o c o n d c a s e d e l a y w i t h h a n d l e r s t r a c e c o n s s e t c a r s e t c d r e q v e q u a l e v a l c a l l c c define call with current continuation call cc s t r i n g s y m b o l s y m b o l s t r i n g p r o c e d u r e b o o l e a n s y m b o l r e a d w r i t e d i s p l a y n u m b e r s t r i n g s t r i n g n u m b e r e o f o b j e c t c u r r e n t i n p u t p o r t c u r r e n t o u t p u t p o r t m i n m a x a b s s q r t e x p t e x p l o g s i n c o s t a n a s i n a c o s a t a n i n e x a c t i n e x a c t e x a c t p o s i t i v e n e g a t i v e o d d e v e n q u o t i e n t m o d u l o r e m a i n d e r g c d l c m f l o o r c e i l i n g t r u n c a t e r o u n d n u m e r a t o r d e n o m i n a t o r l i s t l e n g t h c a a r c d a r c d d r c a a a r c a a d r c a d a r c a d d r c d a a r c d a d r c d d a r c d d d r c a a a a r c a a a d r c a a d a r c a a d d r c a d a a r c a d a d r c a d d a r c a d d d r c d a a a r c d a a d r c d a d a r c d a d d r c d d a a r c d d a d r c d d d a r c d d d d r m e m q m e m v m e m b e r a s s o c a s s v a s s q l i s t r e f l i s t t a i l r e v e r s e c h a r c h a r c h a r c h a r c h a r c i c h a r c i c h a r c i c h a r a l p h a b e t i c c h a r n u m e r i c c h a r w h i t e s p a c e c h a r u p p e r c a s e v c h a r l o w e r c a s e c h a r i n t e g e r i n t e g e r c h a r c h a r u p c a s e c h a r d o w n c a s e m a k e s t r i n g s t r i n g l i s t s t r i n g s t r i n g r e f s t r i n g s e t s u b s t r i n g s t r i n g s t r i n g a p p e n d s t r i n g l e n g t h s t r i n g s t r i n g s t r i n g s t r i n g c i s t r i n g c i s t r i n g c i s t r i n g l i s t s t r i n g c o p y s t r i n g f i l l m a k e v e c t o r v e c t o r l i s t v e c t o r v e c t o r r e f v e c t o r s e t v e c t o r l e n g t h v e c t o r f i l l m a p f o r e a c h f o r c e c o o k i n p u t c o o k o u t p u t c l o s e i n p u t p o r t c l o s e o u t p u t p o r t i n p u t p o r t o u t p u t p o r t l o a d define call with escape continuation call ec w i t h f i x e d s y s t e m s t a c k g e n s y m q u i t r e s e t c u r r e n t e r r o r p o r t o p e n i n p u t s t r i n g o p e n o u t p u t s t r i n g g e t o u t p u t s t r i n g o p e n i n p u t r a w v e c t o r o p e n o u t p u t r a w v e c t o r o p e n o u t p u t r a w v e c t o r g e t o u t p u t r a w v e c t o r m a k e i n p u t p o r t m a k e o u t p u t p o r t m a k e i n p u t o c t e t s o u r c e m a k e o u t p u t o c t e t s i n k l o a d o n c e f i n d l i b r a r y f i l e l i b r a r y d i r e c t o r y i n s t a l l d i r e c t o r y a s h b i t a n d b i t o r b i t x o r b i t n o t m a k e l i s t a p p e n d 2 a p p e n d r e v e r s e b u t l a s t l a s t s t r i n g b r e a k u p s t r i n g u n b r e a k u p r e a d s t r i n g r e a d s t r i n g r e a d l i n e w r i t e s t r i n g m a k e r a w v e c t o r r a w v e c t o r r a w v e c t o r t y p e r a w v e c t o r l e n g t h r a w v e c t o r r e f r a w v e c t o r s e t c u r r e n t d i r e c t o r y c r e a t e d i r e c t o r y d e l e t e d i r e c t o r y d i r e c t o r y l i s t c o p y f i l e m o v e f i l e d e l e t e f i l e s l e e p s y s t e m s y s t e m w a i t e x i t c u r r e n t m i l l i s e c o n d s r a w i n p u t s o u r c e r a w o u t p u t s i n k c l o s e r a w i n p u t s o u r c e c l o s e r a w o u t p u t s i n k o p e n r a w i n p u t f i l e o p e n r a w o u t p u t f i l e f i l e e x i s t s d i r e c t o r y e x i s t s f i l e p o s i t i o n f i l e b u f f e r s i z e c o o k c h a r e n c o d i n g c o o k n e w l i n e e n c o d i n g r e a d r a w n u m b e r w r i t e r a w n u m b e r r e a d r a w i e e e 7 5 4 w r i t e r a w i e e e 7 5 4 r e a d r a w n u m b e r b l o c k r e a d r a w i e e e 7 5 4 b l o c k r e a d r a w n u m b e r b l o c k w r i t e r a w n u m b e r b l o c k c h a r u n i c o d e u n i c o d e c h a r r e a d r a w s t r i n g w r i t e r a w s t r i n g r a w s t r i n g l e n g t h f o r e i g n f o r e i g n i n t e g e r i n t e g e r f o r e i g n f o r e i g n s t r i n g f o r e i g n r a w v e c t o r s t r i n g f o r e i g n r a w v e c t o r f o r e i g n u n t r a c e d e b u g h e a p i n f o g c g c r e s e t s t a t s g c s t a t s g c v e r b o s e v e r s i o n v o i d o b j e c t v o i d e r r o r w h i l e r e a d i n g d i r e c t o r y c a n n o t o p e n d i r e c t o r y n o a r c h i v e n o d i r e c t o r y n o h i d d e n n o r e a d o n l y n o s y s t e m c a n n o t m o v e f i l e c a n n o t c o p y f i l e c a n n o t d e l e t e f i l e 0 3 l u l u c a n n o t d e l e t e d i r e c t o r y c a n n o t c r e a t e d i r e c t o r y c a n n o t s e t c u r r e n t d i r e c t o r y w 3 2 h o s t h w n d e x n w 3 2 f a i l e d t o a l l o c a t e h e a p f o r s t r i n g s a n d v e c t o r s f a i l e d t o a l l o c a t e h e a p f o r c o n t i n u a t i o n s f a i l e d t o a l l o c a t e h e a p f o r n o n f r e e a b l e s t o r a g e ÿÿÿÿ à Ì Ì H Ü H P È È è Ð è A ð A tA 4A A B A B 0B B 0B TB h à p à T è T Ø Ø ä B t B lE ÄB lE G xE G äJ G äJ L ôJ L N 4L N ÌN N ÌN O ÔN O 4O O 4O hO 0 8 H L P X h l p x ¼ À Ì Ð Ô Ø à ä è ô ø ü 0 4 D H L X l p x ¼ È Ì Ü à ð ô ø ü 0 8 H P T h l t x ¼ À È Ô Ø à ì ð ø 4 8 D L P X d p t ¼ Ä È Ð Ô Ü à è ì ô ø 0 0 0 0 0 0 0 00040 4 8 L P d p t x À Ä È Ô Ø Ü è ì ð ü 8 8 L P T d h t x Ä È Ì Ø Ü à ì ð ô 0 0 D P T X d h l x ¼ È Ì Ð Ü à ä ð ô ø 0 4 D H T X h l p ¼ À Ì Ð Ô à ä è ô ø ü Ø 0 0 0 0 0 0004080D0H0L0X0 0 0l0p0t0 0 0 0 0 0 0 0 0 0¼0À0Ä0Ð0Ô0Ø0ä0è0ì0ø0ü0 1 1 1 1 1 1 14181 0 4 D H T X h l p ¼ À Ì Ð Ô à ä è ô ø ü 0 4 8 D H L X l p t ¼ À Ä Ð Ô Ø ä è ì ø ü À 0 0 0 0 0 0 04080 Language Reference Pocket Scheme abides by the R4RS language standard It extends the base language with richer control structures additional intrinsic procedures in core domains such as I O and a number of optionally loaded extension libraries for application specific domains such as networking Topics Standards compliance Control structures Intrinsic procedures Extension libraries Standards compliance R4RS Pocket Scheme follows the standard specified in R4RS with the following caveats Supports only a subset of the full Scheme tower of numerical types Pocket Scheme does not support complex numbers in either polar or rectangular notation All inexact values use an internal floating point representation of limited precision and arithmetical accuracy Does not support the macro facility specified in the appendix to the Report Pocket Scheme instead supports the Gambit define macro syntax The following optional R4RS procedures are not supported in Pocket Scheme make rectangular make polar real part imag part magnitude angle transcript on transcript off R5RS Pocket Scheme does not abide by R5RS for want of standard macros multiple return values and standard environments Note that Pocket Scheme does support the R5RS dynamic wind and eval procedures though it doesn t support the R5RS notion of environments and uses the R5RS definition of call with current continuation For completeness here are the unsupported R5RS procedures define syntax let syntax letrec syntax syntax rules values call with values scheme report environment null environment interaction environment Up Next Control structures Pocket Scheme extends the standard Scheme control mechanisms in two ways an additional flavor of continuation and an exception handling mechanism Topics Continuations Exceptions Up Next Continuations In addition to the conventional Scheme reentrant continuations Pocket Scheme also supports a cheaper weaker flavor of continuation the escape continuations of Rice University s MzScheme implementation An escape continuation also known as a weak continuation is valid only for the duration of its dynamic extent and can be used only to escape to the context of its creation Escape continuations are much cheaper to create than regular reentrant continuations To bind an escape continuation use the call with escape continuation function abbreviated call ec in just the fashion that you would use call cc See also Up Next Exception handling Pocket Scheme implements the Friedman Haynes Dybvig exception handling proposal of 4 September 1995 Q v http www cs indiana edu scheme repository doc proposals exceptions html For more information on the procedures raise and current exception handler and the syntactic form with handlers go here Exception structure By convention Pocket Scheme uses cons structures as exception values The car of the cons cell is a symbol differentiating the type of exception while the cdr is a value specific to the type of exception Exception types Type Description exn io I O error cadr exn is a description cddr exn typically either the port on which the exception arose or an integer error code exn read Unrecognized character name mismatched parentheses etc cadr exn is a description cddr exn an object exn eval Raised by the evaluator typically in response to a syntax error cadr exn is a description cddr exn an object exn type Wrong type passed to a procedure cadr exn is a description cddr exn an object exn range Type was correct but the value was out of the valid range cadr exn is a description cddr exn an object exn math Division by zero etc cadr exn is a description cddr exn the number exn heap A recoverable memory panic exn system An access violation or datatype misalignment cadr exn is the numeric exception code from the system exn user User code call to the error procedure cdr exn is the list of parameters passed to the procedure exn break The user selected Scheme Break from the UI Extension libraries may define their own exception types as well Example The following two equivalent expressions demonstrate the use of call ec and with handlers Each expression prints Start then returns the value 2 call ec lambda k display Start newline k 2 display Later newline 1 with handlers lambda x eq car x two lambda x 2 lambda x eq car x four lambda x 4 display Start newline raise cons two 1 Caveats The following expression looks tail recursive but isn t let loop with handlers lambda x t lambda x t do something loop Up Procedures intrinsic to Pocket Scheme Pocket Scheme supports all built in procedures of standard Scheme excluding only a few optional routines This document will not describe these standard procedures unless Pocket Scheme extends them in some fashion Topics Flow of control SRFI support Read eval Macros Debugging Memory management Loading programs External programs Files and directories Low level I O Text I O Soft ports Raw vectors Strings Numerics Foreigns List utilities Miscellaneous procedures Up Next Flow of control call with escape continuation proc value of proc Calls its argument passing that procedure the caller s continuation This continuation is valid only for the dynamic extent of the current call as contrasted to continuations captured by call with current continuation which have unlimited extent Abbreviation call ec See also raise exn void Invoke the current exception handler passing that handler its argument as the exception By convention exceptions are conses of a symbol and additional information See also current exception handler new handler procedure Called without an argument returns the current exception handler called with an argument installs that argument as the new exception handler An exception handler is an arity 1 procedure accepting an exception object See also with handlers pred proc body syntax Create an exception handler from the set of predicates and procedures then evaluate the expressions in the body in the extent of that handler The exception handler consists of cond style predicates and procedures See also dynamic wind before thunk thunk after thunk results of thunk Per R5RS default exception handler procedure Returns the system default exception handler See also with fixed system stack thunk results of thunk Executes a thunk while preventing the system stack from moving Necessary for Windows wndprocs and certain system calls reset void Return control to the top of the REPL Intended for use in exception handling procedures error argument void Raises an exception of type exn user quit void Ends the computation and closes the Pocket Scheme window exit code void Synonymous with quit Accepts an optional integer exit code which is currently ignored Up Next SRFI support Pocket Scheme supports the SRFI library standardization process with intrinsic support for SRFIs 0 6 and 23 For more information see http srfi schemers org SRFI 0 SRFI 0 is the availability SRFI a mechanism by which a program can conditionally make the use of optional features and libraries For more information see http srfi schemers org srfi 0 srfi 0 html cond expand feature code syntax For the purposes of expansion Pocket Scheme 1 2 natively proclaims the following features pocket scheme r4rs windows ce srfi 0 srfi 6 srfi 23 Features may be related with and or or not An else clause if present specifies a clause to take if no previous clause applies Think of this as a compile time cond form Example define userdll cond expand windows nt user32 dll windows ce coredll dll define kerneldll cond expand windows nt kernel32 dll windows ce coredll dll SRFI 6 SRFI 6 standardizes basic string ports For more information see http srfi schemers org srfi 6 srfi 6 html open input string string start end input port Open an input port on a string allowing Scheme I O from the string The optional parameters start and end not in SRFI 6 will restrict reads to the half open range specified by those indices as if substring was applied to the string open output string output port Create an output port that accumulates all text sent to it Use get output string to retrieve the saved data as a string get output string string port string Returns a string of all the data sent to an output string port Up Next REPL read eval print loop read port value Per R4RS For compatibility with existing bodies of Scheme code Pocket Scheme will force Latin 1 characters within read symbols to lowercase All other read characters will enter the symbol as given Whereas Pocket Scheme permits any printable Unicode character within a symbol only characters in the Latin 1 subset will be mapped to lowercase Nonprintable character literals use a syntax of hash backslash letter x x then one to four hexadecimal digits specifying the Unicode value of the character E g a tab control character is x9 while the Hebrew yod is x5D9 To remain portable to standard Scheme use the integer char function instead Pocket Scheme supports the reader macro of Common Lisp Be careful using it on a macro or on any form implemented by Pocket Scheme with a macro eval expression value Evaluates an expression in the top level i e global environment Note that Pocket Scheme does not support the R5RS environment parameter to eval current input port port input port Returns the default port for input procedures Reads from this port will prompt the user for text input The optional parameter if supplied specifies a new default input port current output port port output port Returns the default port for output procedures Writes to this port will appear on the user s console The optional parameter if supplied specifies a new default output port current error port port output port Returns the default port for diagnostic output Writes to this port will appear on the user s console in a font that differentiates the output from standard output The optional parameter if supplied specifies a new default error port When user code redirects its output through procedures such as with output to file Pocket Scheme will continue to send its diagnostics to the output window unless the user code also redirects the error port Up Next Macros define macro lambda list macro body syntax Defines a macro using the Gambit Scheme syntax Here s a simple example define macro letcc c body call cc lambda c body Macro definitions must appear at the topmost level and are not hygienic Use gensym where appropriate Pocket Scheme does not support the official R5RS macro syntax Yet gensym symbol Returns a unique symbol that can never be returned by any call to read or string symbol Up Next Debugging debug enabled Boolean Enables

    Original URL path: http://www.mazama.net/scheme/v12/pscheme.HPC2_MIPS.cab (2016-04-30)
    Open archived version from archive

  • Pocket Scheme Language Reference
    ì ø ª ü d dGÒ B dDÒ b 4 Oð KÐ å Ñ æ ç d O Oð 8Ø a 2 å Ð ä æ E 8Ð9Ô å8Ð å æ ä Ó Ñ a 1Ð3Ô å1Ð å æ ä Ó Ñ a Ð Ô å Ø c8 Ð O öh OChð ÔBdH Ò d Ð f å h Ð O öh OCeð Ð æ ä ç F h Ð Ò O öh X a d h l p t a tA a à 4 ¼a Èa x Æ OChSlð Ãk j â B é I³i æpÐ d e ç F mÐ Ò d e Oöi öh OCeð 8ÑÚ d O Oð Û h2Ð O öh Oð â O OCeð Ñ d h Ð O öh OCeð Ñ d O OCeð Ñq d h Ð O öh OCeð Ñ d O Oð O Oð O Ôa a àa l p t a tA J Èa Oð Ð Ø d Ð e O öh OChð Ù á d 4 Ð 0 b R j Y j Y â 9 Ð d 0õ R Oöjöi öh Oð Ð Ñ e d â 4 àCP O OCeð ÐxÔ O OChð pÐ i d á H É e e e dhÓ1c3 H É d dOcaÑ a 3 Æ d Oöi öh OShð á 4 bÐZÓ 2d CiUÐ d i ã09 NÐ d e dñ Qà Oöi öh OChð á H É e e H É d dOb Ó1c02 d â t d O öh Oð á 4 3Ó á2d 4 4Ð h d ã3 ñ Ð4Ô Ch Ð d h á 8 Ð d dò Qà O öh OChð Ð T P O öh OChSið Ð Õ d Ð e Q T å Ð d Ð e R T Ð å d Oöi öh ì ä x ÐU P èC ðO èA ì ø Æ OChSlà BÛо Õ j3Ð æ ²d4вe d Ãi0Ð d i â 9 1Ð å ²d Ð d d Ð ²eì Ð ²d à d eD U e dV G äù Ðü4 Ãe Õ i Ð æ ²d вe d Ð å ²d вe d Ð ²d Oölököjöi öh Oð Ð Ø d Ð Õ Ð Ô O öh x LP ÐU U à ðO L T üí T OShð H ºÔ dÆÐ d C ÂÐ ÀÐ Ô j½Ð i Ð d f Ð e d d Ð Oöjöi öh Oð Ð æ Ô å O Oð Ð æ Ô å O OShð Ð e ÐªÔ f O öh Ochð X Õ e Ð Ô f O öh OShð Ð Aá 8 i ¾ Ð Ô e Ð d dvÐ i èvÐ f Ô e Oöi öh OShð Ð emÐzÔ f O öh OShð yÐ eeÐxÔ f O öh OShð qÐ e ÐvÔ f O öh Ochð X TÕ3 eTÐmÔ f O öh OShð Ð eLÐOÔ f O öh OCeð NÔ O OCeð MÔz O OCeð KÔp O OCeð IÔf O OCeð JÔ O OCeð IÔR O OCeð EÔH O OCeð Ô O Oð Ô5 å O OCeð Ô O OCeð Ô O OCeð Ô O OCeð Ôê¾ O Oð Ô å O Ð i гd e f ÐÃe f dÿ d³f g Ãe Ð e f ³d Ð e f d Oölököjöi öhÐK E ÀE F 0F xF F ¼F ìF G G ÜG H I OChð åRÐ æ 5 i â H T HKÐ H f å t S á Oöi öh OCeð STRUÿu Ð t O OChð ê jÅ d i T f U u1Ð t S R2c2 Oöjöi öh OChð Ú R Q b b O öh OChð Ê URe E d eCSC R O öh OChSið W VrebdG5 äW4 ÿä E U wsdÿu v W E v Ucd wsf Wÿu Ð ÿw d äC Oöi öhÐK ÀE F D ä Æ Ö OChSiì f dc k T VBabb 1E l гe vÃg t d â 2 í¼ Ód 0 j T U u гf t T t V v Ð áÓeÃg S R íÌ Ód j TÃf U upÐ t T t V vnÐ áÓe³g R S2c2 E fгe vÃg t d á 1 å¾ ä3 já¾³d j T³f U uYÐ t T t V vXÐ á³eÃg S RȾÃd j T U uMÐÃf t T t V vKÐ áÃe³g R S2c2 Oömölököjöi öh OShð URa a L e URb b O öh Æ Ö OChSmè ª¾ Ód ¾ l kÃj¼ ¾ d iÓS s T V v Ð e4 Ãgµ t SÓQ2c a7 R 2 Oömölököjöi öh Æ Ö OG Sickè Q a àm¾ýT dj¾ m hÓd 4 t á 4 ä t 8E dÓd tCl6¾õTÃd3¾ j d y à ÌJ ÐK ÀE TG ÜG CTÓf ÐýS3U u t V v²ÐÃe²a g T t m T M Ð ½ l d ½ jÿ ÃdCa k AEÐ å l Tÿæ O Æ 6 U u Ð tà ôS O Æ Q a õ à à O öh OChð Þº dÿt D P pCc C õ t C à O öh OChð È KÐ dÿã TBb02 AR AP O öh OChð Ð d Rÿã Y b02 7Ò 9 9Ð d 2Ó69 5Ð d Oöi öh OChð Ð dÿã TBb02 Ð d TAP O öh æ OChSiì ónì d j á Ð d ã7 D ä Ðì4 ²U æ ÐáTâUD äU åì4 ü5 ÐáTâUD äU ì4 U ôQ åáR 1 ì5âQâc 34 ãTD 5 ÿÿÿ b ÄC lD b T l b b ä Ðì4 UáTâUD U ÿã²b02 Ç e Ð ä ü4 Ð d Ð å äì4 ü5áT âUB Q Ç e Ð ä ü4 Ð d ôTõUB Q âì2 B k j i h o ön æ OChSiä ónì æ¾ d j á xÐ d ã7 7 TÿãBb02 uÐ d T ttÐCi äì4 UsÐ æáTâUD äU åì4 ü5lÐáTâUD äU ì4 e åôQì5áR 1 âQâc 34 ãTD 5 ôTõUB Q ú¾ d e Ð ä ì4 åTæUB Q âì2 B j i h o ön æ OCiÜ ónì äD B e¹ d h Y d D ÿxQÇ ä öü4GÐIõ Hô å aì5 õ à õ 0Vd AReD U Ð 6Ð ä ì4 ô å ôü5Yõ ö Xô åì5 õ õVdReD Î U ÿâ a 1 ä2Ðü4Iõ Hô åì5 õ õVdReD U äü4HðütHñ âì2 B i h o ön OChð ¾ TÿãBeP3 âP2 AT Ò 4 Ð Kd AT Ó64 Ð Ð ä O öh ÿÿÿ symbol string append new symbol string name lambda new settings quote tags map lambda t define string symbol string append symbol string name symbol string t lambda struct get settings field struct quote t tags map lambda t define string symbol string append set symbol string name symbol string t lambda struct val set settings field struct quote t val tags let declare settings struct inopts name encoding name newline name pushback octets octet limit is owner declare settings struct outopts name encoding name newline name bom usage if exists is owner declare settings struct outstropts encoding name newline name bom usage start pos end pos define crack cook input source flags optflags let struct new inopts for each lambda keyword case keyword crlf newline lf newline if inopts newline name struct error Redundant newline settings optflags ucs 2 unicode ucs 2be ucs 2le if inopts encoding name struct error Redundant encodings optflags ascii system ansi latin 1 if inopts encoding name struct error Redundant encodings optflags case keyword crlf newline lf newline set inopts newline name struct keyword ucs 2 unicode set inopts encoding name struct ucs 2le ucs 2le ucs 2be ascii system ansi latin 1 set inopts encoding name struct keyword else error Unrecognized encoding keyword optflags struct define crack open output file flags optflags let struct new outopts for each lambda keyword case keyword crlf newline lf newline if outopts newline name struct error Redundant newline settings optflags append if exists truncate if exists error if exists if outopts if exists struct error Redundant file opening modes optflags emit bom suppress bom if outopts bom usage struct error Redundant BOM usage settings optflags if not memq outopts encoding name struct ucs 2 unicode ucs 2be ucs 2le f error BOM usage setting only valid for Unicode ucs 2 unicode ucs 2be ucs 2le if outopts encoding name struct error Redundant encodings optflags ascii system ansi latin 1 if outopts encoding name struct error Redundant encodings optflags if outopts bom usage struct error BOM usage setting only valid for Unicode case keyword crlf newline lf newline set outopts newline name struct keyword emit bom suppress bom set outopts bom usage struct keyword append if exists truncate if exists error if exists set outopts if exists struct keyword ucs 2 unicode set outopts encoding name struct ucs 2le ucs 2le ucs 2be ascii system ansi set outopts encoding name struct keyword else error Unrecognized encoding keyword optflags struct define crack cook output sink flags optflags let struct new outopts for each lambda keyword case keyword crlf newline lf newline if outopts newline name struct error Redundant newline settings optflags emit bom suppress bom if outopts bom usage struct error Redundant BOM usage settings optflags if not memq outopts encoding name struct ucs 2 unicode ucs 2be ucs 2le f error BOM usage setting only valid for Unicode ucs 2 unicode ucs 2be ucs 2le if outopts encoding name struct error Redundant encodings optflags ascii system ansi latin 1 if outopts encoding name struct error Redundant encodings optflags if outopts bom usage struct error BOM usage setting only valid for Unicode case keyword crlf newline lf newline set outopts newline name struct keyword emit bom suppress bom set outopts bom usage struct keyword ucs 2 unicode set outopts encoding name struct ucs 2le ucs 2le ucs 2be ascii system ansi latin 1 set outopts encoding name struct keyword else error Unrecognized encoding keyword optflags struct define crack raw string out flags optflags let struct new outstropts for each lambda keyword case keyword crlf newline lf newline if outstropts newline name struct error Redundant newline settings optflags emit bom suppress bom if outstropts bom usage struct error Redundant BOM usage settings optflags if not memq outstropts encoding name struct ucs 2 unicode ucs 2be ucs 2le f error BOM usage setting only valid for Unicode ucs 2 unicode ucs 2be ucs 2le if outstropts encoding name struct error Redundant encodings optflags ascii system ansi latin 1 if outstropts encoding name struct error Redundant encodings optflags if outstropts bom usage struct error BOM usage setting only valid for Unicode if number keyword cond not outstropts start pos struct set outstropts start pos struct keyword not outstropts end pos struct set outstropts end pos struct keyword else error Numeric argument beyond start end interval optflags case keyword crlf newline lf newline set outstropts newline name struct keyword emit bom suppress bom set outstropts bom usage struct keyword ucs 2 unicode set outstropts encoding name struct ucs 2le ucs 2le ucs 2be ascii system ansi latin 1 set outstropts encoding name struct keyword else error Unrecognized encoding keyword optflags struct define identify bom src let o1 read octet src cond eof object o1 eqv o1 xFE let o2 read octet src cond eof object o2 list o1 eqv o2 xFF ucs 2be else list o1 o2 eqv o1 xFF let o2 read octet src cond eof object o2 list o1 eqv o2 xFE ucs 2le else list o1 o2 else list o1 define emit bom snk encoding for each lambda o write octet o snk case encoding ucs 2be xFE xFF ucs 2le xFF xFE else define local open input file fname optflags let settings crack cook input source flags optflags src open raw input file fname 0 if memq inopts encoding name settings ucs 2be ucs 2le f let found identify bom src if symbol found set inopts encoding name settings found set inopts pushback octets settings found set inopts name settings fname set inopts is owner settings t if not inopts encoding name settings set inopts encoding name settings system ansi if not inopts newline name settings set inopts newline name settings crlf newline cook input src settings define local cook input source src octet limit optflags let settings crack cook input source flags optflags if memq inopts encoding name settings ucs 2be ucs 2le f let found identify bom src if symbol found set inopts encoding name settings found set inopts pushback octets settings found if not inopts encoding name settings set inopts encoding name settings latin 1 if not inopts newline name settings set inopts newline name settings crlf newline set inopts octet limit settings octet limit cook input src settings define local read raw string src octet count optflags let settings crack cook input source flags optflags if not inopts newline name settings set inopts newline name settings lf newline if not inopts encoding name settings set inopts encoding name settings latin 1 read raw string src octet count settings define local open output file fname optflags let settings crack open output file flags optflags append bom impossible f if or memq outopts encoding name settings ucs 2be ucs 2le f eq append if exists outopts if exists settings if file exists fname let in open raw input file fname 2 preread identify bom in close raw input source in cond symbol preread set outopts encoding name settings preread pair preread if eq append if exists outopts if exists settings set append bom impossible t set outopts name settings fname set outopts is owner settings t if not outopts newline name settings set outopts newline name settings crlf newline if not outopts encoding name settings set outopts encoding name settings ucs 2le if not outopts bom usage settings set outopts bom usage settings emit bom let snk let omode outopts if exists settings if omode open raw output file fname omode 0 open raw output file fname 0 if and memq outopts encoding name settings ucs 2be ucs 2le not eq suppress bom outopts bom usage settings not and eq append if exists outopts if exists settings append bom impossible emit bom snk outopts encoding name settings cook output snk settings define local cook output sink snk optflags let settings crack cook output sink flags optflags if not outopts newline name settings set outopts newline name settings crlf newline if not outopts encoding name settings set outopts encoding name settings latin 1 if not outopts bom usage settings set outopts bom usage settings suppress bom if and memq outopts encoding name settings ucs 2be ucs 2le eq emit bom outopts bom usage settings emit bom snk outopts encoding name settings cook output snk settings define local raw string length str optflags let settings crack raw string out flags optflags if not outstropts newline name settings set outstropts newline name settings lf newline if not outstropts encoding name settings set outstropts encoding name settings latin 1 if not outstropts bom usage settings set outstropts bom usage settings suppress bom raw string length str settings define local write raw string str src optflags let settings crack raw string out flags optflags if not outstropts newline name settings set outstropts newline name settings lf newline if not outstropts encoding name settings set outstropts encoding name settings latin 1 if not outstropts bom usage settings set outstropts bom usage settings suppress bom write raw string str src settings set open input file local open input file set cook input source local cook input source set read raw string local read raw string set open output file local open output file set cook output sink local cook output sink set raw string length local raw string length set write raw string local write raw string L y Xy p Øo À px Tx h Dp Øo Ü p p Ø Ø à ø y y Ø Ø Xy l y Xy Ø Ø tp lp ô Ø Øo ¼ Ô ô ¼ Ô ì ¼ Ô Ô L T Ô L p define rationalize x e define sr x y define sri x y let fx floor x fy floor y cond not list x l lambda m a if eq m quote r quote x r list vector list fqq m a define iqq x m and pair x eq car x m if or pair exp vector exp eqq exp 0 list quote exp P h x lambda f call with input file f lambda p let loop let l read p if not eof object l begin eval l loop define require f load once find library file f define macro cond expand clauses define features pocket scheme r4rs srfi 0 srfi 6 srfi 23 windows ce letrec errout lambda form exp error cond expand form exp feature lambda exp cond symbol exp memq exp features and pair exp list exp case car exp not not feature cadr exp or if null cdr exp f or feature cadr exp feature cons or cddr exp and if null cdr exp t and feature cadr exp feature cons and cddr exp else errout Invalid expression exp expand lambda clauses cond null clauses error Unfulfilled cond expand not pair car clauses errout Invalid clause car clauses or eq else caar clauses feature caar clauses if zero length cdar clauses void begin cdar clauses else expand cdr clauses expand clauses H x P X T ë ¼ d l Ðñ Ä µ Ô Ù là Ø ô Ü x D ê 4 dç ê Ô1 ê x1 Øê X tê äê Hê ðê À È Ô ø è ô Ô Dä ø P p ü P ¼ Ì 0V Ø ÐU ä V T U ô è Ðð T ¼ð DT 4 8U äð ¼T üð tU L S t ôR Ü dã Àñ ñ hå ¼ Àé È üç Ô ôé Ü ê ä ê ì ê ô ìê ü ë Të Üì Ìò Ðð ð ð ð 4 ð 8 ÌÕ H Ö Ö h Ö 8Ö øÖ D Ô Ø ô ò ó õ õ 4 Tù H tù X dù l ù t ù ú ú û þ Ì T ä p ð ü t 0 J ðI ìJ È K Ü 8K ô TE Ð ø 1 2 2 Jan 5 2006 Þ ì Ä HÆ à Ð I Ä ä Ë Ë Ë 3Ë 8Ë Ë SË Ë fË kË pË tË yË Ë Ë Ë Ë Ë Ë ²Ë Ë ÀË ÉË ÑË ØË áË ìË Ì Ì Ì Ì Ì 0Ì Ì IÌ VÌ gÌ Ì Ì Ì Ì Ì ÅÌ Ì çÌ îÌ óÌ üÌ Í Í Í Í Í Í Í IÍ NÍ TÍ Í bÍ nÍ Í Í Í Í Í Í Í Í ÁÍ ÉÍ ÒÍ ÚÍ çÍ ðÍ ûÍ Î Î Î Î 5Î Î IÎ TÎ Î rÎ Î Î Î Î ÄÎ ÔÎ æÎ õÎ Ï Ï Ï 8Ï FÏ PÏ bÏ vÏ Ï Ï Ï Ï Ï Ï Ï ÌÏ ÔÏ âÏ ñÏ øÏ Ð 0 1 2 3 4 5 6 7 8 9 A B C D E F G H I J K L M N O P Q R S T U V W X Y Z a b c d e f g h i j k l m n o p q r PSCMLIB dll aliascons allocate user tc assoc assq butlast c2l double inexact c2l long c2l ulong caar cadr car cdar cddr cdr cons decr hot port count define global eq equal eqv err break err eval err exn err io err math err memory err memory critical err range err read err type foreigncons gc mark gc protect get c sstring get c string get c string dim incr hot port count init subr init subr inline init subrs table iseq symname l2c integer long l2c integer ulong l2c real double lapply last ldisplay lerr leval leval args lgensym list length list length checked listn lnewline load lquit lraisex lread lstrbreakup lstrunbreakup lverbose lwrite memq mm alloc mm free must free must malloc nappend2 ncscons ncsncons newcell no interrupt nreverse path fixup path ãûÖ fixup rel port close port flush port getc port peekc port putc port puts port putsz procedurep pscm awaken thread pscm boot finish pscm boot start pscm build date pscm build version pscm call psz pscm global h32 pscm global rgpsz pscm interrupt pscm is scheme thread pscm load psz pscm poll interrupts pscm repl pscm repl psz rostrcons set ext type fcns set interrupt alert setcar setcdr strcons string append strm flush strncons symbol value symlist to flags symname symname value symname volstr szhash unpack lsubr args veccons Ð I i f s e t W I T H B I N D I N G S L A M B D A D E F I N E D E F I N E M A C R O S E T Q U O T E B E G I N I F O R A N D C O N D C A S E l i s t w i t h h a n d l e r s i n t e r n a l m a k e p r o m i s e u n b o u n d v a r i a b l e b a d l e t r e c i n i t i a l i z a t i o n r e f e r e n c e s y n t a c t i c k e y w o r d g i v e n a s v a r i a b l e n a m e i m p r o p e r a r g u m e n t l i s t n o t a s y m b o l e x h a u s t e d s t o r a g e t o o m a n y p r o t e c t e d r e g i s t e r s o p e n f i l e s l o w m e m o r y h e a p m i s c o n f i g u r e d c a n n o t b o o t S c h e m e 8ï Pï hï ï n o t a n i n p u t p o r t c l o s e d p o r t n o t a n o u t p u t p o r t n o t a n i n p u t o c t e t s t r e a m c l o s e d o c t e t s t r e a m n o t a n o u t p u t o c t e t s t r e a m i n p u t p o r t o u t p u t p o r t i n p u t o c t e t s t r e a m o u t p u t o c t e t s t r e a m n o t a n o p e n o u t p u t p o r t o r o c t e t s t r e a m b a d o c t e t v a l u e r e t u r n e d i n v a l i d p o r t h a n d l e r i n v a l i d o c t e t s t r e a m h a n d l e r r e a d c h a r p e e k c h a r c h a r r e a d y w r i t e c h a r f o r c e o u t p u t c l o s e p o r t r e a d o c t e t w r i t e o c t e t d a t a r e a d y c a n n o t c l o s e n u l l p o r t ìó ô 8ô Xô f a i l u r e r e a d i n g f r o m f i l e f a i l u r e w r i t i n g t o f i l e i n p u t o f f s e t i n t o f i l e t o o l a r g e c o u l d n t s e t p o s i t i o n c o u l d n t g e t p o s i t i o n c o u l d n o t o p e n o u t p u t c a n t s e t p o s i t i o n o n a p p e n d m o d e f i l e t r u n c a t e i f e x i s t s a p p e n d i f e x i s t s e r r o r i f e x i s t s u p d a t e m u s t e x i s t u n k n o w n o u t p u t f i l e o p t i o n t o o m a n y o u t p u t f i l e m o d e s t o o m a n y o u t p u t f i l e b u f f e r s i z e s u n k n o w n o u t p u t f i l e m o d e c o u l d n t t r u n c a t e c o u l d n t a p p e n d n o t a r a w f i l e I O b u f f e r r e s i z i n g o u t o f c o n t r o l n o t a v a l i d c h a r a c t e r c o d e g 0 l d l X l o i n v a l i d r a d i x i n v a l i d r a d i x f o r i n e x a c t n u m b e r D O n e x t i t e r a t i o n s p a c e n e w l i n e c x 0 2 x x 0 4 x f t m i s s i n g c l o s i n g p a r e n t h e s i s a t e n d o f l i s t s t r i n g n u m b e r i n v a l i d b a s e i n v a l i d n u m e r i c l i t e r a l b u f f e r o v e r f l o w s t r i n g o r s y m b o l t o o l o n g U n e x p e c t e d e n d o f f i l e U n e x p e c t e d r i g h t p a r e n t h e s i s u n q u o t e o r u n q u o t e s p l i c i n g n o t i n q u a s i q u o t e t e m p l a t e m i s p l a c e d d o t i n l i s t E e S s F f D d L l E n d o f f i l e w i t h i n s t r i n g l i t e r a l s p a c e n e w l i n e u n r e c o g n i z e d c h a r a c t e r l i t e r a l E n d o f f i l e w i t h i n c h a r a c t e r l i t e r a l e i d b x o E I D B X O u n r e c o g n i z e d l i t e r a l s y n t a x q u a s i q u o t e u n q u o t e u n q u o t e s p l i c i n g e x n s y s t e m n o t a p r o c e d u r e o f o n e a r g u m e n t F A T A L E R R O R d u r i n g c r i t i c a l c o d e s e c t i o n E R R O R p r e b o o t C R I T I C A L E R R O R E R R O R c o u l d n o t u n w i n d d y n a m i c s t a t e f a i l e d t o r e s e t t o t o p l e v e l e x n b r e a k u s e r i n t e r r u p t e x n h e a p f a i l e d t o a l l o c a t e s t o r a g e f r o m s y s t e m a c c e s s v i o l a t i o n o r d a t a m i s a l i g n m e n t e x n u s e r e x n i o i n p u t o u t p u t U n h a n d l e d e x c e p t i o n d e f a u l t e x c e p t i o n h a n d l e r m o d u l e s c o u l d n o t l o a d P o c k e t S c h e m e e x t e n s i o n i n i t p s c h e m e e x t n o t a P o c k e t S c h e m e e x t e n s i o n c o u l d n o t l o a d f i l e w a r n i n g n o d i r e c t o r y c a r c d r c a d r v e c t o r l i s t a p p e n d n o t n u l l e q z e r o p a i r v e c t o r d y n a m i c w i n d e r r o r c a l l e c c u r r e n t e x c e p t i o n h a n d l e r r a i s e o r a n d d o c o n d c a s e d e l a y w i t h h a n d l e r s t r a c e c o n s s e t c a r s e t c d r e q v e q u a l e v a l c a l l c c define call with current continuation call cc s t r i n g s y m b o l s y m b o l s t r i n g p r o c e d u r e b o o l e a n s y m b o l r e a d w r i t e d i s p l a y n u m b e r s t r i n g s t r i n g n u m b e r e o f o b j e c t c u r r e n t i n p u t p o r t c u r r e n t o u t p u t p o r t m i n m a x a b s s q r t e x p t e x p l o g s i n c o s t a n a s i n a c o s a t a n i n e x a c t i n e x a c t e x a c t p o s i t i v e n e g a t i v e o d d e v e n q u o t i e n t m o d u l o r e m a i n d e r g c d l c m f l o o r c e i l i n g t r u n c a t e r o u n d n u m e r a t o r d e n o m i n a t o r l i s t l e n g t h c a a r c d a r c d d r c a a a r c a a d r c a d a r c a d d r c d a a r c d a d r c d d a r c d d d r c a a a a r c a a a d r c a a d a r c a a d d r c a d a a r c a d a d r c a d d a r c a d d d r c d a a a r c d a a d r c d

    Original URL path: http://www.mazama.net/scheme/v12/pscheme.HPC2_SH4.cab (2016-04-30)
    Open archived version from archive

  • Pocket Scheme Language Reference
    r B o Oð 5Õµ ób r B o á 4 áH A â 2 BU áX Q â 2 SU áX Q â 2 SP àÙ CT à á 40 áH A â 2 BU áX Q â 2 SU áX Q â 2 SU á 5 áX âQ 2 SP àÌ CT à pC È Ä E E ÀÄ À Ä Æ Ö OCmShè öºÓd Ó Ò¾Ód l åø Ãd a k ¼Ód Ò Ãa ÿ å ºÒT e Ð ôT j ³ î Ó ÒYÓQ Ãa ÿ åjºÒT Tgº e e Ð ôT j ³ Ó ê YÃa ÿ Ód e Ð ôT j ³ Ódí m õTQäC ób r B m l k j i h o Oð åób r B o Oð åób r B o OCgchð a ÿx áx q â 2 nÐoÔ se áX sTrT Eæ Cgs ób r B h o Oð æÕ åób r B o Oð æË åób r B o Oð æÁ åób r B o Oð æ åób r B o Oð æ åób r B o Oð æ åób r B o Oð æ åób r B o Oð æ åób r B o Oð æ åób r B o Oð æ åób r B o Oð æq åób r B o Oð æg åób r B o Oð æ åób r B o Oð æS åób r B o Oð æI åób r B o Oð æ åób r B o Oð æ5 åób r B o Oð æ åób r B o Oð æ åób r B o Oð æ åób r B opC Å Oð æ åób r B o Oð æý¾ åób r B o Oð æó¾ åób r B o Oð æé¾ åób r B o Oð æß¾ åób r B o Oð æÕ¾ åób r B o Oð æ˾ åób r B o Oð æÁ¾ åób r B o Æ Ö OG X i z ì ýP éA èýP ýP U àýP È âýQ 2 H ºýT d ä4ìü Ñ a l AÃd a 0 Ãe Ñ a A d k 6Ñ a A d k K ³d 4 eá D d Ð e a mØ hôZ J ¼ ³jØ Ø i a Ô åÊ ä d Ð eÌ h Ð dób r B m l k j i h o Æ OChSlð ê k Ð ³d k á 3 Ð ³d e d dÇ ô 0 à Ü G ÈD üG 8G Ð ³d i Ð e Ãd e d Ð Å j Ð d̽ dób r B l k j i h o Oð Aá 4 Ð áH A â 2 X ä äC ób r B o Oð áH âA 2 Ð æ vBQ 6 CQc V Qàób r B o OShð kÐ ä æ eAá 8 i e åË d ób r B i h o OChð d åCT áH âA 2 ö u á 4 Ð d æP ä f d cUCT á 4 BQSb u c ób r B h o Oð áH âA 2 GÐ Ð BTób r B o OChð á â 2 Ð d ƹ d R 2 ób r B h o OChSjcið á â 2 Ð d e ¹ d R Qàób r B j i h o OChð á â 2 Ð d Ð ä ë é j y Q 9 Q Ð ³eó k Ð d Ð ³dób r B k j i h o8Ç LË ô üF øD E Oð Aá 4 TÐ áH A âÿÉ 2 X ä äC ób r B oCa 1 1 1 1 v 1 q 1 l 1 g 1 b 1 à à à à ChQ øâ â a 1 Ç 8DSQ àl1 SQ Fl1 à SQ Fl1 âSQ Fl1 FSQl1 à âSQ Fl1 à öh Æ OChSjckè ì È âÿÉ 2 Ð d üF àD ÿëþAá ²³dÈ k á d d Od³d l Q eÇ Ð e Ð f døá K d ³e Ð e d d øâ eSa â 1f Ç Ð6Õ d Ð2Õ d 5Ð Õ d r 1Ð Õ d h z Ð Õ d q Ð Õ d U h Ð Õ d K Ð Õ d A V Ð Õ d M Ð Õ d 6 D Ð Õ d dÇ Ç ¼f ÐÆ 8Ç ØÆ àÆ èÆ ðÆ øÆ Ç 5 Ç ¼6 Ç àD Ç Ç MÐKÕ d FÐGÔ e àób r B h o Æ OChSið ä H â j a 2 Ð d å X â lÌa 2 3Ð d H á k kX á eÃe a b 1 Q H á d dÔ Od Ð T U à àób r B l k j i h o OChð Aá 5 Þ¾Sd d ä ÐOi d e Ð æ dób r B i h o Í C DÇ TÇ ¼6 àD ès OChSjcið AÐ dAá 9 j ¾ d d ä á Od â 2 9Ð d Vh à5Ð eób r B j i h o Oð áH A âÿÉ 2 Ð Ð CTób r B o OChSjf ð Ð Õ d ¾ d d Ð æ e Ð Õ d é y Q 9 Ð å d Ð d dAæ e d Ð æ eè Ð Õ dób r B j i h o dÇ Í TÆ ÌF Ç Ç tG àD 8G Ç OChSjð Ð e ä æ u i Ñ a e f A T P â ób r B j i h o Oì áH A â e a 2 øá E a CP Ð å ü5ôUÇ dób r B o OChð á á a â 2 Ð düá H ób r B h o OChð mÐ d d ä eób r B h o OChSjð iÐ ä e i Ñ a e f A T ób r B j i h o á D á C Oð Aá 4 PÐ áH áI a â 2 X ä äC ób r B o OCiShð h BÐüâ I d á üâ H i Ð d á 9 üá I aüâ H b 1 à àób r B i h o OChà üá Hüá à à Eh U Z V Ð áR ü1 á æü6 ç ób r B h o OChSkcjsið Aá 8 g á á a â 2 Ð d Aá T á á¹ a â 2 Ð ³dI üF e 4 8 ð Ä F Ð ³e f d e f ³d ³e fH d ³e fn d e ff ³d à àób r B k j i h o Oð çy æób r B o Oð ço æób r B o Oð çe æób r B o Oð ç æób r B o Oð çQ æób r B o Oð çG æób r B o Oð ç æób r B o Oð ç3 æób r B o Oð ç æób r B o Oð ç æób r B o Oð L¾ dCÐ ä äC ób r B o Oð 7¾ h9Ðs d 5Ðe d H ä äC ób r B h o Oð ¾ d á 4 á 4 áC1 X ä äC ób r B o Oð ö½ d Ð å ä äC ób r B o Oð â½ d Ð å ä äC ób r B o Oð ν d Ð ób r B o dÇ Ü OChð iÐ d dbÑ 4 bÐcÔ e ù½ ób r B h o Oð Ð dVÑ 4 àå½ ób r B o Oð ½ aTÐ ä Õ½ dób r B o Oð ½ aJÐ ä Ž dób r B o Æ OChSlckè ZÂY vüá F u E F Sh kdcd5Ñ 4 H d d1Ñ 4 0Ð 1Ðce ãd Ðãa â cì22 cãd e 1 Ð åãfãd ì5 Ðãa c âì22 c á1 ì1 U d âì2 B h o ön Oð Ð tüá D Kdób r B o OCeè Ð ä u ü4 Ð áü1 U dób r B o OChð Aå T U ² dób r B h o 8Ç Ç Ô ð T L 4È TE OChd è äκü4YÐ x æ äü4 e ü6WÐ áü1 U dób r B h o OChcið áX áY dQ dOi a 1 1 1 u Sd d æk¼ e 9Ð Sdv db¼ e Sd d æZ¼ e j Sdi dR¼ e Ð Sdób r B i h o OChSjciè á á d dOi a 1 1 6 1 Ð züá J d j d d æq¼ e ä e ºü4 Ð áü1 U d e K d Ð d Q 4È Y TE ûþ ÿ Ð e d d Ð ób r B j i h o OChð ä H á f flfoa â 2 Ð d H ä øâ dC Aá 5 ¾ dm Aá 5 iÐ de æW d Aá 5 ¾¾ dY æù¾ dT Aá 5 ¾ dM æѾ dH æY h áY dQ dLdOa â 2 TÐ Sd4 h äøâQ dC DÐ Sd e æ d y¾Sd d ¼ e ¾Sd e æ d 6Ð xüá H u EX8 dób r B h o OChd è äN¹ü4 Ð x æ äü4 e ü6 Ð áü1 U dób r B h o OChSið h á á d dOfca 8 1 4 1 1 e ½ T T e U T æ d ¼ e Ð dób r B i h o8Ç Q àS ð 4È TE ûþ ÿ OChSicjä á á d dOj a 1 3 1 1 EÐ yüá I d i æ U ¼ d æ UÇ d9 8Ð ä e ü48Ð áü1 U dr eH d 4Ð d Ð æ d e ü6ôQ Q a j Ð d Ð e d j d æ e d e æ h e Ð dób r B j i h o OCjSkà ä H á e e e a â 2 Ð dØ Aá Ð ä k j ä H ä8Ç h èÑ Ë xT 4È Y TE ûþ ÿ øâ dC i yüá I³e æ d ³e æÕ¾ d ³e æ³¾ d å¹ X á¹ d dLdOa â 2 ZÐ ³d X äøâ dC ³h xüá HJÐ d ³eì¾ dZ ²Uc ³T dÔ eR Ð züá J ä e ü4 0Ð 7 á 1 2 Ð ä e f ü4 c âü22 c1 õQ Ð ôT гe d d Ð j Ð d e i Ð e d h Ð d i Ð d e Ð dób r B k j i h o OChÜ ä H á e e e a â 2d H ä 8Ç LË F h Ë L 4È Y f TE øâ dC d tüá D D1 Ð Kd2 Ð d T U ¾ d Ð a q c âü2 ä2 c áü41 å ü5 Ð å äü4 ü5 Ð áü1 U d Ð dób r B h o OCjShð vÐ ä i á 1 á eÚº d i H eѺ dtÑ a ì jrÑ a ç eÐ ã ób r B j i h o OChSkì XÐ ä³Q a j á á a â 2 YÐ xüá H d hVÐ ä iTÐ ä jLÐ æ³d e ü6ôQ â Q a 2 kEÐ e d j³Q a Ð e dEÑ a ß hDÑ a Ú 7Ð Ö ób r B k j i h o OChd ä Ð ä ü41Ð áü1 g x e ä V aü4 Ð áü1 U dób r B h o OChSjf ð e T e T i d ½ eób r B j i h o Æ Ö OClSiä äÉ H ë è áÉ mÁ mÜmßa â 2 Ð Ãd 8Ç èÑ Ü ÄQ T xT L Dh 4È Y øY Î Î TE H äÁ øâ dC e æ Ãd e æg Ãdx í Ø á a a a ôQ â a 2 tÐ da Ø ä øâ dC 9 d tüá D D Kj0 è Cj Qÿâ a 2 Ð d è i ëUÐ äÃe ü4WÐ áü1 U d e d MÐ äÃe ü4NÐ áü1 U d e d e ¾Ãd e ¾Ãd i Ð ä e ¼ d i ób r B m l k j i h o OCeè 3Ð ä ü47Ð áü1 e ä V ü41Ð áü1 U dób r B o OCeè Ð ä ü4 Ð áü1 e ä V ü4 Ð áü1 U dób r B o OCeè Ð ä ü4 Ð áü1 e ä V ü4 Ð áü1 U dób r B o OCeè Ð ä ü4 Ð áü1 e ä V ü4 Ð áü1 U dób r B o8Ç èÑ ÄQ 4È ª x TE OCeè ¼Ð ä ü4¾Ð áü1 e ä V ü4 Ð áü1 U dób r B o OCeè Ð ä ü4 Ð áü1 e ä V ü4²Ð áü1 U dób r B o OCeè Ð ä ü4 Ð áü1 e ä V ü4 Ð áü1 U dób r B o OCeè Ð ä ü4 Ð áü1 e ä V ü4 Ð áü1 U dób r B oæ OChU f w ð ónè Ð á ä ì4 åì5 Ð å æì6 äì4 ì5 Ð áì1 ä e V ì4 a Pg Ð á äì4 åì5 uÐ å æì6 äì4 ì5mÐ áì1 e ä V ì4iÐbÖ å ãdbÐ á Ñ æü6ãeãd Ð åãfãd ì5â áP2 aÐ á ä ì4 åì5 ÿé éUÐNÖ ä å ì4NÐ á å IÑì5 äì4ãf NÐ ä e ü4FÐ å æü6 äü4 ì5 áü1 P âì2 B i h o önæ OCfShð ónì Aá 8 6Ð äce ì46Ð áì1 ä e V ì48Ð áì1 U d Ð äce ì4 Ð e ãd áì1 ä eì4 Vãa g a0 Ð áì1 U d âì2 B h o ön æ OCiSjckshð ónð ä H 2 å X 6 22 eT¹ d i ² d ð èÑ x D à L Äg ð Dh 4È É ² d à à à à R R ¾ N à à à à à à à Ð øTúQ h Ñ a 8 Ð å ùT Ð øTùUúVe d Ð å ùTùUúV d øT d Ð h á â 2 Ð å ùTxÐ dùUúVB dç á 8 ÐjÕ æ ùTùUúV4 d Ð å ùTú X äøQøâ dC æ øTüáùV t åŽ DÝ lÐ å øT æùU dÓ åùV ¾øTÍ øQùV q UM½ dÅ úQ PÒ bøQ 1 GÑ dSÑ aPÕ A Ð øTAÑ dMÑ a A e ÑùT eüâøQ A húQ e ùT a 2Ñ d Ñ aAÕ A Ñ d Ñ a Õ A Ð d Ð f Ñ9Õ d u 8 Ñ6Õ d Ñ d5Õ Ð f ÑùT eüâøQ A â 1 Ç Õ Õ Õ Õ Õ Õ Õ Õ Ñ d Ñ a A ÑùT1 e 6 È É ³ É Ü É ª ô É ìª ¼e É È DÉ TÉ pÉ G È ÄÈ 8G ØÈ V äÈ ôÈ W Ð Ñ ÕøV d ÑùTï e Ð Ñ døQ Õ VzÑùTä eyÐwÑ ÕøV duÑùTÚ eúQ rÐqÑ døQ Õ V mÑ døQ UmÑ a A iÑùT eøQ Vh eÑpÕ dcÑ dqÕøVbÐ ÑùT e Ð Ñ døQZÕ VZÑùT eúQ ÐøQ VùT U Ð å ùTøQ U²½ T TÐøQ VùT U øQ é X y 9 bøQ B Q 1 a eSa àø àU CÐ åü5 æ ùTá CÐ ùTÜ å ùT Ð6Õ æ ùT è xøQ Q 8 8Ð å ùT øQ QùUúVy½ ë åùT0Ð Ð ó y eá e uÂ5 Qa â a 2 Q â 2 Ð d i å dób r B i h o OChSkà ̾ d9Ñ j9Ð æ6Õ d Ð5Ñ d e ³i Ð d i á 9 4Ð Ñ å d8Ð d d4Ð Ñ eê 2Ð Ñ d áü1 à b û q à äù гe ü4 i Ð æ Ñ Õ d Ð d Ñ e Ð Ñ å d Ð d Ñ e Ð Ñ d ób r B k j i h o Oð Ð Ò Ñ Ð Õ d Ð Ô ób r B o 4ð ä G tG гe æ Ãd âì2 B m l k j i h o ön Æ OChSlcksjð 5ÐÃe³f g dÿ 0Ð d D 1 2C t à OQWPVAU T ÓSa9 sb9 01 02 W E J6 Z7j4z5 óc C 3o Ð H æ Ð h â Ó C ê ôá Sc CK k 8 Ö à à ð ÿÿ OQWPVAU T ÓSa9 sb9 01 02 W G j4 z5J6Z7 óc C 3o Ð H æ Ð h â Ó C ê ôá Sc CK k 8 Ö à à ð ÿÿ OÌ QëãAT å CbF BDÐ B I 02 m AÓ g ã Aæã G 82 Ë B b r Bû È ã È È p2Ó 3 rÿ C 3 â ã 32 B B D X Óóa2g4q æmEX r ód tmE æ Ó C gùPóa4q A oÿ 8â Ó8 ã Ð DÕ ã ÐÐ Ó r A 8 û ÿr à D½ ÿÿ ÿ õ OÌ ÓSb B22 8 aýã B ã A 2 E B óc 4s C 3o ÿ p x 62 Ò áë ð Òå á æ Ò á Ó à2gk Fh Ú r K ódU t Fce æ g Ð ùQúRË ûT 8â B8 á B8 ü ÿq ç A aýã Ð å d áêRì1 P ûW 7 c 8 6 42 QWPVAU T ÓSa9 sb9 01 02 P7 6 Ð ú H ø ð Ð ó h ñ ë Sc CK k 8 è ä ð ÿÿ C Z È K Ég0z 6DbTc 3h ù c É ðà h gFbVc 3Y FbVc 3U FbVc 3Q FbVc 3M ðvh ì u FbVc 3A FbVc 3 FbVc 39 FbVc B C 33 àFbVc 3 FbVc 3 FbVc 3 EbUc 3 àFbVc 3 FbVc 3 FbVc 3 DbTc 3 àFbVc 3 FbVc 3 FbVc 3 à b b b8c9c8c62 ÿph DbTc 3î F DbTc 3è Fó à jF b Z6 vR Ch WQV 7 aRb 2 H Cev6 S öh B OQWPVAU T ÓSa9 sb9 01 02 W G j4 z5 J6Z7 óc C 3o Ð H æ Ð h â Ó C é è ôá Sc CK k 8 Þ Ó ð ÿÿ Ch WQV 7 aRb 1 H Ceg7 S öh OQWPVAU T ÓSa9 sb9 01 02 W E J6 Z7 j4z5 óc C 3o Ð H æ Ð h â Ó C é è ôá Sc CK k 8 Þ Ó ð ÿÿ Ch WQV 7 aRb 2 H Cew6 S öh OÌ Q åASëä 3b6 B ÐMB 9 H2 BD äG2O ìr6Ô B K äF1 A A d r D K ÿ äC2 áàr d Aàr DK X äK C X Òóa g4q æmEX r ód tmE æ Ò B gùPóa4q A o8â Ô 2 äK Ú à üÿÿ Ô 3 ÔB1 äK ÐÊ àÁ äK TäC2 ¼ à ÿÿ õ Æ Ö OG X cksjð ûYgÐ a a è mÓd å y aÐ a a å mÓd y õ á á a a m y á a a y m K á á üQ ûQüR à 0á ë a lxá ã77 Ìw Ó G âàãs3 1 B a à wx sc s B e E A e E ã ÿ ã37 áàwx c Aàw C D a h Ó2gk r ã Fh ód t Fce æ g Ó C ùQúPûS óc4s C 3o 8â Ó 07 ã àÔ á üÿÿ Ó 04 ÐÊ á àà ã tã37 ྠáÿÿ õ OÌ Q åASëä 3b6 B1ÐMB 9 H2 BF CR äG2O ìr Ô B K äF1 A A d r D K ÿ äC2 áàr d Aàr DK X äK C X Òóa g4q æmEX r ód tmE æ Ò B gùPóa4q A o8â Ô 2 äK Ú à üÿÿ äK TäC2ª Ð à ÿÿ õ X K Ó E Sf e à 25 õç E1 E ÿq E ÿq E ÿq E ÿq E ÿq E ÿq E ÿq Ó âX C EðqX C EøqX C EüqX Eþq E Eÿq ESb E B A F E B Q ÿÿ â å OÌ K aRëã ýñ 0XÓ â 8 3 H yÿ ÿ H Y v C 3 é ã Ó H H 9 ã I G H X DÓ2a ãûY EX ód t E æ Ó g C ùPúXûY óc 4s C6i6h 3o ÿÿ 8â ã èÊ àÿ Øh J 00 F h F D 00í H Ó 7 7 H 5 h H Ó A F36 A F36û ÿy H Ó D B32 D B32û ÿp ã G H à ã ã Ø àÿÿ ð õ OÌ K æQTëã ÐCgF GPQ G I 87 GY De ã77b Ìw5Ó G âàãs3 1 B a à wx sc s B e E A e E h ã ÿ ã37 áàwx c Aàw C D a h Ó2gk r ã Fh ód t Fce æ g Ó C ùQúPûS óc4s C 3o 8â Ó 07 ã àÔ á üÿÿ ã tã37 àÊ áÿÿ õ OÌ K ã 0 ã 8 Ó 3 y 09 ã H H Ó9 ã I J H X 9Ó2a ã EX ód t EüV Ó g C ùPúXûS óc4s C6j6i6h 3oÿ ÿÿ 8â 01Å Ã ã ØË à i H H H H H Ó H38 H38û ÿy Ó D B32 D B32û ÿqÓ ÿÿ ÿÿ ð õ OÌ K PPQX TaR G ëã i I I a A A Ó g 9 9 åO 09O 01O O O 4vÓ 9 4 H9 2 4 2 1 âN0 8 3h Ë H FgÕ H F yh Ë I i y H Iú È ã È È ã 0 8WÓ 3 H yÿ ÿ E i w C 3 é2 39 ã8 ã H H Ó9 ã I G H X CÓ2a ã EX ód t E æ Ó g C ùPúXûS óc4s C6i6h 3oÿ ÿÿ 8â 0Ö R 01 N N L 01 c K 8 7 B A H 0 Ó 8 8 H 6 c 8 Ó H38 H38û ÿy5 H Ó D B32 D B32û ÿq ã è àÿ ã G H à ã Ø à ÿÿ ð õ æ OChSià ónÜ Ð b áì1 ä bì4ãe áfbì1 fb á â ãa cì22 c á1 Ð á ä ì4ãe á b ãa c2 cO r Ð á å ì5 á á æü6 äü4 uÐ äãe ü4 tÐ å æì6ãd ì5ãa â cì22 c1 nÐ åãd æ ì5lÐãa â cì22 c åì5ãd æ 1 fÐãa c âì2 ä2 c áì41 ãe áì1 b c2 c r2 âì2 B i h o önæ OChSjciÜ ónè HÐ b áü1 ä bü4 å á ì5 Ð á åì5 d á b áì1 c2 ca 1 7Ð á ä ü4 åì5 ê 3Ð å äì4 ê ü5 áì1 c âì22 c r áü1 â cì22 r c Ð2 ãa b å bì5ãd á Ð äì4ãe áì1 c âì22 c rãa c âì22 c r2 å æì6 dç¾ì5 h Ð ä e ì4 áì1 b c2 c1 âì2 B j i h o ön øÒ Ö À TÖ g ØÒ Ö g QPPQ Ê OChSjciè Ð e d Ð e d J õQ A ôQ q õQ 1 áü1 P ób r B j i h o f LÐ æ OChT e ð ónè vÐ á å oÑì5 æì6ãd oÐâeáV ãdnÐ á æ fÑü6ãeãd ãa P âì2 B h o önæ OF W h y È ón ÐÄ åà âì1ì2 c h Ð2 c 1 ì1 U d â QÐ å d á FÑ áî ì1 PGÑ A MÐì1 U d â ¹ t Ðì1 U dn iCÐ áì4 åì5 L á 9 Ð ä Ñì4 e Vy ì1 g a cTâü22 c rTâ1Ñü2 c2 c r2 Táü10â cì22 c áì11 â g aü2 ä 4 ì4ì1 å P0áì1 â ü2 P á Ð æ a Ð çR a Pd øQ 1 5ÐøW áì1ãd e Vp 7 â cì22 c áì11 â g aü2ãd áì1 å æ P Ð çR a P6 ÐøW áì1ãd V e â cì22 c1 Ð å dçR áì1 P áì1 g a âü2 áì1 ãd å P æ Ð a çR P çP âì2 B h o ön ð ê ü ñ Dh L ü æ OChV g sjÀ ónè tÐXæuÕ äì4 ì6pÐ áì1 e ä V ì4 â cì22 ckÐ äì4 1 igÐ æjÕ äì4 ì6gÐXå æì6 äì4 ì5 ÐdÕ æãd ì6 Ð åãfãd ì5ZÐãa â cì22 c åì5 æì6 äì4 1 RÐ áZÕì1 c0âì2 æ2 c0áì11 â cü22 cü6 äì4 1 EÐNÖ å äì4 ì5CÐ å æü6 äì4 ì5 Ð åEÖ äì4 ì5 Ðì1 ä fì4 W adàî P 9Ð áhå 3Ñì5 æì6ãd háì1 gpàî a âü2 â ãd å áP Ð adàî P9 Ð á häì4 åì5 Ð áhä ì4 åì5 Ð ä Õ ì4háì1pà g âî aü2 ä áì1 å P Ð ì4 adàî Pÿ N Æ Ñ â cü22 c r ð ð ñ ü Lu ë s tõ õ L ð WÑ â cü22 r c á2 ü1 c âì2pà2 cháì11 â gü2î a ä å áì1 P AÐ ì4 adàî P Ð áhä 4Ñì4 åì5 4Ð å d á dà áî ì1 P 1Ðháì1 e ä V çü7 ì4 â cì22 c Ð ä Õì4 1 Q Ð á Ñ åì5 æì6ãd Ð á4æ Ñü6ãeãd Ðãa â cì22 c á å1 ì5 Ñ æì6ãd Ð á4æ Ñü6ãeãd ãa c0âì22 cJ r ð à Äg ü ñ Ô ë s õ øQ Ðÿq å á Ñì5 æì6ãd Ðãa c âì2 å2 c áì51 æ Ñì6ãd Ð á Ñ4æü6ãeãd ãa0â cì22 r c Ð2 å0æì6 äì4 ì5 Ð áì1 â cì22 c åì5 æì6 äì4 1 xÐ á Öì1 c8âì2 å2 c8áì11 â cü22 cü5 äì4 1 nÐrÖ å äì4 ì5iÐ å æü6 äì4 ì5fÐ åiÖ äì4 ì5bÐ8å æì6 äì4 ì5 ÐhÖ åãd ü5 Ð æãeãd ü6YÐ Öãd ãeUÐ æãeãd ü6SÐãdYÖ ãeZÐ åãfãd ì5MÐãaHâ cì22 c åì5Hæì6 äì4 1 FÐ å æì6 äì4 ì5 Ð áì1Pâ cì22 c äì41 øU Ð Ö å äì4 ì58Ð åPæì6 äì4 ì50Ðãd øU1Ðãd2Ö ãe0Ð åãfãd ì5ãa c âì2 N2 c1 Æ Ð æ Õ äì4 ì6 áì1 â cì22 c1 U Ð å d áì1dàî P háì1pà g âî aü2 ä áì1 å P Ð ì4 adàî P N ÆXâì2 B h o ön à L ñ ü Ü ä ì ô ü ð æ OC T e v ì ónÌ XÐ å áì1 h a 1 SÐ áì1 U d áì1 â g aü2 ä åHÑ æ P BÐ ì4èR a P 9Ð áì1 f ä Wì4 å a èR P 8Ð á Ñ åì5 æì60äü4 áì1 g a âü2 0áü1 0ä å P æ Ð ü4èR a Pð Ð á ä ì4 åì5 Ð å dèR áì1 PÙ Ð áì1 â cü22 c á ä1 ü4 åì5 Ð å äì4 ü5 áì1 â cü22 c r ð ð s Dh L ñ ü ë õ ð áü1 c âü22 c rtÐ ä2 rÕ ü4 áì1 g a âü2 ärÑ å æ P kÐ ì4 a èR Pw gÐ áì1ãd V e ÐâeáVâW ãdbÐâeáVâW ãd â cì22 c áì11 a áì1 Q â A ãQ LР᪠ì1 e ä V ì4 áì1 â g aü2 ä áì1 å æ P DÐ ì4 a èR P áì1 cHàî âì22 c á1 ì1 a áì1 â Q A âQ JÐ áì1ãd V e áì1 â g aü2ãd â å f áP CÐ ïR a P6 BÐ á ä 7Ñì4ãe N é Æ á Ñ 98Ð äì4ãe áì1 â g aü2ãd áì1 å f P Ð ïR a P Ð á ä Ñì4ãe G N Æ Ð á äì4ãe Ð å d á ïRâ áPÚ á â ãa cì22 c á1 â ãa cì22 cI r ð à ê øu s ü ñ Dh L l Äg ð ºÐ á ²Ñ æì6 äü4ãe Ð áü1 e ä Vÿç ü4 c âì2 á2 c Ðì11 ãd V e Ðãd ãe Ðâe çáV ãd â cì22 r c 2 Hàî Ð å æì6ãd ì5ãa â cì22 c1 Ð Õ æãd ì6 Ð Öãd ãe Ð æãeãd ì6 Ðãd Ö ãe Ð æãeãd ì6 Ð Öãd ãe Ð æãeãd ì6 Ðãd Ö ãe Ð æãeãd ì6 Ð åãfãd ì5wÐ Õ æ äü4 ì6 Ð å æì6 äü4 ü5oÐ å Ö äü4 ü5wÐ å æì6 äü4 ü5hÐyÖ å äü4 ü5oÐ å æì6 äü4 ü5 Ð åpÖ äü4 ü5hÐ å æì6 äü4 ü5YÐhÖ å äü4 ü5XÐ æ äü4ãe ü6RÐ å æü6 äü4 ì5 áü1 â cì22 c1 N Æ 6 GÐ á IMÑ â 1ü2 c å2 cü5 æì6ãd 1 Ð æãeãd ü6ãa â cì22 c1 Ð á ä ì4ãe T Ð åãd ì5ãa â cì22 cH 1 1Ð á äì4ãe Ð á I Ñ0â 1 cü22 c0åü5 æì6ãd 1 Ð0æãeãd ü6ãa c âì22 c r Ð á I Ñ â 1ü2 c å2 cü5 æì6ãd 1 Ð æãeãd ü6ãa â cì22 r c2 8 Ð å d áïRì1 PF ð ê ² ð ü Dh L L t ¼ áì1 g a âü2 áì1 ãd å P f Ð a ïR P ïP âì2 B j i h o ön ñ æ OC T e v ón È YÐ å² áì1 h a 1G TÐ áì1 U d 8 GÐ áì1 f ä Wü4 å a âb Pt Ð á Ð åGÖ äì4 ì5 Ð å æü6 äì4 ì57Ð Ö å äì4 ì55Ð å æì6 äì4 ì5 Ð å æì6 äì4 ì5 áì1 c âì22 c r á 9 2 Ð å äì4 ì5 áì1 c âì22 c1 Ð á Õ I æì6 äì4 5 Ð áì1 â cì22 c á ä1 ì4 åì5 Ð å äì4 ì5 áì1 â cì22 c1 áì1 P âì2 B i h o önT Ä ð Dh L 4 Ð åãd ü5ãa c âü22 c r áü1 â cü22 r c0Ð2 ä Õ ü4 l áì1 â cì22 c á1 Ñ âì2 ãa c2 c á1 ì1 S a É áì1 â Q A âQ ½ ÐA áì1ãd V eLáì1 â g aü2ãd â å æ áP Ð aHàî Pó ð d ê ðü ñ d Dh l 4õ ³þ á 9 Q Ñ a Q O Æ ëùQ mØ Üa Ò A b 2 b Ñ b ùQ q ùQ qà ùQ mØ è ë ÿÿÿ e Põ d 0 T Q MÑ a á Ãa ÿ a Ãa ÿ a Q À K â²ì4 á løQ øQ á áLà Íl9Ñ a8Ò R 1 5Ð á áì1 H gá ÿ ì4 e Ð ä ì42 áì1ì2 c2 c r2 Ø Ð á ì4 åì5 Ð äì4 ì5 á Üì1 cì22 c 1 TÖ Ô g Ö T ì1 cì22 c1 È Ðÿá áì5 æì6 äì4 áì1 cì22 c1 H è øÒ á EÐ á ì4 åì5 ê ì1 a A ÿxw Ð áì4 åì5 9Ð ä³e ì4g 7Ð æì6 äì4 ì54Ð ä ì4 l0Ð äì4³e 0 T Ð æì6 äì4 ì5L áì1 cì22 c9á Ñ áü1 íY ÑíUíV íT íY4Ñ íUs íV n íT0 k íUh X íVa íT íVY h íTU íTP H Ñ â a 1 1 àõR Éüã9 õR à Éüã9 àõR Éüã9 õR à Éüã9 àõR É ãã9 âîQ 1o Ç À À À À À õ DDXXll  2 á Ó â AõR9 4 á Ó â AõR9 á Ó â AõR9 á Ó â AõR9 á Ó â AõR9 þÿÿ áÙ jÓ â AõR9 H öR h Éþã9 öR É ýã9 X öRûã É9 â É öR ã 9 OÑ â É ïãöR9 þã R È GÑ 9 É ýã a R Ñ É 9 ûã a R 9Ñ É9 ã al 3Ñ â É R9 ïã aX Ñ â É R9 þã øR È Ñ 9 É ýã øR È Ñ É 9 øR È Ñ ûã É9 ã â È Ñ É øR9 ïã â È É øR9 âîQ 1 Ç þÿ õ ÿ Rdd Dáì1 c âü2 à2 c É1 ýRþã9 àýRáã É9 c N Æþã ýR à9 É àýRáã É9 Q N Æþã ýR à9 É àýRáã É9 N Æþã ýR à9 É àýRáã É9 Dáì1 â cü22 c à É1 þãýR9 à áãýR É9 Dáì1 c âü2 à2 c É1 ýRþã9 àýRáã É9 âîQ 1B Ç L L Lpppppp Lppppp Lpppppp Láì1 c Ðãd íU Ð á å ì54æü6 äü4 áì1 g a âü2 â áü1 áPãd å â ü2 P æ Ð a êR P ò Ôj tõ ê L ö 92 Ð áì1 7 Vãd e c âì2ãd2 c Ð1 íU áì1 g a âü2 â áì1 áPãd å â ü2 P æ Ð a êR P Ð áì1ãd V g e c âì2 d2 c Ð å 1 êR áì1 P êP âì2 B i h o ön ò ê ü L ü OChSjf w øYÐ yÑ a Háü1 g a âü2 á ä Háü1 å f P µü4 a P fÐ áfÒ d å Háü1 P ób0r B j i h o OChSjf w úYÈ XÐPåXæü6 äü4 ü5 áü1 c0âü22 cRÑ1 a Páü1 g a âü2 Xáü1 ä å P0áü1 â ü2 P f å ü4 a P Ð áü1 e ä V çü7 ì4 â cì22 c 1 ö x 8Ð á å ì5 æì6ãd ãa c âì2 ì2 cK 1 0Ð á äì4 åì5 á ì1 q c â c9 c â c M áì1 q äP È È ìäQ A ôQ È ÑäR ôQ b B 0 æ õQ Ð á åì5 æì6ãd ãa â cì22 c1 áì1 b b ë ä tõ õ Äg Dh Îû ü ìÈ RÐ äýá èÉ KÐ äïá ä äC âì2 B m l k j i h o ön æ OB S d u ð ónà W èT çQ7Ð éQ âü2 áì1 Q å ëQãb áì1 Q íQ âì2 4áì1 Q ïT Ð ä ü4 çT áæRì1 P Ð å ïT çT4áæRì1 P æP âì2 B o ön C á Ò á Ò æce á E Ñ 1 a 1 Ñ 1 P v á 6ï à áH ä À ü ü õ põ áH ä áH ä áH ä áH ä ä C Ñ ã Ò h Ñ 2 öh ÑY Wb Ò B Ñ bK õ OChð Ð å d àx ób r B h oÜ OÌ U S f å ÑëãK i cg G G 7 w3 ZÓC7n 3 C A C Aÿ ý 3 Ðû càä34 á Ë s8 ä 0 ã 1 B B F ó ñ Ë Ê c 8 K D w3 3gA x38 äC3 a ààs8 A b às B Ó w A A A A Ó ä9 MG F G X Ó2g æmEX r ód tmE æ g Ò B ùPúQûTóc 4s C C 3oÿ 3 ÿÿ 8â FÚ A Ó8 Ä ã ÑÌ à 8 À àz áÿÿ ð õ OCgchð VsdCb t0á E a ca i v0éÿu ECb ò t á E a5â 1 ÿt 9 0áCb ÿt 9 ø a q p 1 Q q Ðsd w seób r B i h o OA R c t Ü ä åü5 ü4 áü1 b d b B b q B b e ç b B b q B b á f EÑ AÐ AÒAÑ Ñ a Ð Ñ q ób r B o Sjc a üã0Ø a g Ñ ãa cìR2 r ch 2 8Ñ 4d èQ a áì1 Ux d i Ð á ä ì4ãe á 9 1Ð Õ ãdãa â cü22 c r Ñ â cü22 r c á2 ü1 cìR2 c3 1 Ð á äì4ãe á 9 â Ñü2 c2 c r á â ãa cü22 r c á2 ü1 cìR2 c r á Ñ ìRãa c2 c r2 âì2 B i h o ön ðÿ ð ð Dh tõ õ L õ Äg OA R Ð Ð4áü1 U dG Ð4áü1 e ä V ü4 â cü22 c Ð äü44åü5 1 Ð á4å Ñü5 æü6 äü4 Ð áü1 c âü2 ä2 c áü11 ü4 V e Ð ä åü5 ü4 à à àób0r B o ðü s ð q æ OC T e v ón È LÐ å áì1 h a 1c GÐ áì1 U d Ð å d áâbì1 P 9Ð å d4Ð å äü4 ì5 áâbü1 PM Ð áì1 f ä Wü4 å a âb P à

    Original URL path: http://www.mazama.net/scheme/v12/pscheme.HPC_SH3.cab (2016-04-30)
    Open archived version from archive

  • Pocket Scheme Language Reference
    d l e r s o r b o d y d e l a y i n v a l i d s y n t a x b a d v a l u e s l i s t m i s s i n g k e y b a d c l a u s e i m p r o p e r v a r i a b l e d e c l a r a t i o n s i m p r o p e r t e s t e x i t n o t e s t o r b o d y n o v a r i a b l e s t e s t o r b o d y i l l f o r m e d s e q u e n c e n o b o d y n o f o r m a l s o r b o d y n o v a r i a b l e s o r b o d y n o e x p r e s s i o n w r o n g n u m b e r o f v a l u e s d e f i n e m a c r o m i s p l a c e d d e f i n e n o t s y m b o l w r o n g n u m b e r o f e x p r e s s i o n s m u s t b e s y m b o l o r l i s t d u p l i c a t e b i n d i n g f o r m a l s n o t a l i s t n o p r o c e d u r e p a r a m e t e r s n o p r o c e d u r e a r g u m e n t s d o n o t e n d w i t h a l i s t m i s s i n g a r g u m e n t l i s t c a n n o t e v a l u a t e i m p r o p e r l i s t n o t a p r o c e d u r e m u s t h a v e o n l y o n e v a l u e t o o m a n y a r g u m e n t s t o p r o c e d u r e S t a c k t r a c e s d i s a b l e d S t a c k t r a c e s e n a b l e d l i n e s h e a p m i s c o n f i g u r e d c a n n o t b o o t S c h e m e l o w m e m o r y o p e n f i l e s t o o m a n y p r o t e c t e d r e g i s t e r s e x h a u s t e d s t o r a g e i n p u t p o r t o u t p u t p o r t i n p u t o c t e t s t r e a m o u t p u t o c t e t s t r e a m r e a d c h a r p e e k c h a r c h a r r e a d y w r i t e c h a r f o r c e o u t p u t c l o s e p o r t r e a d o c t e t w r i t e o c t e t d a t a r e a d y b a d o c t e t v a l u e r e t u r n e d c a n n o t c l o s e n u l l p o r t i n v a l i d o c t e t s t r e a m h a n d l e r i n v a l i d p o r t h a n d l e r n o t a n o p e n o u t p u t p o r t o r o c t e t s t r e a m n o t a n o u t p u t o c t e t s t r e a m c l o s e d o c t e t s t r e a m n o t a n i n p u t o c t e t s t r e a m n o t a n o u t p u t p o r t c l o s e d p o r t n o t a n i n p u t p o r t x Ð t r u n c a t e i f e x i s t s a p p e n d i f e x i s t s e r r o r i f e x i s t s u p d a t e m u s t e x i s t i n p u t o u t p u t n o t a r a w f i l e c o u l d n t a p p e n d c o u l d n t t r u n c a t e u n k n o w n o u t p u t f i l e m o d e t o o m a n y o u t p u t f i l e b u f f e r s i z e s t o o m a n y o u t p u t f i l e m o d e s u n k n o w n o u t p u t f i l e o p t i o n c a n t s e t p o s i t i o n o n a p p e n d m o d e f i l e c o u l d n o t o p e n c o u l d n t g e t p o s i t i o n c o u l d n t s e t p o s i t i o n o f f s e t i n t o f i l e t o o l a r g e u n k n o w n c l o s e d f i l e t f x 0 4 x x 0 2 x c n e w l i n e s p a c e D O n e x t i t e r a t i o n i n v a l i d r a d i x f o r i n e x a c t n u m b e r i n v a l i d r a d i x l o l X l d 0 g q u a s i q u o t e u n q u o t e u n q u o t e s p l i c i n g u n r e c o g n i z e d l i t e r a l s y n t a x e i d b x o E I D B X O E n d o f f i l e w i t h i n c h a r a c t e r l i t e r a l u n r e c o g n i z e d c h a r a c t e r l i t e r a l n e w l i n e s p a c e E n d o f f i l e w i t h i n s t r i n g l i t e r a l E e S s F f D d L l m i s p l a c e d d o t i n l i s t u n q u o t e o r u n q u o t e s p l i c i n g n o t i n q u a s i q u o t e t e m p l a t e U n e x p e c t e d r i g h t p a r e n t h e s i s U n e x p e c t e d e n d o f f i l e b u f f e r o v e r f l o w s t r i n g o r s y m b o l t o o l o n g i n v a l i d n u m e r i c l i t e r a l s t r i n g n u m b e r i n v a l i d b a s e m i s s i n g c l o s i n g p a r e n t h e s i s a t e n d o f l i s t d e f a u l t e x c e p t i o n h a n d l e r U n h a n d l e d e x c e p t i o n i n p u t o u t p u t e x n i o e x n u s e r a c c e s s v i o l a t i o n o r d a t a m i s a l i g n m e n t f a i l e d t o a l l o c a t e s t o r a g e f r o m s y s t e m e x n h e a p u s e r i n t e r r u p t e x n b r e a k f a i l e d t o r e s e t t o t o p l e v e l c o u l d n o t u n w i n d d y n a m i c s t a t e E R R O R C R I T I C A L E R R O R E R R O R p r e b o o t F A T A L E R R O R d u r i n g c r i t i c a l c o d e s e c t i o n n o t a p r o c e d u r e o f o n e a r g u m e n t e x n s y s t e m w a r n i n g n o d i r e c t o r y c o u l d n o t l o a d f i l e n o t a P o c k e t S c h e m e e x t e n s i o n i n i t p s c h e m e e x t c o u l d n o t l o a d P o c k e t S c h e m e e x t e n s i o n m o d u l e s c a r c d r c a d r v e c t o r l i s t a p p e n d n o t n u l l e q z e r o p a i r v e c t o r d y n a m i c w i n d e r r o r c a l l e c c u r r e n t e x c e p t i o n h a n d l e r r a i s e o r a n d d o c o n d c a s e d e l a y w i t h h a n d l e r s t r a c e c o n s s e t c a r s e t c d r e q v e q u a l e v a l c a l l c c define call with current continuation call cc s t r i n g s y m b o l s y m b o l s t r i n g p r o c e d u r e b o o l e a n s y m b o l r e a d w r i t e d i s p l a y n u m b e r s t r i n g s t r i n g n u m b e r e o f o b j e c t c u r r e n t i n p u t p o r t c u r r e n t o u t p u t p o r t m i n m a x a b s s q r t e x p t e x p l o g s i n c o s t a n a s i n a c o s a t a n i n e x a c t i n e x a c t e x a c t p o s i t i v e n e g a t i v e o d d e v e n q u o t i e n t m o d u l o r e m a i n d e r g c d l c m f l o o r c e i l i n g t r u n c a t e r o u n d n u m e r a t o r d e n o m i n a t o r l i s t l e n g t h c a a r c d a r c d d r c a a a r c a a d r c a d a r c a d d r c d a a r c d a d r c d d a r c d d d r c a a a a r c a a a d r c a a d a r c a a d d r c a d a a r c a d a d r c a d d a r c a d d d r c d a a a r c d a a d r c d a d a r c d a d d r c d d a a r c d d a d r c d d d a r c d d d d r m e m q m e m v m e m b e r a s s o c a s s v a s s q l i s t r e f l i s t t a i l r e v e r s e c h a r c h a r c h a r c h a r c h a r c i c h a r c i c h a r c i c h a r a l p h a b e t i c c h a r n u m e r i c c h a r w h i t e s p a c e c h a r u p p e r c a s e c h a r l o w e r c a s e c h a r i n t e g e r i n t e g e r c h a r c h a r u p c a s e c h a r d o w n c a s e m a k e s t r i n g s t r i n g l i s t s t r i n g s t r i n g r e f s t r i n g s e t s u b s t r i n g s t r i n g s t r i n g a p p e n d s t r i n g l e n g t h s t r i n g s t r i n g s t r i n g s t r i n g c i s t r i n g c i s t r i n g c i s t r i n g l i s t s t r i n g c o p y s t r i n g f i l l m a k e v e c t o r v e c t o r l i s t v e c t o r v e c t o r r e f v e c t o r s e t v e c t o r l e n g t h v e c t o r f i l l m a p f o r e a c h f o r c e c o o k i n p u t c o o k o u t p u t c l o s e i n p u t p o r t c l o s e o u t p u t p o r t i n p u t p o r t o u t p u t p o r t l o a d define call with escape continuation call ec w i t h f i x e d s y s t e m s t a c k g e n s y m q u i t r e s e t c u r r e n t e r r o r p o r t o p e n i n p u t s t r i n g o p e n o u t p u t s t r i n g g e t o u t p u t s t r i n g o p e n i n p u t r a w v e c t o r o p e n o u t p u t r a w v e c t o r o p e n o u t p u t r a w v e c t o r g e t o u t p u t r a w v e c t o r m a k e i n p u t p o r t m a k e o u t p u t p o r t m a k e i n p u t o c t e t s o u r c e m a k e o u t p u t o c t e t s i n k l o a d o n c e f i n d l i b r a r y f i l e l i b r a r y d i r e c t o r y i n s t a l l d i r e c t o r y a s h b i t a n d b i t o r b i t x o r b i t n o t m a k e l i s t a p p e n d 2 a p p e n d r e v e r s e b u t l a s t l a s t s t r i n g b r e a k u p s t r i n g u n b r e a k u p r e a d s t r i n g r e a d s t r i n g r e a d l i n e w r i t e s t r i n g m a k e r a w v e c t o r r a w v e c t o r r a w v e c t o r t y p e r a w v e c t o r l e n g t h r a w v e c t o r r e f r a w v e c t o r s e t c u r r e n t d i r e c t o r y c r e a t e d i r e c t o r y d e l e t e d i r e c t o r y d i r e c t o r y l i s t c o p y f i l e m o v e f i l e d e l e t e f i l e s l e e p s y s t e m s y s t e m w a i t e x i t c u r r e n t m i l l i s e c o n d s r a w i n p u t s o u r c e r a w o u t p u t s i n k c l o s e r a w i n p u t s o u r c e c l o s e r a w o u t p u t s i n k o p e n r a w i n p u t f i l e o p e n r a w o u t p u t f i l e f i l e e x i s t s d i r e c t o r y e x i s t s f i l e p o s i t i o n f i l e b u f f e r s i z e c o o k c h a r e n c o d i n g c o o k n e w l i n e e n c o d i n g r e a d r a w n u m b e r w r i t e r a w n u m b e r r e a d r a w i e e e 7 5 4 w r i t e r a w i e e e 7 5 4 r e a d r a w n u m b e r b l o c k r e a d r a w i e e e 7 5 4 b l o c k r e a d r a w n u m b e r b l o c k w r i t e r a w n u m b e r b l o c k c h a r u n i c o d e u n i c o d e c h a r r e a d r a w s t r i n g w r i t e r a w s t r i n g r a w s t r i n g l e n g t h f o r e i g n f o r e i g n i n t e g e r i n t e g e r f o r e i g n f o r e i g n s t r i n g f o r e i g n r a w v e c t o r s t r i n g f o r e i g n r a w v e c t o r f o r e i g n u n t r a c e d e b u g h e a p i n f o g c g c r e s e t s t a t s g c s t a t s g c v e r b o s e v e r s i o n v o i d o b j e c t v o i d e r r o r w h i l e r e a d i n g d i r e c t o r y c a n n o t o p e n d i r e c t o r y n o a r c h i v e n o d i r e c t o r y n o h i d d e n n o r e a d o n l y n o s y s t e m c a n n o t m o v e f i l e c a n n o t c o p y f i l e c a n n o t d e l e t e f i l e 0 3 l u l u c a n n o t d e l e t e d i r e c t o r y c a n n o t c r e a t e d i r e c t o r y c a n n o t s e t c u r r e n t d i r e c t o r y w 3 2 h o s t h w n d e x n w 3 2 f a i l e d t o a l l o c a t e h e a p f o r s t r i n g s a n d v e c t o r s f a i l e d t o a l l o c a t e h e a p f o r c o n t i n u a t i o n s f a i l e d t o a l l o c a t e h e a p f o r n o n f r e e a b l e s t o r a g e ÿÿÿÿ þ ò éê ¼þ fR ÎÀþ T½ ú ÿÄþ null n u l l À ð ÿÿÿÿÿÿ ÿÿÿÿÿÿï exp pow log log10 sinh cosh tanh asin acos atan atan2 sqrt sin cos tan ceil floor fabs modf ldexp cabs hypot fmod frexp y0 y1 yn 4 l X l t HÈ À ÄXÌHðyÐ ÔHÈ ØXÜ àX Y I Y 0IÄ 4 8IÄ 0 8 H L P X h l p x ¼ À Ì Ð Ô Ø à ä è ô ø ü 0 4 D H L X l p x ¼ È Ì Ü à ð ô ø ü 0 8 H P T h l t x ¼ À È Ô Ø à ì ð ø 4 8 D L P X d p t ¼ Ä È Ð Ô Ü à è ì ô ø À 0 0 0 0 0 0 0 00040 4 8 L P d p t x À Ä È Ô Ø Ü è ì ð ü 8 8 L P T d h t x Ä È Ì Ø Ü à ì ð ô 0 0 D P T X d h l x ¼ È Ì Ð Ü à ä ð ô ø 0 4 D H T X h l p ¼ À Ì Ð Ô à ä è ô ø ü à Ø 0 0 0 0 0 0004080D0H0L0X0 0 0l0p0t0 0 0 0 0 0 0 0 0 0¼0À0Ä0Ð0Ô0Ø0ä0è0ì0ø0ü0 1 1 1 1 1 1 14181 0 4 D H T X h l p ¼ À Ì Ð Ô à ä è ô ø ü 0 4 8 D H L X l p t ¼ À Ä Ð Ô Ø ä è ì ø ü ð 0 0 0 0 0 0 04080 Language Reference Pocket Scheme abides by the R4RS language standard It extends the base language with richer control structures additional intrinsic procedures in core domains such as I O and a number of optionally loaded extension libraries for application specific domains such as networking Topics Standards compliance Control structures Intrinsic procedures Extension libraries Standards compliance R4RS Pocket Scheme follows the standard specified in R4RS with the following caveats Supports only a subset of the full Scheme tower of numerical types Pocket Scheme does not support complex numbers in either polar or rectangular notation All inexact values use an internal floating point representation of limited precision and arithmetical accuracy Does not support the macro facility specified in the appendix to the Report Pocket Scheme instead supports the Gambit define macro syntax The following optional R4RS procedures are not supported in Pocket Scheme make rectangular make polar real part imag part magnitude angle transcript on transcript off R5RS Pocket Scheme does not abide by R5RS for want of standard macros multiple return values and standard environments Note that Pocket Scheme does support the R5RS dynamic wind and eval procedures though it doesn t support the R5RS notion of environments and uses the R5RS definition of call with current continuation For completeness here are the unsupported R5RS procedures define syntax let syntax letrec syntax syntax rules values call with values scheme report environment null environment interaction environment Up Next Control structures Pocket Scheme extends the standard Scheme control mechanisms in two ways an additional flavor of continuation and an exception handling mechanism Topics Continuations Exceptions Up Next Continuations In addition to the conventional Scheme reentrant continuations Pocket Scheme also supports a cheaper weaker flavor of continuation the escape continuations of Rice University s MzScheme implementation An escape continuation also known as a weak continuation is valid only for the duration of its dynamic extent and can be used only to escape to the context of its creation Escape continuations are much cheaper to create than regular reentrant continuations To bind an escape continuation use the call with escape continuation function abbreviated call ec in just the fashion that you would use call cc See also Up Next Exception handling Pocket Scheme implements the Friedman Haynes Dybvig exception handling proposal of 4 September 1995 Q v http www cs indiana edu scheme repository doc proposals exceptions html For more information on the procedures raise and current exception handler and the syntactic form with handlers go here Exception structure By convention Pocket Scheme uses cons structures as exception values The car of the cons cell is a symbol differentiating the type of exception while the cdr is a value specific to the type of exception Exception types Type Description exn io I O error cadr exn is a description cddr exn typically either the port on which the exception arose or an integer error code exn read Unrecognized character name mismatched parentheses etc cadr exn is a description cddr exn an object exn eval Raised by the evaluator typically in response to a syntax error cadr exn is a description cddr exn an object exn type Wrong type passed to a procedure cadr exn is a description cddr exn an object exn range Type was correct but the value was out of the valid range cadr exn is a description cddr exn an object exn math Division by zero etc cadr exn is a description cddr exn the number exn heap A recoverable memory panic exn system An access violation or datatype misalignment cadr exn is the numeric exception code from the system exn user User code call to the error procedure cdr exn is the list of parameters passed to the procedure exn break The user selected Scheme Break from the UI Extension libraries may define their own exception types as well Example The following two equivalent expressions demonstrate the use of call ec and with handlers Each expression prints Start then returns the value 2 call ec lambda k display Start newline k 2 display Later newline 1 with handlers lambda x eq car x two lambda x 2 lambda x eq car x four lambda x 4 display Start newline raise cons two 1 Caveats The following expression looks tail recursive but isn t let loop with handlers lambda x t lambda x t do something loop Up Procedures intrinsic to Pocket Scheme Pocket Scheme supports all built in procedures of standard Scheme excluding only a few optional routines This document will not describe these standard procedures unless Pocket Scheme extends them in some fashion Topics Flow of control SRFI support Read eval Macros Debugging Memory management Loading programs External programs Files and directories Low level I O Text I O Soft ports Raw vectors Strings Numerics Foreigns List utilities Miscellaneous procedures Up Next Flow of control call with escape continuation proc value of proc Calls its argument passing that procedure the caller s continuation This continuation is valid only for the dynamic extent of the current call as contrasted to continuations captured by call with current continuation which have unlimited extent Abbreviation call

    Original URL path: http://www.mazama.net/scheme/v12/pscheme.HPC_MIPS.cab (2016-04-30)
    Open archived version from archive

  • Pocket Scheme Language Reference
    sink capable of delivering unprocessed octets to a new file of that name open input raw vector u8vec start end raw input source Creates a raw input source that delivers octets from a u8 raw vector The optional start and end parameters if supplied specify a half open range of indices into the raw vector Compare with open input string open output raw vector raw output sink Creates a raw output sink that accumulates octets written to it A subsequent call to get output raw vector on this sink will return those octets Compare with open output string get output raw vector osnk u8 raw vector Called on a raw output sink returned by open output raw vector returns a raw vector containing all octets written to that sink Compare with get output string open output raw vector u8vec start end raw output sink Creates a raw output sink that stores its octets in the given raw vector u8vec Such an output sink requires no subsequent call to get output raw vector The optional start and end parameters if supplied specify a half open range of indices into the raw vector raw input source obj Boolean Returns t if object is a raw input source f otherwise raw output sink obj Boolean Returns t if object is a raw output sink f otherwise file position isrc offset integer Returns the number of octets previously read from a raw input file or written to a raw output file With an offset seeks within the stream as if the specified number force output osnk void Ensures that any octets potentially buffered in an output stream have been written to the backing device octets ready isrc count Boolean Returns t if the specified raw input source has data ready for the specified number of calls to read octet default 1 or at EOF or if EOF is within the specified count f otherwise A return value of f means that a read call may potentially block On streams associated with non interactive devices and counts greater than 1 the system may use this as a hint to read ahead close raw input source isrc void Close the specified raw input source making it incapable of producing octets close raw output sink osnk void Close the specified raw output sink making it incapable of consuming octets Up Numeric I O read octet isrc integer Takes a single raw input source Returns exact integer in range 0 255 or the eof object at end of stream write octet octet osnk void Takes two parameters an exact integer in the range 0 255 and an raw output sink Returns nothing read raw number isrc count endian signed integer Reads a sequence of octets from the stream interpreting them as a raw machine integer count is an exact nonnegative integer specifying the number of octets to read it must have the value 1 2 4 or 8 The optional Boolean signed parameter if supplied and true specifies to interpret the sequence as a twos complement representation of a signed integer otherwise the result will be interpreted as unsigned with the procedure returning a nonnegative value The optional endian keyword symbol parameter specifies the order in which to interpret the octets as successive base 256 digits of an exact integer unspecified the implementation uses the host s default order The procedure returns the eof object at end of file or otherwise if it can read fewer than the specified count of octets The endian parameter may take any one of the following values Keyword Encoding big endian most significant byte first little endian least significant byte first network synonym for big endian native use the ordering of the local hosting system host synonym for native write raw number osnk n count endian void Take the specified value n and encode it onto the output sink osnk as a sequence of octets n must be an exact integer If it is negative the encoding will be two s complement signed otherwise it will be unsigned The emitted encoding will occupy the specified count of base 256 digits arranged per the endian attribute read raw ieee754 isrc count endian real Reads a sequence of octets from the stream interpreting them as an IEEE 754 floating point number and returning an inexact real quantity count must be an exact integer one of 4 or 8 The procedure will return f if it cannot honor found NaN INF or INF values write raw ieee754 osnk x count endian void Take the specified value x and encode it onto the output sink osnk as a sequence of octets in IEEE754 format and encode it as a sequence of octets in IEEE 754 format count must be an exact integer one of 4 or 8 Up Block numeric I O read raw number block isrc element count octet count endian signed raw vector or EOF Returns a raw vector where each element of the vector has been read from the stream by read raw number The procedure reads up to element count items from the stream or fewer upon encountering end of file If the stream contains insufficient data to compose even a single raw number i e fewer than octet count octets the procedure will return the eof object The returned raw vector will be of a type that can accommodate the given values of octet count and signed e g 2 and t would return a s16 raw vector Note that this procedure does not test for octets ready Stream octet count element count it reads for the entire amount blocking and taking what it can get Also since raw input sources support neither pushback nor read ahead any odd octets immediately before end of file will be lost after the manner of the posix fread 3 call read raw ieee754 block isrc element count octet count endian raw vector or EOF Similar to read raw number block only decoding per IEEE 754 floating point format and returning a f32 or f64 raw vector octet count must be either 4 or 8 read raw number block uvec isrc endian start end integer or EOF Similar to read raw number block or read raw ieee754 block but destructively modifying an existing raw vector reading elements into that vector at the half open start end interval octet count and signed cf previous calls are inferred from the type of the raw vector Returns the number of elements read or the EOF object at the end of file write raw number block uvec osnk endian start end void Writes the specified elements of the vector to the stream as if by write raw number or write raw ieee754 octet count and signed cf previous calls are inferred from the type of the raw vector emitting single precision floats from a f32 double precision floats from a f64 Up Character encoding Many of these procedures take one or more external format arguments describing the manner in which a character is encoded on the stream Symbol Encoding ascii 7 bits of ASCII character code within an 8 bit octet with the eighth bit clear latin 1 8 bits of Latin 1 character code in an 8 bit octet ucs 2be 16 bits of UCS 2 character code in two octets big endian ucs 2le 16 bits of UCS 2 character code in two octets little endian ucs 2 16 bits of UCS 2 character code in two octets arranged host native unicode Synonym for ucs 2 system ansi Default Windows codepage on the device May represent one character in either one or two octets crlf newline newline Scheme character represents two external characters CR LF as seen in TCP network protocols and Microsoft disk text files This format is composable with any other external format lf newline newline Scheme character represents one external character LF as seen in Unix disk text files This format is composable with any other external format emit bom Emitted data includes a byte order mark Output only Composable with any Unicode external format suppress bom Emitted data does not include a byte order mark Output only Composable with any Unicode external format unicode char n character or f The fundamental character constructor Returns the character corresponding to the specified Unicode codepoint If it cannot represent the specified value it will return f integer char n character Per R4RS Synonym for unicode char Note that this does not deliver the order preserving isomorphisms of R4RS char unicode c integer Returns the Unicode codepoint value corresponding to the specified character char integer c integer Per R4RS Synonym for char unicode Again note that this does not deliver the order preserving isomorphisms of R4RS read raw string isrc octet count external format string or EOF Reads octet count octets from the specified input source decoding them into characters per the specified external format and returning a new string of the characters Will return EOF if insufficient octets remain on the stream to decode even a single character raw string length str external format start end integer Returns the number of octets that the given string str would require for the specified external format The optional start and end are half open indices into the string per SRFI 13 the scsh read string primitive or the standard procedure substring write raw string str osnk external format start end void Encodes the characters in the given string str onto the output sink start and end are half open indices into the string cook input source isrc octet count external format input port Given a raw input source create a proper input port that decodes from the stream That input port will consume octet count octets from the stream returning EOF once it has consumed the specified count octet count may also be f in which case the input port will read from its backing stream until it completely exhausts the stream or until close input port is called on the port While this port is open it is an error to call cook input source to create another such port on the same stream and calling read octet and its ilk will have unspecified effects since the new port may be caching octets from its stream A program may close a character port before it exhausts its specified octet count whereupon any external format procedure will be called one last time with EOF Subsequent calls to read octet on the stream will then act as if a full octet count number of calls to read octet had taken place cook output sink osnk external format output port Given an output sink create a proper output port that encodes onto the stream While this port is open it is an error to call cook output sink to create another such port on the same sink and calling write octet and its ilk will have unspecified effects since the new port may be deferring encoding cook char encoding port symbol Returns a symbol representing the character encoding scheme on the given port The port must be connected to external data e g one created by open output file but not open output string cook newline encoding port symbol Similar to cook char encoding this procedure returns a symbol representing the newline encoding scheme on the given port This will be either crlf newline or lf newline The port must be connected to external data Up Text I O open input file filename flags input port Per R4RS The flags may be any appropriate combination of external format specifiers If no external format specifiers are supplied the systems attempts to determine the format of the opened file and supply the correct data conversion It is an error to open a file that does not exist or cannot be read See file exists with input from file filename thunk flags value Per R4RS supporting the flags of open input file call with input file filename proc flags value Per R4RS supporting the flags of open input file with input from port port thunk value Generalization of with input from file for any port open output file filename flags output port Per R4RS The flags may be a combination of external format specifiers or the following behavioral specifiers Flag Behavior truncate if exists If opened file already exists truncate it to length 0 before writing append if exists If opened file already exists append data to its end error if exists If opened file already exists raise an exception update must exist If opened file does not already exist raise an exception with output to file filename thunk flags value Per R4RS supporting the flags of open output file call with output file filename proc flags value Per R4RS supporting the flags of open output file with output to port port thunk value Generalization of with output to file for any port force output port void Force an output port or raw octet sink to deliver any cached data Without a parameter defaults to the current output port read string port count string Read characters from the specified port up to the number of characters specified If no character count is specified reads up to a newline character Returns the string of characters or the EOF object at end of file read string string port start end integer Read characters from the specified port into the specified string If the call specifies start and end it enters the characters into the string at the half open interval start end per the substring procedure Return the number of characters read or the EOF object at end of file read line port string Read a single line of input as a string read line differs from read string without a character count by eliding the terminating newline character from the returned string Returns the string or the EOF object at end of file write string string port start end void Writes characters from the specified string into the specified port If the call specifies start and end it takes the charactes from the string at the half open interval start end per the substring procedure Return the number of characters read or the EOF object at end of file Up Soft ports make input port handler input port Creates a new input port that queries the procedure handler for its content An input port handler is a variable arity procedure called with one of the following symbols as its first argument Flag Effect read char Return a character peek char Return a character A subsequent call to read or peek will return this same character char ready Return t if a read will not block per the semantics of the standard Scheme procedure of this name close port Port is closing make output port handler output port Creates a new output port that queries the procedure handler for the disposition of its content An output port handler is a variable arity procedure called with one of the following symbols as its first argument Flag Effect write char Second argument is a character to write force output Write any pending cached data close port Port is closing make input octet source handler raw input source Similar to make input port but creates a raw input source rather than an input port Its handler delivers octets not characters Flag Effect read octet Return an octet data ready Return t if a read will not block per the semantics of the Pocket Scheme procedure of this name Second argument is the number of octets expected close port Octet source is closing make output octet sink handler raw output sink Similar to make output port but creates a raw output sink rather than an output port Its handler receives octets not characters Flag Effect write octet Second argument is an octet to write force output Write any pending cached data close port Octet sink is closing Up Raw vectors The raw vector data type provides Pocket Scheme with an efficient medium for binary file I O Unlike standard Scheme vectors raw vectors have homogeneous numeric elements with a range limited by the fundamental raw machine datatype of the vector Name Raw machine type u8 unsigned 8 bit exact integer s8 signed 8 bit exact integer u16 unsigned 16 bit exact integer s16 signed 16 bit exact integer u32 unsigned 32 bit exact integer s32 signed 32 bit exact integer u64 unsigned 64 bit exact integer s64 signed 64 bit exact integer f32 single precision 32 bit inexact real f64 double precision 64 bit inexact real Raw vectors are similar to the arrays of SIOD the uniform vectors of SCM or the homogeneous numeric vectors of Gambit and SRFI 4 q v http srfi schemers org srfi 4 srfi 4 html make raw vector k type raw vector Create a new raw vector with k elements of the specified type raw vector ref v i number Return the index i element of raw vector v raw vector set v i d void Set the index i element of raw vector v to value d raw vector object Boolean Predicate returning t if the argument is a raw vector raw vector length v integer Returns the number of elements in a raw vector raw vector type v symbol Returns the symbol naming the type of a raw vector This will be one of the symbols in the table above Up Strings string breakup source separator list Scan the given string source returning a list of its substrings as delimited by the substring separator string unbreakup string list separator string Concatenate all strings in string list separating them by the string separator For any string s and any separator r the following relation holds string s string unbreakup string breakup s r r Up Numerics zero number Boolean Per the Scheme standard In addition to numbers this predicate will accept a

    Original URL path: http://www.mazama.net/scheme/v12/pscmref.htm (2016-04-30)
    Open archived version from archive


  • BOOL seems to work for a global loop to WM QUIT treatment define GetMessage w32 foreign procedure userdll GetMessageW w32api bool lpvoid handle dword dword define GetMessage2 w32 foreign procedure userdll GetMessageW w32api dword lpvoid handle dword dword define TranslateMessage w32 foreign procedure userdll TranslateMessage w32api bool lpvoid define DispatchMessage w32 foreign procedure userdll DispatchMessageW w32api dword lpvoid define IsWindow w32 foreign procedure userdll IsWindow w32api bool handle define PostQuitMessage w32 foreign procedure userdll PostQuitMessage w32api void dword define GetClientRect w32 foreign procedure userdll GetClientRect w32api bool handle lpvoid define GetWindowRect w32 foreign procedure userdll GetWindowRect w32api bool handle lpvoid define InvalidateRect w32 foreign procedure userdll InvalidateRect w32api bool handle lpvoid bool define UpdateWindow w32 foreign procedure userdll UpdateWindow w32api bool handle N b RegisterClass is pre loaded as w32 register class define UnregisterClass w32 foreign procedure userdll UnregisterClassW w32api bool lpcwstr handle define CS VREDRAW x0001 define CS HREDRAW x0002 define CS DBLCLKS x0008 define CS PARENTDC x0080 define CS NOCLOSE x0200 define CS GLOBALCLASS x4000 define GetStockObject w32 foreign procedure gdidll GetStockObject w32api handle dword define SelectObject w32 foreign procedure gdidll SelectObject w32api handle handle handle define WHITE BRUSH 0 define LTGRAY BRUSH 1 define DKGRAY BRUSH 3 define BLACK BRUSH 4 define NULL BRUSH 5 define HOLLOW BRUSH NULL BRUSH define WHITE PEN 6 define BLACK PEN 7 define BeginPaint w32 foreign procedure userdll BeginPaint w32api handle handle lpvoid define EndPaint w32 foreign procedure userdll EndPaint w32api bool handle lpvoid define FillRect w32 foreign procedure userdll FillRect w32api bool handle lpvoid handle define Polyline w32 foreign procedure gdidll Polyline w32api bool handle lpvoid dword BUGBUG FFI presently lacks ability to convert a negative numeric argument These should be int not dword define SetPixel w32 foreign procedure gdidll SetPixel w32api dword handle dword dword dword define Rectangle w32 foreign procedure gdidll Rectangle w32api bool handle dword dword dword dword define Ellipse w32 foreign procedure gdidll Ellipse w32api bool handle dword dword dword dword define CreatePen w32 foreign procedure gdidll CreatePen w32api handle dword dword dword define PS SOLID 0 define CreateSolidBrush w32 foreign procedure gdidll CreateSolidBrush w32api handle dword drawtext prototype is in wingdi h but the code resides in user32 dll define DrawText w32 foreign procedure userdll DrawTextW w32api bool handle lpcwstr dword lpvoid dword define DT TOP x00000000 define DT LEFT x00000000 define DT CENTER x00000001 define DT RIGHT x00000002 define DT VCENTER x00000004 define DT WORDBREAK x00000010 define DT SINGLELINE x00000020 define SetWindowPos w32 foreign procedure userdll SetWindowPos w32api bool handle handle dword dword dword dword dword define HWND TOP 0 define HWND TOPMOST integer foreign xffffffff define HWND NOTOPMOST integer foreign xfffffffe define HWND BOTTOM integer foreign 1 define SWP NOSIZE x0001 define SWP NOMOVE x0002 define SWP NOZORDER x0004 define SWP NOREDRAW x0008 define SWP NOACTIVATE x0010 define SWP FRAMECHANGED x0020 define SWP SHOWWINDOW x0040 define SWP HIDEWINDOW x0080 define SWP NOCOPYBITS x0100 define SWP NOOWNERZORDER x0200 define SWP NOSENDCHANGING x0400 define GetDC w32 foreign procedure userdll GetDC w32api handle handle define ReleaseDC

    Original URL path: http://www.mazama.net/scheme/v12/w32api.scm (2016-04-30)
    Open archived version from archive


  • define hinstance cond expand windows ce w32 host hinst on CE exported by pscheme exe windows nt 0 on NT fake it it s running within a console define parent hwnd cond expand windows ce w32 host hwnd on CE exported by pscheme exe windows nt getdesktopwindow on NT use desktop it s running within a console define event loop on wnd h let msg make MSG define next message in CE 2 0 GetMessage waits forever when called on a dead hwnd instead of returning 1 hence this fcn first tests with iswindow if iswindow h let res getmessage2 msg h 0 0 if or zero res res xffffffff f t f do f next message next message not f translatemessage msg dispatchmessage msg define event loop all let msg make MSG do f GetMessage msg 0 0 0 GetMessage msg 0 0 0 not f translatemessage msg dispatchmessage msg Necessary for any restart of the function in the same thread define empty msg queue let msg make MSG do f PeekMessage msg 0 0 0 PM REMOVE PeekMessage msg 0 0 0 PM REMOVE not f translatemessage msg dispatchmessage msg define MAX SQUARES 20 let h f CLIENT WIDTH 0 CLIENT HEIGHT 0 change color f brush colors BLACK BRUSH DKGRAY BRUSH LTGRAY BRUSH WHITE BRUSH palette iterator 3 brush color WHITE BRUSH number of squares 0 lower right make POINT array MAX SQUARES sai make SHACTIVATEINFO PPC define do paint window hdc define SQUARE SIZE quotient CLIENT WIDTH 6 if change color begin set palette iterator modulo palette iterator 1 4 set brush color vector ref brush colors palette iterator set change color f let hbrush getstockobject brush color pen color if integer lparam POINT y set pt HIWORD foreign integer lparam if POINT x pt quotient

    Original URL path: http://www.mazama.net/scheme/v12/sdkgeneric.smd (2016-04-30)
    Open archived version from archive


  • POWER x0048 define PWR OK 1 define PWR FAIL 1 define PWR SUSPENDREQUEST 1 define PWR SUSPENDRESUME 2 define PWR CRITICALRESUME 3 define WM COPYDATA x004A define WM CANCELJOURNAL x004B define WM NOTIFY x004E define WM INPUTLANGCHANGEREQUEST x0050 define WM INPUTLANGCHANGE x0051 define WM TCARD x0052 define WM HELP x0053 define WM USERCHANGED x0054 define WM NOTIFYFORMAT x0055 define NFR ANSI 1 define NFR UNICODE 2 define NF QUERY 3 define NF REQUERY 4 define WM CONTEXTMENU x007B define WM STYLECHANGING x007C define WM STYLECHANGED x007D define WM DISPLAYCHANGE x007E define WM GETICON x007F define WM SETICON x0080 define ICON SMALL 0 define ICON BIG 1 define WM NCCREATE x0081 define WM NCDESTROY x0082 define WM NCCALCSIZE x0083 define WM NCHITTEST x0084 define WM NCPAINT x0085 define WM NCACTIVATE x0086 define WM GETDLGCODE x0087 define WM NCMOUSEMOVE x00A0 define WM NCLBUTTONDOWN x00A1 define WM NCLBUTTONUP x00A2 define WM NCLBUTTONDBLCLK x00A3 define WM NCRBUTTONDOWN x00A4 define WM NCRBUTTONUP x00A5 define WM NCRBUTTONDBLCLK x00A6 define WM NCMBUTTONDOWN x00A7 define WM NCMBUTTONUP x00A8 define WM NCMBUTTONDBLCLK x00A9 define WM KEYFIRST x0100 define WM KEYDOWN x0100 define WM KEYUP x0101 define WM CHAR x0102 define WM DEADCHAR x0103 define WM SYSKEYDOWN x0104 define WM SYSKEYUP x0105 define WM SYSCHAR x0106 define WM SYSDEADCHAR x0107 define WM KEYLAST x0108 define WM IME STARTCOMPOSITION x010D define WM IME ENDCOMPOSITION x010E define WM IME COMPOSITION x010F define WM IME KEYLAST x010F define WM INITDIALOG x0110 define WM COMMAND x0111 define WM SYSCOMMAND x0112 define WM TIMER x0113 define WM HSCROLL x0114 define WM VSCROLL x0115 define WM INITMENU x0116 define WM INITMENUPOPUP x0117 define WM MENUSELECT x011F define WM MENUCHAR x0120 define WM ENTERIDLE x0121 define WM CTLCOLORMSGBOX x0132 define WM CTLCOLOREDIT x0133 define WM CTLCOLORLISTBOX x0134 define WM CTLCOLORBTN x0135 define WM CTLCOLORDLG x0136 define WM CTLCOLORSCROLLBAR x0137 define WM CTLCOLORSTATIC x0138 define WM MOUSEFIRST x0200 define WM MOUSEMOVE x0200 define WM LBUTTONDOWN x0201 define WM LBUTTONUP x0202 define WM LBUTTONDBLCLK x0203 define WM RBUTTONDOWN x0204 define WM RBUTTONUP x0205 define WM RBUTTONDBLCLK x0206 define WM MBUTTONDOWN x0207 define WM MBUTTONUP x0208 define WM MBUTTONDBLCLK x0209 define WM MOUSELAST x0209 define WM PARENTNOTIFY x0210 define MENULOOP WINDOW 0 define MENULOOP POPUP 1 define WM ENTERMENULOOP x0211 define WM EXITMENULOOP x0212 define WM NEXTMENU x0213 define WM SIZING x0214 define WM CAPTURECHANGED x0215 define WM MOVING x0216 define WM POWERBROADCAST x0218 define WM DEVICECHANGE x0219 define WM IME SETCONTEXT x0281 define WM IME NOTIFY x0282 define WM IME CONTROL x0283 define WM IME COMPOSITIONFULL x0284 define WM IME SELECT x0285 define WM IME CHAR x0286 define WM IME KEYDOWN x0290 define WM IME KEYUP x0291 define WM MDICREATE x0220 define WM MDIDESTROY x0221 define WM MDIACTIVATE x0222 define WM MDIRESTORE x0223 define WM MDINEXT x0224 define WM MDIMAXIMIZE x0225 define WM MDITILE x0226 define WM MDICASCADE x0227 define WM MDIICONARRANGE x0228 define WM MDIGETACTIVE x0229 define WM MDISETMENU x0230 define WM ENTERSIZEMOVE x0231 define WM EXITSIZEMOVE x0232 define WM DROPFILES x0233 define WM MDIREFRESHMENU x0234 define WM

    Original URL path: http://www.mazama.net/scheme/v12/w32message.scm (2016-04-30)
    Open archived version from archive