14 lines
256 B
Text
14 lines
256 B
Text
import Lean
|
|
|
|
|
|
|
|
open Lean
|
|
open Lean.Parser
|
|
|
|
def regBlaParserAttribute : IO Unit :=
|
|
registerBuiltinDynamicParserAttribute (mkNameSimple "blaParser") (mkNameSimple "bla")
|
|
|
|
@[inline] def parser : Parser :=
|
|
categoryParser (mkNameSimple "bla") 0
|
|
|
|
#check @parser
|