Files
gf-core/testsuite/lpgf/BindCnc.gf
John J. Camilleri 98f6136ebd Add support for BIND
2021-02-13 00:14:35 +01:00

10 lines
199 B
Plaintext

concrete BindCnc of Bind = open Prelude in {
lincat
S = Str ;
F = { s : Str } ;
lin
f1 = { s = "hello the" ++ BIND ++ "re" } ;
f2 = { s = "good" ++ "bye" } ;
FtoS f = f.s ;
}