forked from GitHub/gf-core
Added binary numeral grammars.
This commit is contained in:
11
examples/numerals/BinaryDigits.gf
Normal file
11
examples/numerals/BinaryDigits.gf
Normal file
@@ -0,0 +1,11 @@
|
||||
concrete BinaryDigits of Binary = {
|
||||
|
||||
flags startcat=Bin ;
|
||||
|
||||
lincat Bin = { s : Str } ;
|
||||
|
||||
lin End = { s = "" } ;
|
||||
lin Zero b = { s = "0" ++ b.s } ;
|
||||
lin One b = { s = "1" ++ b.s } ;
|
||||
|
||||
}
|
||||
Reference in New Issue
Block a user