Subversion Repositories Kolibri OS

Rev

Rev 8728 | Rev 9050 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 8728 Rev 9010
Line 208... Line 208...
208 
BEGIN
 208 
BEGIN
209 
    SYSTEM.PUT(line.ptr + i*WCHAR_SIZE, c)
 209 
    SYSTEM.PUT(line.ptr + i*WCHAR_SIZE, c)
210 
END setChar;
 210 
END setChar;
Line -... Line 211...
- 
 
 211 
 
- 
 
 212 
 
- 
 
 213 
PROCEDURE move* (src, dst: tLine);
- 
 
 214 
BEGIN
- 
 
 215 
    SYSTEM.MOVE(src.ptr, dst.ptr, (MIN(src.length, dst.length) + 1)*WCHAR_SIZE)
- 
 
 216 
END move;
211 
 
 217 
 
212 
 
 218 
 
213 
PROCEDURE concat* (line: tLine; s: ARRAY OF WCHAR);
 219 
PROCEDURE concat* (line: tLine; s: ARRAY OF WCHAR);
214 
VAR
 220 
VAR
215 
    Len: INTEGER;
 221 
    Len: INTEGER;