Skip to content

Commit 811d716

Browse files
committed
hide fix
1 parent 6d8896f commit 811d716

File tree

2 files changed

+12
-4
lines changed

2 files changed

+12
-4
lines changed

Source/Core/BoogiePL.atg

Lines changed: 6 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -771,11 +771,15 @@ SpecRefinedActionForYieldProcedure<.ref ActionDeclRef refinedAction, IToken name
771771
(.
772772
if (refinedAction == null) {
773773
var actionName = m.val == "_" ? null : m.val;
774-
var actionDecl = new ActionDecl(tok, actionName, moverType, Formal.StripWhereClauses(ins), Formal.StripWhereClauses(outs),
774+
var inParams = new List<Variable>(ins);
775+
inParams.RemoveAll(x => x.HasAttribute(CivlAttributes.HIDE));
776+
var outParams = new List<Variable>(outs);
777+
outParams.RemoveAll(x => x.HasAttribute(CivlAttributes.HIDE));
778+
var actionDecl = new ActionDecl(tok, actionName, moverType, Formal.StripWhereClauses(inParams), Formal.StripWhereClauses(outParams),
775779
false, new List<ActionDeclRef>(), null, null,
776780
new List<Requires>(), new List<CallCmd>(), new List<AssertCmd>(), new List<IdentifierExpr>(), null, akv);
777781
Pgm.AddTopLevelDeclaration(actionDecl);
778-
var impl = new Implementation(tok, actionDecl.Name, new List<TypeVariable>(), Formal.StripWhereClauses(ins), Formal.StripWhereClauses(outs),
782+
var impl = new Implementation(tok, actionDecl.Name, new List<TypeVariable>(), Formal.StripWhereClauses(inParams), Formal.StripWhereClauses(outParams),
779783
locals, stmtList, akv == null ? null : (QKeyValue)akv.Clone());
780784
Pgm.AddTopLevelDeclaration(impl);
781785
refinedAction = new ActionDeclRef(tok, actionDecl.Name);

Source/Core/Parser.cs

Lines changed: 6 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1237,11 +1237,15 @@ void SpecRefinedActionForYieldProcedure(ref ActionDeclRef refinedAction, IToken
12371237
ImplBody(out locals, out stmtList);
12381238
if (refinedAction == null) {
12391239
var actionName = m.val == "_" ? null : m.val;
1240-
var actionDecl = new ActionDecl(tok, actionName, moverType, Formal.StripWhereClauses(ins), Formal.StripWhereClauses(outs),
1240+
var inParams = new List<Variable>(ins);
1241+
inParams.RemoveAll(x => x.HasAttribute(CivlAttributes.HIDE));
1242+
var outParams = new List<Variable>(outs);
1243+
outParams.RemoveAll(x => x.HasAttribute(CivlAttributes.HIDE));
1244+
var actionDecl = new ActionDecl(tok, actionName, moverType, Formal.StripWhereClauses(inParams), Formal.StripWhereClauses(outParams),
12411245
false, new List<ActionDeclRef>(), null, null,
12421246
new List<Requires>(), new List<CallCmd>(), new List<AssertCmd>(), new List<IdentifierExpr>(), null, akv);
12431247
Pgm.AddTopLevelDeclaration(actionDecl);
1244-
var impl = new Implementation(tok, actionDecl.Name, new List<TypeVariable>(), Formal.StripWhereClauses(ins), Formal.StripWhereClauses(outs),
1248+
var impl = new Implementation(tok, actionDecl.Name, new List<TypeVariable>(), Formal.StripWhereClauses(inParams), Formal.StripWhereClauses(outParams),
12451249
locals, stmtList, akv == null ? null : (QKeyValue)akv.Clone());
12461250
Pgm.AddTopLevelDeclaration(impl);
12471251
refinedAction = new ActionDeclRef(tok, actionDecl.Name);

0 commit comments

Comments
 (0)