diff options
| author | marco <marco@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2008-01-28 20:04:31 +0000 |
|---|---|---|
| committer | marco <marco@3ad0048d-3df7-0310-abae-a5850022a9f2> | 2008-01-28 20:04:31 +0000 |
| commit | dcfa03ea9cf858e75fa8fc30f85cbd2259458f9d (patch) | |
| tree | 8b7ad8dc03a0f2f17277a3ee3a55f00838c0630a /packages | |
| parent | e3902aab80f7def78235a2a7f17a0619d28e7c93 (diff) | |
| download | fpc-dcfa03ea9cf858e75fa8fc30f85cbd2259458f9d.tar.gz | |
* sw_word -> longint
git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@10086 3ad0048d-3df7-0310-abae-a5850022a9f2
Diffstat (limited to 'packages')
| -rw-r--r-- | packages/bzip2/src/bzip2.pas | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/packages/bzip2/src/bzip2.pas b/packages/bzip2/src/bzip2.pas index 5e6fdd19ff..b577dc1796 100644 --- a/packages/bzip2/src/bzip2.pas +++ b/packages/bzip2/src/bzip2.pas @@ -93,10 +93,10 @@ type Tcardinal_array=array [0..899999] of cardinal; procedure receive_mtf_values; procedure detransform; function decode_block:boolean; - procedure read(var buf;count:sw_word);virtual; + procedure read(var buf;count:Longint);virtual; procedure new_block; procedure consume_rle;inline; - procedure rle_read(bufptr:Pbyte;var count:sw_word); + procedure rle_read(bufptr:Pbyte;var count:Longint); destructor done;virtual; end; @@ -647,7 +647,7 @@ begin new_block; end; -procedure Tbzip2_decode_stream.rle_read(bufptr:Pbyte;var count:sw_word); +procedure Tbzip2_decode_stream.rle_read(bufptr:Pbyte;var count:Longint); var rle_len:cardinal; data:byte; @@ -702,7 +702,7 @@ rle_write: rle_run_left:=rle_len; end; -procedure Tbzip2_decode_stream.read(var buf;count:sw_word); +procedure Tbzip2_decode_stream.read(var buf;count:Longint); var bufptr:Pbyte; |
