erlang 之简单的Diction实现

原创于 2013-12-30 00:17:27 发布 · 1.1k 阅读

0 ·

CC 4.0 BY-SA版权

Erlang 专栏收录该内容

15 篇文章

订阅专栏

本文介绍了一个简单的Erlang字典模块实现方法，包括新建空字典、查找键值、添加键值对以及删除键等基本操作。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

最近在看学erlang ，看到了字典这个demo ，把程序Copy出来和大家分享一下

-module (diction).
-export([new/0,lookup/2,add/3,delete/2]).
new()	->
	[].

lookup(Key , [{Key,Value}|Rest])	->
	{value,Value};
lookup(Key,[Pair|Rest])		->
	lookup(Key,Rest);
lookup(Key,[])	->
	undefined.
add(Key,Value,Diction)	->
	NewDict	=	delete(Key,Diction)	,
	[{Key,Value}|NewDict].

delete(Key,[{Key,Value}|Rest])	->
	Rest;
delete(Key,[Pair|Rest])	->
	[Pair|delete(Key,Rest)];
delete(Key,[])	->
	[].