diff options
Diffstat (limited to 'src/Language/Fiddle/Compiler/Backend/C.hs')
| -rw-r--r-- | src/Language/Fiddle/Compiler/Backend/C.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Language/Fiddle/Compiler/Backend/C.hs b/src/Language/Fiddle/Compiler/Backend/C.hs index 5379099..2e6421e 100644 --- a/src/Language/Fiddle/Compiler/Backend/C.hs +++ b/src/Language/Fiddle/Compiler/Backend/C.hs @@ -265,7 +265,7 @@ transpileWalk sourceFile headerFile t _ = case () of withFileAt headerFile middlePos $ do pad $ do emitDocComments a - struct (identifierFor metadata) $ do + struct (identifierFor (unwrap metadata)) $ do structBody objTypeBody return Stop _ -> return (Continue ()) |