diff options
author | Peter Breitenlohner <peb@mppmu.mpg.de> | 2011-04-19 13:44:09 +0000 |
---|---|---|
committer | Peter Breitenlohner <peb@mppmu.mpg.de> | 2011-04-19 13:44:09 +0000 |
commit | 129c1c0ef9266468d65fbcf846132b4329cad994 (patch) | |
tree | 0aeb7c371bb33f4fb69501b7715c82b769957896 /Build/source/texk/web2c/ptexdir/ppltotf.ch | |
parent | 880a5b0998e88b6c3a3c50b3058f0139bf9b1211 (diff) |
Avoid Mac OS X compiler warnings, mainly 'differ in signedness'
git-svn-id: svn://tug.org/texlive/trunk@22123 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/ptexdir/ppltotf.ch')
-rw-r--r-- | Build/source/texk/web2c/ptexdir/ppltotf.ch | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/Build/source/texk/web2c/ptexdir/ppltotf.ch b/Build/source/texk/web2c/ptexdir/ppltotf.ch index f050a64d9db..bdba99662ba 100644 --- a/Build/source/texk/web2c/ptexdir/ppltotf.ch +++ b/Build/source/texk/web2c/ptexdir/ppltotf.ch @@ -60,7 +60,7 @@ else begin while (limit<buf_size-2)and(not eoln(pl_file)) do begin incr(limit); read(pl_file,buffer[limit]); end; @y -else begin limit:=input_line2(pl_file,buffer,limit+1,buf_size-1)-1; +else begin limit:=input_line2(pl_file,stringcast(buffer),limit+1,buf_size-1)-1; @z %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% @@ -647,7 +647,7 @@ The |jis_to_index| is called from |chars_in_type| command. function get_next_raw:byte; {get next rawdata in buffer} begin while loc=limit do fill_buffer; incr(loc); get_next_raw:=buffer[loc]; -if multistrlen(buffer,loc+2,loc)=2 then cur_char:=" " +if multistrlen(stringcast(buffer),loc+2,loc)=2 then cur_char:=" " else cur_char:=xord[buffer[loc]]; end; @# @@ -718,8 +718,8 @@ else if (ch='J')or(ch='j') then if not valid_jis_code(jis_code) then err_print('jis code ', jis_code:1, ' is invalid'); end -else if multistrlen(buffer, loc+2, loc)=2 then - begin jis_code:=toDVI(fromBUFF(buffer, loc+2, loc)); +else if multistrlen(stringcast(buffer), loc+2, loc)=2 then + begin jis_code:=toDVI(fromBUFF(stringcast(buffer), loc+2, loc)); incr(loc); cur_char:=" "; if not valid_jis_code(jis_code) then err_print('jis code ', jis_code:1, ' is invalid'); |