sketch_lustre

-module(sketch@internals@ffi).
-compile([no_auto_import, nowarn_unused_vars, nowarn_unused_function, nowarn_nomatch]).

-export([wrap/1, set/2, get/1]).
-export_type([mutable/1]).

-opaque mutable(QAF) :: {mutable, QAF}.

-spec wrap(QAG) -> mutable(QAG).
wrap(Value) ->
    {mutable, Value}.

-spec set(mutable(QAI), QAI) -> mutable(QAI).
set(Variable, Value) ->
    {mutable, Value}.

-spec get(mutable(QAL)) -> QAL.
get(Variable) ->
    erlang:element(2, Variable).