12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879 |
- /// Spart License (zlib/png)
- ///
- ///
- /// Copyright (c) 2003 Jonathan de Halleux
- ///
- /// This software is provided 'as-is', without any express or implied warranty.
- /// In no event will the authors be held liable for any damages arising from
- /// the use of this software.
- ///
- /// Permission is granted to anyone to use this software for any purpose,
- /// including commercial applications, and to alter it and redistribute it
- /// freely, subject to the following restrictions:
- ///
- /// 1. The origin of this software must not be misrepresented; you must not
- /// claim that you wrote the original software. If you use this software in a
- /// product, an acknowledgment in the product documentation would be
- /// appreciated but is not required.
- ///
- /// 2. Altered source versions must be plainly marked as such, and must not be
- /// misrepresented as being the original software.
- ///
- /// 3. This notice may not be removed or altered from any source distribution.
- ///
- /// Author: Jonathan de Halleuxusing System;
- namespace Spart.Parsers.Composite
- {
- using Spart.Scanners;
- public class ListParser : BinaryTerminalParser
- {
- public ListParser(Parser first, Parser second)
- :base(first, second)
- {}
- public override ParserMatch ParseMain(Spart.Scanners.IScanner scan)
- {
- long offset = scan.Offset;
- ParserMatch a = null;
- ParserMatch b = null;
- ParserMatch m = FirstParser.Parse(scan);
- if (!m.Success)
- {
- scan.Seek(offset);
- return scan.NoMatch;
- }
- while (!scan.AtEnd)
- {
- offset = scan.Offset;
- b = SecondParser.Parse(scan);
- if (!b.Success)
- {
- scan.Seek(offset);
- return m;
- }
- a = FirstParser.Parse(scan);
- if (!a.Success)
- {
- scan.Seek(offset);
- return m;
- }
- m.Concat(b);
- m.Concat(a);
- }
- return m;
- }
-
- public override Parser Clone()
- {
- return base.Clone();
- }
- }
- }
|