diff options
author | Peter Breitenlohner <peb@mppmu.mpg.de> | 2010-03-10 09:13:50 +0000 |
---|---|---|
committer | Peter Breitenlohner <peb@mppmu.mpg.de> | 2010-03-10 09:13:50 +0000 |
commit | d52c80bbd7d9a4255f54d34929e6d06f18a1d6d5 (patch) | |
tree | 96acc5581e382f29613e8aeebbae87dcdca0c781 /Build/source/texk/web2c/tangleboot.pin | |
parent | 7b1fe9c5919e7d7ddff71b621137cb798e1aa5b1 (diff) |
avoid use of and remove support for kpse_set_progname,
should be completely removed for kpathsea version 6.x.y
git-svn-id: svn://tug.org/texlive/trunk@17409 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/tangleboot.pin')
-rw-r--r-- | Build/source/texk/web2c/tangleboot.pin | 46 |
1 files changed, 23 insertions, 23 deletions
diff --git a/Build/source/texk/web2c/tangleboot.pin b/Build/source/texk/web2c/tangleboot.pin index b0709eeb67a..e0ca48e45eb 100644 --- a/Build/source/texk/web2c/tangleboot.pin +++ b/Build/source/texk/web2c/tangleboot.pin @@ -125,29 +125,29 @@ if optind+2=argc then begin chgname:=extendfilename(cmdline(optind+1), 'ch');end;pascalname:=basenamechangesuffix(webname,'.web','.p');end; {:188}procedure initialize;var{16:}i:0..255;{:16}{41:}wi:0..2; {:41}{45:}zi:0..4;{:45}{51:}h:0..hashsize; -{:51}begin kpsesetprogname(argv[0]);parsearguments;{10:}history:=0; -{:10}{14:}xchr[32]:=' ';xchr[33]:='!';xchr[34]:='"';xchr[35]:='#'; -xchr[36]:='$';xchr[37]:='%';xchr[38]:='&';xchr[39]:='''';xchr[40]:='('; -xchr[41]:=')';xchr[42]:='*';xchr[43]:='+';xchr[44]:=',';xchr[45]:='-'; -xchr[46]:='.';xchr[47]:='/';xchr[48]:='0';xchr[49]:='1';xchr[50]:='2'; -xchr[51]:='3';xchr[52]:='4';xchr[53]:='5';xchr[54]:='6';xchr[55]:='7'; -xchr[56]:='8';xchr[57]:='9';xchr[58]:=':';xchr[59]:=';';xchr[60]:='<'; -xchr[61]:='=';xchr[62]:='>';xchr[63]:='?';xchr[64]:='@';xchr[65]:='A'; -xchr[66]:='B';xchr[67]:='C';xchr[68]:='D';xchr[69]:='E';xchr[70]:='F'; -xchr[71]:='G';xchr[72]:='H';xchr[73]:='I';xchr[74]:='J';xchr[75]:='K'; -xchr[76]:='L';xchr[77]:='M';xchr[78]:='N';xchr[79]:='O';xchr[80]:='P'; -xchr[81]:='Q';xchr[82]:='R';xchr[83]:='S';xchr[84]:='T';xchr[85]:='U'; -xchr[86]:='V';xchr[87]:='W';xchr[88]:='X';xchr[89]:='Y';xchr[90]:='Z'; -xchr[91]:='[';xchr[92]:='\';xchr[93]:=']';xchr[94]:='^';xchr[95]:='_'; -xchr[96]:='`';xchr[97]:='a';xchr[98]:='b';xchr[99]:='c';xchr[100]:='d'; -xchr[101]:='e';xchr[102]:='f';xchr[103]:='g';xchr[104]:='h'; -xchr[105]:='i';xchr[106]:='j';xchr[107]:='k';xchr[108]:='l'; -xchr[109]:='m';xchr[110]:='n';xchr[111]:='o';xchr[112]:='p'; -xchr[113]:='q';xchr[114]:='r';xchr[115]:='s';xchr[116]:='t'; -xchr[117]:='u';xchr[118]:='v';xchr[119]:='w';xchr[120]:='x'; -xchr[121]:='y';xchr[122]:='z';xchr[123]:='{';xchr[124]:='|'; -xchr[125]:='}';xchr[126]:='~';xchr[0]:=' ';xchr[127]:=' '; -{:14}{17:}for i:=1 to 31 do xchr[i]:=chr(i); +{:51}begin kpsesetprogramname(argv[0],nil);parsearguments; +{10:}history:=0;{:10}{14:}xchr[32]:=' ';xchr[33]:='!';xchr[34]:='"'; +xchr[35]:='#';xchr[36]:='$';xchr[37]:='%';xchr[38]:='&';xchr[39]:=''''; +xchr[40]:='(';xchr[41]:=')';xchr[42]:='*';xchr[43]:='+';xchr[44]:=','; +xchr[45]:='-';xchr[46]:='.';xchr[47]:='/';xchr[48]:='0';xchr[49]:='1'; +xchr[50]:='2';xchr[51]:='3';xchr[52]:='4';xchr[53]:='5';xchr[54]:='6'; +xchr[55]:='7';xchr[56]:='8';xchr[57]:='9';xchr[58]:=':';xchr[59]:=';'; +xchr[60]:='<';xchr[61]:='=';xchr[62]:='>';xchr[63]:='?';xchr[64]:='@'; +xchr[65]:='A';xchr[66]:='B';xchr[67]:='C';xchr[68]:='D';xchr[69]:='E'; +xchr[70]:='F';xchr[71]:='G';xchr[72]:='H';xchr[73]:='I';xchr[74]:='J'; +xchr[75]:='K';xchr[76]:='L';xchr[77]:='M';xchr[78]:='N';xchr[79]:='O'; +xchr[80]:='P';xchr[81]:='Q';xchr[82]:='R';xchr[83]:='S';xchr[84]:='T'; +xchr[85]:='U';xchr[86]:='V';xchr[87]:='W';xchr[88]:='X';xchr[89]:='Y'; +xchr[90]:='Z';xchr[91]:='[';xchr[92]:='\';xchr[93]:=']';xchr[94]:='^'; +xchr[95]:='_';xchr[96]:='`';xchr[97]:='a';xchr[98]:='b';xchr[99]:='c'; +xchr[100]:='d';xchr[101]:='e';xchr[102]:='f';xchr[103]:='g'; +xchr[104]:='h';xchr[105]:='i';xchr[106]:='j';xchr[107]:='k'; +xchr[108]:='l';xchr[109]:='m';xchr[110]:='n';xchr[111]:='o'; +xchr[112]:='p';xchr[113]:='q';xchr[114]:='r';xchr[115]:='s'; +xchr[116]:='t';xchr[117]:='u';xchr[118]:='v';xchr[119]:='w'; +xchr[120]:='x';xchr[121]:='y';xchr[122]:='z';xchr[123]:='{'; +xchr[124]:='|';xchr[125]:='}';xchr[126]:='~';xchr[0]:=' '; +xchr[127]:=' ';{:14}{17:}for i:=1 to 31 do xchr[i]:=chr(i); for i:=128 to 255 do xchr[i]:=chr(i); {:17}{18:}for i:=0 to 255 do xord[chr(i)]:=32; for i:=1 to 255 do xord[xchr[i]]:=i;xord[' ']:=32; |