Mat*_*ieu 3 erlang list-comprehension mnesia
我正在尝试使用erlang + mnesia构建一个小型测试应用程序.
我有#user记录的用户表构建,如下所示:
-record(user_details, {name, password}).
-record(user, {id, details}).
Run Code Online (Sandbox Code Playgroud)
然后我插入一个具有该功能的用户:
add_sample_data() ->
Mat = #user{
details = #user_details{
name = "mat", password = "mat"
}
},
user:insert_user(Mat),
Run Code Online (Sandbox Code Playgroud)
查询[U#user.details || U <- mnesia:table(user)]
返回非空列表.现在我正在尝试构建一个查询,如果没有details.name匹配名称或匹配记录(如果有),则返回包含零记录的列表.
这是我使用的方法(这个工作):
user_exists() ->
Fun = fun() ->
Query = qlc:q([
U#user.details ||
U <- mnesia:table(user)
]),
qlc:e(Query)
end,
case mnesia:transaction(Fun) of
{atomic, []} -> false;
{atomic, [_User]} -> true
end.
Run Code Online (Sandbox Code Playgroud)
我复制了本教程中的一些内容.mnesia:select
在mne_fun_query({sport, Sport})
方法(幻灯片19)中解决了类似的问题,但现在我想用qlc来做.
我尝试了各种组合但没有任何成功(通常在编译时失败..).
我是erlang的新手,如果你能分辨出哪个查询应该有效并稍微解释一下,我将不胜感激!
垫.
编辑
这是一个版本不起作用,但可能更好地解释我的问题
user_exists() ->
Fun = fun() ->
Query = qlc:q([
U#user.details ||
U <- mnesia:table(user),
U#user.details.name == "mat" <<<<< This is the line with the problem
]),
qlc:e(Query)
end,
case mnesia:transaction(Fun) of
{atomic, []} -> false;
{atomic, [_User]} -> true
end.
Run Code Online (Sandbox Code Playgroud)
和我有的错误:
mathieu @ evangeneer:〜/ projects/nopair $ make重新
编译:src/resources/user_resource
src/resources/user_resource.erl:22:语法错误之前:'.'
src/resources/user_resource.erl:6:function user_exists/2 undefined make:
***[erl]错误1
在问题上:
U#user.details.name == "mat"
Run Code Online (Sandbox Code Playgroud)
您正在尝试访问user_details
记录但未命名.尝试...
(U#user.details)#user_details.name == "mat"
Run Code Online (Sandbox Code Playgroud)
根据我的经验,编译器本身并不知道#user.details是#user_details.