1
0
forked from GitHub/gf-core

Fix bug in dynamic parameter handling, compile FoodsBul successfully

This commit is contained in:
John J. Camilleri
2021-02-03 15:41:27 +01:00
parent 42b9e7036e
commit 34f0fc0ba7
6 changed files with 33 additions and 21 deletions

View File

@@ -2,18 +2,19 @@ concrete ParamsCnc of Params = {
param
R = R1 | R2 ;
P = PR R Q | PP ;
Q = Q1 | Q2 ;
Q = Q3 | Q2 | Q1 ;
lincat
S = Str ;
F = { r : R } ;
lin
f1 = { r = R1 } ;
f2 = { r = R2 } ;
FtoS f = tbl ! PR f.r Q2 ;
FtoS f = tbl ! PR f.r Q1 ;
oper
tbl = table {
PR R1 Q1 => "PR R1 Q1" ;
PR R1 Q2 => "PR R1 Q2" ;
PR R1 Q1 => "PR R1 Q1" ;
PR R1 Q3 => "PR R1 Q3" ;
PR R2 _ => "PR R2 _" ;
PP => "PP"
} ;