Andrey.Slepuhin (pooh@msu.ru)
Wed, 29 Sep 1999 13:29:43 +0400
"Andrey.Slepuhin" wrote:
[snip]
> 2) ����������� ����� �� �������� ���������. ��� � ������� ������
> ������� ������������ ������, ���� ��� ����� ���� �������������
> ��������������� �� FLAC'� ���������� ������. � ����� ��������� ���������
> ������:
>
> ====================8<========================
> $use Stdio;
>
> $func F (e.lc) (e.lr) t.p (e.ls) t.u = e.res ;
> * $func F e = e ;
> $func G e = e ;
>
> Main =
> 1 :: t.p,
> 2 :: e.l,
> 3 :: t.u,
> <G t.p e.l t.u>;
>
> G {
> t.p e.l t.u,
> <WriteLN t.p>
> <WriteLN e.l>
> <WriteLN t.u>
> <F (e.l) ( ) t.p (e.l) t.u>;
> };
>
> F {
> (e.lc) (e.lr) t.p (e.ls) t.u,
> <WriteLN e.lr>,
> <WriteLN e.ls>;
> };
> ====================8<========================
>
> pooh@thicket:~/work/flac$ rfp test.rf
> Refal Plus Compiler Version 1.8.00.8b-32bit 1991 R.F.Gurin,
> S.A.Romanenko
> and RCMS PSI AS RUSSIA, Pereslavl-Zalessky,1993 Copyright (c)
> /usr/bin/gcc -g -c test.s
>
> Dynamic memory 6708
> Max dynamic memory 12076
> test : No errors
> /usr/bin/gcc -g test.o /usr/refal-plus/inc/rfp.a -o test.out
>
> File test.out created
>
> pooh@thicket:~/work/flac$ ./test.out
> 1
> 2
> 3
>
> 3
> pooh@thicket:~/work/flac$
>
> ������ ���� (����������, ���� ������������ ������������������
> ���������� ������� F):
>
> pooh@thicket:~/work/flac$ ./test.out
> 1
> 2
> 3
>
> 2
> pooh@thicket:~/work/flac$
>
> ����� �������� �� ��� � ��� �� �������. ���� � ����-������ ���� ���� -
> ���� ����� ����������.
>
> ����� ��� ������ ����� ���������� - ������ ����������� RPM'�.
>
> ����� �������,
> ������.
���� ������ ��� ���!
������� ����� ������������ - ������ � �����. ���� ���� � ���,
��� �� ����� swap'� ���� rlnod'��, ������� �������� � ��� ������
(8 ���� ���-����), ��� ������ ������ ������� ��� �����������
������������ ����� ���������. ����� ����������� ������ "������"
(�.�. ��� �����������) FLAC ����� �� ���������� � �������� ���������.
����� RPM'� ������ � ������.
����� �������,
������.
This archive was generated by hypermail 2.0b3 on Wed Sep 29 1999 - 13:37:23 MSD