Hooked the GC back in B)

This commit is contained in:
Samuel Hammersberg 2023-05-05 18:50:05 +02:00
parent dead9eb75a
commit a388f480e5
24 changed files with 1404 additions and 227 deletions

View file

@ -129,10 +129,10 @@ compileScs (MIR.DData (MIR.Data typ ts) : xs) = do
firstMainContent :: Bool -> [LLVMIr]
firstMainContent True =
[ UnsafeRaw "%prof = call ptr @cheap_the()\n"
, UnsafeRaw "call void @cheap_set_profiler(ptr %prof, i1 true)\n"
, UnsafeRaw "call void @cheap_profiler_log_options(ptr %prof, i64 30)\n"
, UnsafeRaw "call void @cheap_init()\n"
[ -- UnsafeRaw "%prof = call ptr @cheap_the()\n"
-- , UnsafeRaw "call void @cheap_set_profiler(ptr %prof, i1 true)\n"
-- , UnsafeRaw "call void @cheap_profiler_log_options(ptr %prof, i64 30)\n"
UnsafeRaw "call void @cheap_init()\n"
]
firstMainContent False = []