require "lib/core.nom"

compile [with secrets %block] to code: ".."
    |do;
    |    local secrets = {};
    |    \(%block as lua statements)
    |end;

# Access the lua variable that should be within scope
compile [secrets] to: "secrets"

compile [secret %key, secret value of %key, secret value for %key] to:
    assert ((%key's "type") == "Var") ".."
        |Wrong type, expected Var, but got: \(%key's "type")
    "secrets[\(repr (%key's "value"))]"

compile [secret %key = %new_value] to code:
    assert ((%key's "type") == "Var") ".."
        |Wrong type, expected Var, but got: \(%key's "type")
    "secrets[\(repr (%key's "value"))] = \(%new_value as lua);"

rule [rules about secrecy] =: ["with secrets %"]