Support alias on more positions

This commit is contained in:
Felix Krause 2016-01-07 11:29:37 +01:00
parent 433ec3f114
commit 4243226738
1 changed files with 4 additions and 2 deletions

View File

@ -472,7 +472,9 @@ proc parse*(parser: YamlSequentialParser, s: Stream): YamlStream =
assert level.mode == mImplicitBlockMapKey assert level.mode == mImplicitBlockMapKey
leaveMoreIndentedLevels() leaveMoreIndentedLevels()
case level.mode case level.mode
of mUnknown, mImplicitBlockMapKey, mBlockSequenceItem: of mUnknown, mImplicitBlockMapKey, mImplicitBlockMapValue,
mExplicitBlockMapKey, mExplicitBlockMapValue,
mBlockSequenceItem:
state = ypBlockAfterAlias state = ypBlockAfterAlias
else: else:
raiseError("Unexpected alias") raiseError("Unexpected alias")
@ -504,7 +506,7 @@ proc parse*(parser: YamlSequentialParser, s: Stream): YamlStream =
state = ypBlockLineEnd state = ypBlockLineEnd
of tLineStart: of tLineStart:
discard discard
of tColon, tDash, tQuestionmark: of tColon, tDash, tQuestionmark, tOpeningBrace, tOpeningBracket:
leaveMoreIndentedLevels() leaveMoreIndentedLevels()
if level.mode != mScalar: if level.mode != mScalar:
state = ypBlockLineStart state = ypBlockLineStart