/* Parse a GUID from the input stream. Stop when you discover white space. */
BOOLEAN SFPGetGuidToken(CHAR8 *Str, UINT32 Len)
/* Parse a GUID from the input stream. Stop when you discover white space. */
BOOLEAN SFPGetGuidToken(CHAR8 *Str, UINT32 Len)
{
  UINT32  Index;
  SkipWhiteSpace (&mGlobals.SourceFile);
  if (EndOfFile (&mGlobals.SourceFile)) {
    return FALSE;
  }
  Index = 0;
  while (!EndOfFile (&mGlobals.SourceFile) && (Index < Len)) {
    if (IsWhiteSpace (&mGlobals.SourceFile)) {
      if (Index > 0) {
        Str[Index] = 0;
        return TRUE;
      }
      return FALSE;
    } else {
      Str[Index] = mGlobals.SourceFile.FileBufferPtr[0];
      mGlobals.SourceFile.FileBufferPtr++;
      Index++;
    }
  }
  return FALSE;
}