Fixed reference to sysargs

This commit is contained in:
Roman Venediktov 2024-06-29 17:14:55 +02:00
parent 7ccd5cd7d5
commit 250f714bd0

View file

@ -1048,7 +1048,7 @@ class env cmd imports =
method nlocals = scope.nlocals
method get_decls =
let opt_label = function true -> label | _ -> fun x -> "global_" ^ x in
let opt_label = function true -> label | _ -> fun x -> "_global_" ^ x in
List.flatten
@@ List.map (function
| name, `Extern, f -> [ EXTERN (opt_label f name) ]