private static CTFAssignmentExpression Parse(CTFScope scope, TokParser tp)
{
CTFUnaryExpression cue = CTFUnaryExpression.Parse(tp);
if (cue != null)
{
if (tp.Match(Token.EnumId.ASSIGNMENT))
{
CTFUnaryExpression cue2 = CTFUnaryExpression.Parse(tp);
if (cue2 == null)
{
throw new CTFException();
}
return(new CTFAssignmentExpression(cue, cue2));
}
if (tp.Match(Token.EnumId.TYPE_ASSIGNMENT))
{
CTFTypeSpecifier cs = CTFITypeSpecifier.ParseTypeSpecifier(scope, tp);
if (cs == null)
{
throw new CTFException();
}
return(new CTFAssignmentExpression(cue, cs));
}
}
return(null);
}
private CTFFile Parse(TokParser tp)
{
for (;;)
{
switch (tp.Token.Id)
{
case Token.EnumId.CLOCK:
Clock = new CTFTClock(ParseAEList(tp));
break;
case Token.EnumId.EVENT:
CTFTEvent ce = new CTFTEvent(scope, ParseAEList(tp));
Events.Add(ce.Id, ce);
break;
case Token.EnumId.STREAM:
stream = new CTFTStream(scope, ParseAEList(tp));
break;
case Token.EnumId.ENV:
env = new CTFTEnv(ParseAEList(tp));
break;
case Token.EnumId.TRACE:
trace = new CTFTTrace(scope, ParseAEList(tp));
break;
case Token.EnumId.TYPEALIAS:
tp.Next();
List <CTFTypeSpecifier> cds = CTFITypeSpecifier.ParseList(scope, tp);
if (cds == null)
{
throw new CTFException();
}
tp.MustBe(Token.EnumId.TYPE_ASSIGNMENT);
List <CTFTypeSpecifier> cds2 = CTFITypeSpecifier.ParseList(scope, tp);
CTFDeclarator cd = CTFDeclarator.Parse(tp);
CTFType.AddType(scope, cds, cds2, cd);
break;
case Token.EnumId.STRUCT:
CTFITypeSpecifier.ParseTypeSpecifier(scope, tp);
break;
case Token.EnumId.EOF:
return(this);
case Token.EnumId.TERM:
tp.Next(); // Skip it
break;
default:
throw new CTFException();
}
}
}
public static CTFTypeSpecifier Get(Token.EnumId id)
{
CTFTypeSpecifier value;
cache.TryGetValue(id, out value);
if (value == null)
{
value = new CTFITypeSpecifier(id);
cache.Add(id, value);
}
return(value);
}
private static CTFStructOrVariantDeclaration Parse(CTFScope scope, TokParser tp)
{
List <CTFTypeSpecifier> list = new List <CTFTypeSpecifier>();
for (;;)
{
CTFTypeSpecifier s = CTFITypeSpecifier.ParseTypeSpecifier(scope, tp);
if (s == null)
{
break;
}
list.Add(s);
}
if (list.Count == 0)
{
return(null);
}
CTFDeclarator cd = CTFDeclarator.Parse(tp);
return(new CTFStructOrVariantDeclaration(list, cd));
}
internal CTFFile()
{
scope = new CTFScope();
Events = new Dictionary <uint, CTFTEvent>();
CTFITypeSpecifier.Init();
}
