Skip to content

Commit

Permalink
[Rename] DContext -> EContexst
Browse files Browse the repository at this point in the history
  • Loading branch information
tgeng committed Nov 3, 2024
1 parent 696c028 commit 7b1e537
Show file tree
Hide file tree
Showing 4 changed files with 29 additions and 29 deletions.
48 changes: 24 additions & 24 deletions src/main/scala/com/github/tgeng/archon/core/ir/builtins.scala
Original file line number Diff line number Diff line change
Expand Up @@ -140,7 +140,7 @@ object Builtins:
throw new IllegalArgumentException(s"Conflicting definitions: $conflictingDefs")
elaborateAll(builtins)(using Context.empty)(using SimpleSignature())

private def dBinding
private def eBinding
(
name: Name,
ty: VTerm,
Expand Down Expand Up @@ -331,7 +331,7 @@ object Builtins:
*/
PreDefinition(
TypeQn,
paramTys = List(dBinding(n"level", LevelType())),
paramTys = List(eBinding(n"level", LevelType())),
ty = F(Type(Type(Top(Var(0))))),
clauses = List(
PreClause(
Expand All @@ -349,8 +349,8 @@ object Builtins:
PreDefinition(
TypeOfQn,
paramTys = List(
dBinding(n"level", LevelType()),
dBinding(n"upperBound", Type(Type(Top(Var(0))))),
eBinding(n"level", LevelType()),
eBinding(n"upperBound", Type(Type(Top(Var(0))))),
),
ty = F(Type(Type(Var(0)))),
clauses = List(
Expand All @@ -367,7 +367,7 @@ object Builtins:
*/
PreDefinition(
TopQn,
paramTys = List(dBinding(n"level", LevelType())),
paramTys = List(eBinding(n"level", LevelType())),
ty = F(Type(Top(Var(0)))),
clauses = List(
PreClause(
Expand Down Expand Up @@ -430,8 +430,8 @@ object Builtins:
PreDefinition(
UsageProdQn,
paramTys = List(
dBinding(n"usage1", UsageType(), escapeStatus = EsLocal),
dBinding(n"usage2", UsageType(), escapeStatus = EsLocal),
eBinding(n"usage1", UsageType(), escapeStatus = EsLocal),
eBinding(n"usage2", UsageType(), escapeStatus = EsLocal),
),
ty = F(UsageType()),
clauses = List(
Expand All @@ -449,8 +449,8 @@ object Builtins:
PreDefinition(
UsageSumQn,
paramTys = List(
dBinding(n"usage1", UsageType(), escapeStatus = EsLocal),
dBinding(n"usage2", UsageType(), escapeStatus = EsLocal),
eBinding(n"usage1", UsageType(), escapeStatus = EsLocal),
eBinding(n"usage2", UsageType(), escapeStatus = EsLocal),
),
ty = F(UsageType()),
clauses = List(
Expand All @@ -468,8 +468,8 @@ object Builtins:
PreDefinition(
UsageJoinQn,
paramTys = List(
dBinding(n"usage1", UsageType(), escapeStatus = EsLocal),
dBinding(n"usage2", UsageType(), escapeStatus = EsLocal),
eBinding(n"usage1", UsageType(), escapeStatus = EsLocal),
eBinding(n"usage2", UsageType(), escapeStatus = EsLocal),
),
ty = F(UsageType()),
clauses = List(
Expand Down Expand Up @@ -548,8 +548,8 @@ object Builtins:
PreDefinition(
CTypeQn,
paramTys = List(
dBinding(n"level", LevelType()),
dBinding(n"effects", EffectsType()),
eBinding(n"level", LevelType()),
eBinding(n"effects", EffectsType()),
),
ty = CType(CType(CTop(Var(1), Var(0)))),
clauses = List(
Expand All @@ -569,9 +569,9 @@ object Builtins:
PreDefinition(
CTypeOfQn,
paramTys = List(
dBinding(n"level", LevelType()),
dBinding(n"effects", EffectsType()),
dBinding(n"upperBound", U(CType(CTop(Var(1), Var(0))))),
eBinding(n"level", LevelType()),
eBinding(n"effects", EffectsType()),
eBinding(n"upperBound", U(CType(CTop(Var(1), Var(0))))),
),
ty = CType(CType(Force(Var(0)), Var(1))),
clauses = List(
Expand All @@ -591,8 +591,8 @@ object Builtins:
PreDefinition(
CTopQn,
paramTys = List(
dBinding(n"level", LevelType()),
dBinding(n"effects", EffectsType()),
eBinding(n"level", LevelType()),
eBinding(n"effects", EffectsType()),
),
ty = CType(CTop(Var(1), Var(0))),
clauses = List(
Expand All @@ -611,8 +611,8 @@ object Builtins:
PreDefinition(
EffectsUnionQn,
paramTys = List(
dBinding(n"eff1", EffectsType()),
dBinding(n"eff2", EffectsType()),
eBinding(n"eff1", EffectsType()),
eBinding(n"eff2", EffectsType()),
),
ty = F(EffectsType()),
clauses = List(
Expand All @@ -630,7 +630,7 @@ object Builtins:
PreDefinition(
EffectsRetainSimpleLinearQn,
paramTys = List(
dBinding(n"eff", EffectsType()),
eBinding(n"eff", EffectsType()),
),
ty = F(EffectsType()),
clauses = List(
Expand All @@ -648,7 +648,7 @@ object Builtins:
PreDefinition(
LevelSucQn,
paramTys = List(
dBinding(n"level", LevelType()),
eBinding(n"level", LevelType()),
),
ty = F(LevelType()),
clauses = List(
Expand All @@ -667,8 +667,8 @@ object Builtins:
PreDefinition(
LevelMaxQn,
paramTys = List(
dBinding(n"level1", LevelType()),
dBinding(n"level2", LevelType()),
eBinding(n"level1", LevelType()),
eBinding(n"level2", LevelType()),
),
ty = F(LevelType()),
clauses = List(
Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -32,7 +32,7 @@ extension (ctx: collection.IndexedSeq[Binding[VTerm]])

type TContext = collection.IndexedSeq[(Binding[VTerm], Variance)]

type DContext = collection.IndexedSeq[(Binding[VTerm], EscapeStatus)]
type EContext = collection.IndexedSeq[(Binding[VTerm], EscapeStatus)]

extension (ctx: collection.IndexedSeq[(Binding[VTerm], Variance)])
@targetName("resolveT")
Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -318,12 +318,12 @@ private def elaborateDefHead

ctx.trace(s"elaborating def signature ${definition.qn}"):
val paramTys = elaborateTelescope(definition.paramTys.map(_._1))(using Γ)
val newDContext: DContext =
val newEContext: EContext =
// The parameters in context are module parameters, which usually would escape arbitrarily.
Γ.map((_, EscapeStatus.EsUnknown)) ++ paramTys.zip(definition.paramTys.map(_._2))
given Context = newDContext.map(_._1)
given Context = newEContext.map(_._1)
val ty = checkIsCType(definition.ty).normalized(None)
val d: Definition = Definition(definition.qn, newDContext, ty)
val d: Definition = Definition(definition.qn, newEContext, ty)
Σ.addDeclaration(checkDef(d))

@throws(classOf[IrError])
Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -32,7 +32,7 @@ enum Declaration:
selfBinding: Binding[VTerm],
)

case Definition(qn: QualifiedName, context: DContext, ty: CTerm /* binding += context */ )
case Definition(qn: QualifiedName, context: EContext, ty: CTerm /* binding += context */ )

case Effect
(
Expand Down

0 comments on commit 7b1e537

Please sign in to comment.