| Server IP : 185.252.147.100 / Your IP : 216.73.217.33 Web Server : nginx/1.27.3 System : Linux mitrofanov.ru 6.1.0-37-amd64 #1 SMP PREEMPT_DYNAMIC Debian 6.1.140-1 (2025-05-22) x86_64 User : mitr ( 1000) PHP Version : 8.2.29 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : OFF | Sudo : ON | Pkexec : OFF Directory : /lib/x86_64-linux-gnu/guile/3.0/ccache/ice-9/ |
Upload File : |
ELF� @ � @ 8 @ � � � � � p p n@
� ; �? T
�? ; �? T �? ; @ T )@ �T (@ | � � /@ 3@ q U @ G @ � p � ` � P � ' 0 T
&@ |
� �
@ #@ q U
@ G
� ' T
'@ 4
) T %@ | � � @ "@ p U @ G ' P H
T
�? 4
) B0 > E L < LH H
T
�? 4
) B0 L < 2 LH H
T
�? 4
) B
0 L
< L
H
H
� ' �?
P T �? G @ ' ` ' �? | � � �? �? q U �? G' �?
G' @
;
�? B > L H
�
B L H
�
B L H
Bp >
L H
H
H
Bp > E L < ? LH H HHH HH
B @ > E L < � L H H H ; �? T �? | � � j? �? p U �? G � � '
�
H T �? � '
����
G � '
G ' @
p � �? ' GGGG| �e } �b K Y { �D 3@ p �> K[GOK > a r � j� �W` 5 HT �? | � � ? �? p U }? G` ' P | � � T 5? G' F���P GG� P ' ` ' & �? GGG' P G' P �
� GHGH���P ' & �? �?
G G | �
} �
K Y GG4 ' & s? �?
B0 > E L <
L HG ' ��� �?
0 G 0 ' 0 �
� ; m? T s? | � � �> p? p U j? G 0 @ ' ' m?
V > � ; > 1 U > U > V > � ; > 1 U > U > V
> > V > � ; > 1 U
> T > 1 U > V > � V
> � ; > 1 U > T
> 1 U > V
> � ; > 1 U > U %> V > � ; > 1 U > U > V > � ; > 1 U > U > V > > V > > V
> � ; > 1 U > T
> 1 U > V > � ; > 1 U > U > V > � V > � V > � ; > 1 U > V > � V 1> � V B> � V G> � V N> � V [> � V `> � ; [> 1 U _> U s> V _> � ; Z> 1 U ^> U j> V ^> � V g> Y> V h> � ; c> 1 U g> U y> V g> � V v> b> V i> � V r> d> V �> � V �> � � ' ice-9 ' buffered-input ' filename ' ice-9/buffered-input.scm ' exports ' make-buffered-input-port ' make-line-buffered-input-port ' ! set-buffered-input-continuation?! ' declarative? ' guile ' define-module* ' set-current-module ' buffered-input-continuation? ' make-object-property ' setter ' ' r ' make-soft-port ' char-whitespace? ' out-of-range '
string-ref ' Argument 2 out of range: ~S ' wrong-type-arg '
string-length ' 8 Wrong type argument in position 1 (expecting string): ~S '
'
string-append � ` � ` 8 a b � c � e � g � i j < k p l � m
("
`7 `7 � `7 `7 � � `7 ! H���, �� ��L �� ��L �� 4 ��P �� ���L��
�
8 � ���� ����� ���4��
���d�� L����� 0 H H � � � � `
* n < � � p E � M 0 � U � 5 k �
$ z � { � � 0 � � � 8 � � � � � � � � ` � � � @ � & � $ � $ \ � \ x � x � � � � ' * � �
d � d �
=_c hc �c� $,4 <(@0H8d8l8p8� ���� ������(�����"�*����*�� ��� ��
84 �� $ , 0 � ���_������_c_c
�� $"04(@D0P \:p8|B�B��:�:�����P��P�P�X� � ���� �����_������
� � $( , H*H*L3P0`
l*p
t x,|2�:�2�
�
�
������(��(�0�� �0�8��0�(�0�(��� ���� �� 0
0
0 48 < D �_c (4 �
( 8@\dh � \ � x � k � 3�� `
� �
� @/ 8= D = ` |V � �d � Xr HL �� l % . . . . Guile 3.0.8 set-buffered-input-continuation?! setter@@guile make-buffered-input-port get-character input-waiting make-line-buffered-input-port � U �
ice-9/buffered-input.scm ice-9/psyntax.scm ice-9/boot-9.scm � � �;� ,�a,,� ,�b,$� ,�b,� ��a 'J �6�C�)�;�m� ��J"Kj�"�)"�S ,;)� �m�i�,;%q�� .*K,! ,)�;E�m� �&_ h[?-%qh,Z�Y2
;� Y*K%i8.&,� � � @ # $ 8 1 \ 1 x | J � � X � X f H d � � l set-buffered-input-continuation?! setter@@guile make-buffered-input-port get-character input-waiting make-line-buffered-input-port closure arg cache var proc tmp buffered-input-continuation? set-buffered-input-continuation?! tag code make-buffered-input-port make-line-buffered-input-port val port arg0 arg1 reader read-string obj string-index v w0 unboxed ulen rlen s64 uidx start upos buf ptr mask bits uwpos u32 uchar res continuation? Set the read continuation flag for @var{port} to @var{val}.
See @code{make-buffered-input-port} for the meaning and use of this
flag. Construct a line-buffered input port from the specified @var{reader}.
@var{reader} should be a procedure of one argument that somehow reads
a chunk of input and returns it as a string.
The port created by @code{make-buffered-input-port} does @emph{not}
interpolate any additional characters between the strings returned by
@var{reader}.
@var{reader} should take a boolean @var{continuation?} argument.
@var{continuation?} indicates whether @var{reader} is being called to
start a logically new read operation (in which case
@var{continuation?} is @code{#f}) or to continue a read operation for
which some input has already been read (in which case
@var{continuation?} is @code{#t}). Some @var{reader} implementations
use the @var{continuation?} argument to determine what prompt to
display to the user.
The new/continuation distinction is largely an application-level
concept: @code{set-buffered-input-continuation?!} allows an
application to specify when a read operation is considered to be new.
But note that if there is non-whitespace data already buffered in the
port when a new read operation starts, this data will be read before
the first call to @var{reader}, and so @var{reader} will be called
with @var{continuation?} set to @code{#t}. Construct a line-buffered input port from the specified @var{reader}.
@var{reader} should be a procedure of one argument that somehow reads
a line of input and returns it as a string @emph{without} the
terminating newline character.
The port created by @code{make-line-buffered-input-port} automatically
interpolates a newline character after each string returned by
@var{reader}.
@var{reader} should take a boolean @var{continuation?} argument. For
the meaning and use of this argument, see
@code{make-buffered-input-port}. .guile.procprops .rodata .data .rtl-text .guile.frame-maps .dynamic .strtab .symtab .guile.arities.strtab .guile.arities .guile.docstrs.strtab .guile.docstrs .debug_info .debug_abbrev .debug_str .debug_loc .debug_line .shstrtab