Add support for BIND

This commit is contained in:
John J. Camilleri
2021-02-13 00:14:35 +01:00
parent 8cfaa69b6e
commit 98f6136ebd
8 changed files with 34 additions and 3 deletions

View File

@@ -0,0 +1,9 @@
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 ;
}