test: hasCSimpAttribute

This commit is contained in:
Leonardo de Moura 2022-04-15 09:55:10 -07:00
parent 33a7f75599
commit bc7f4fd02b

View file

@ -0,0 +1,8 @@
import Lean
open Lean
open Lean.Compiler
#eval (do assert! hasCSimpAttribute (← getEnv) ``List.map_eq_mapTR : MetaM Unit)
#eval (do assert! hasCSimpAttribute (← getEnv) ``List.append_eq_appendTR : MetaM Unit)
#eval (do assert! !hasCSimpAttribute (← getEnv) ``List.append : MetaM Unit)