Encode labels as untyped local symbols in ELF

2024-10-27 14:00:54 +01:00
parent 57436f664e
commit 6b92e5059c
5 changed files with 239 additions and 177 deletions
--- a/lib/Language/Elna/Glue.hs
+++ b/lib/Language/Elna/Glue.hs
@@ -140,7 +140,7 @@ createLabel = do
    pure $ Label
        $ Text.Lazy.toStrict
        $ Text.Builder.toLazyText
-        $ "L" <> Text.Builder.decimal currentCounter
+        $ ".L" <> Text.Builder.decimal currentCounter
  where
    modifier generator = generator
        { labelCounter = getField @"labelCounter" generator + 1