From b25b83fc189bfc89781c89d7dd3f59fe0d64b344 Mon Sep 17 00:00:00 2001 From: SisMaker <156736github> Date: Sun, 3 Apr 2022 16:00:13 +0800 Subject: [PATCH] =?UTF-8?q?ft:=20=E4=BB=A3=E7=A0=81=E4=BF=AE=E6=94=B9?= =?UTF-8?q?=E4=B8=8E=E4=BC=98=E5=8C=96?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- src/compile/utKvsToBeam.erl | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/src/compile/utKvsToBeam.erl b/src/compile/utKvsToBeam.erl index 841c5ce..6f84724 100644 --- a/src/compile/utKvsToBeam.erl +++ b/src/compile/utKvsToBeam.erl @@ -19,11 +19,11 @@ load(Module, KVs) -> forms(Module, KVs) -> %% -module(Module). Mod = erl_syntax:attribute(erl_syntax:atom(module), [erl_syntax:atom(Module)]), - %% -export([get/0]). - ExportList = [erl_syntax:arity_qualifier(erl_syntax:atom(get), erl_syntax:integer(1))], + %% -export([getV/0]). + ExportList = [erl_syntax:arity_qualifier(erl_syntax:atom(getV), erl_syntax:integer(1))], Export = erl_syntax:attribute(erl_syntax:atom(export), [erl_syntax:list(ExportList)]), - %% get(K) -> V - Function = erl_syntax:function(erl_syntax:atom(get), lookup_clauses(KVs, [])), + %% getV(K) -> V + Function = erl_syntax:function(erl_syntax:atom(getV), lookup_clauses(KVs, [])), [erl_syntax:revert(X) || X <- [Mod, Export, Function]]. lookup_clause(Key, Value) -> @@ -39,4 +39,4 @@ lookup_clause_anon() -> lookup_clauses([], Acc) -> lists:reverse(lists:flatten([lookup_clause_anon() | Acc])); lookup_clauses([{Key, Value} | T], Acc) -> - lookup_clauses(T, [lookup_clause(Key, Value) | Acc]). + lookup_clauses(T, [lookup_clause(Key, Value) | Acc]). \ No newline at end of file