From 6b92e5059c04709b3506bb4e7bef29872b16811f Mon Sep 17 00:00:00 2001
From: Eugen Wissner <belka@caraus.de>
Date: Sun, 27 Oct 2024 14:00:54 +0100
Subject: Encode labels as untyped local symbols in ELF

---
 lib/Language/Elna/Glue.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'lib/Language/Elna/Glue.hs')

diff --git a/lib/Language/Elna/Glue.hs b/lib/Language/Elna/Glue.hs
index 933a2d3..70161a0 100644
--- 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
-- 
cgit v1.2.3