fpcsrc/tests/webtbs/tw1931.pp


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18

Unit tw1931;

Interface

Const
        Space = #32;
        Tab = #9;
        Cr = #13;
        Lf = #10;
        CrLf = #13#10;
        Slash = '/';
        Dash = '-';
        Comma = ',';

Implementation

End {-- UChar --}.