diff options
Diffstat (limited to 'Language/C.hs')
| -rw-r--r-- | Language/C.hs | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/Language/C.hs b/Language/C.hs index 86250dd..35cf432 100644 --- a/Language/C.hs +++ b/Language/C.hs @@ -47,3 +47,8 @@ data Expr | EPtrTo Expr | ESizeOf Type deriving (Show, Eq) + + +fundefName :: FunDef -> Name +fundefName (FunDef _ n _ _) = n +fundefName (ProcDef n _ _) = n |