nomsu/lib/secrets.nom

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 %"]