Intravision/reactos
1
0
Fork 0
mirror of https://github.com/reactos/reactos.git synced 2024-12-27 01:24:38 +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

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

@ -75,7 +75,16 @@ INT cmd_goto (LPTSTR cmd, LPTSTR param)
/* set file pointer to the beginning of the batch file */
lNewPosHigh = 0;
SetFilePointer (bc->hBatchFile, 0, &lNewPosHigh, FILE_BEGIN);
/* 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,11 +114,12 @@ INT cmd_goto (LPTSTR cmd, LPTSTR param)
pos++;
}
/* use whole label name */
if ((*tmp == _T(':')) && (_tcsicmp (++tmp, param) == 0))
return 0;
}
LoadString(CMD_ModuleHandle, STRING_GOTO_ERROR2, szMsg, RC_STRING_MAX_SIZE);
ConErrPrintf(szMsg, param);
ExitBatch(NULL);