Intravision/reactos
1
0
Fork 0
mirror of https://github.com/reactos/reactos.git synced 2024-12-27 17:44:45 +00:00
Code Issues Projects Releases Packages Wiki Activity

fix another bug in goto it is internel label :eof jump to end of the bat file

Browse source 
svn path=/trunk/; revision=16670
This commit is contained in:
Magnus Olsen 2005-07-20 18:43:01 +00:00
parent 4365851492
commit 368f39faad
1 changed files with 12 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
reactos/subsys/system/cmd/goto.c
View file

@ -75,6 +75,15 @@ INT cmd_goto (LPTSTR cmd, LPTSTR param)
/* set file pointer to the beginning of the batch file */
lNewPosHigh = 0;
/* jump to end of the file */
if ( _tcsicmp( param, _T(":eof"))==0)
{
SetFilePointer (bc->hBatchFile, 0, &lNewPosHigh, FILE_END);
return 0;
}
/* jump to begin of the file */
SetFilePointer (bc->hBatchFile, 0, &lNewPosHigh, FILE_BEGIN);
while (FileGetString (bc->hBatchFile, textline, sizeof(textline)))
@ -105,6 +114,7 @@ INT cmd_goto (LPTSTR cmd, LPTSTR param)
pos++;
}
/* use whole label name */
if ((*tmp == _T(':')) && (_tcsicmp (++tmp, param) == 0))
return 0;