This repository has been archived on 2023-08-20. You can view files and clone it, but cannot push or open issues or pull requests.
yap-6.3/Logtalk/library/dictionaryp.lgt
2001-06-06 19:40:57 +00:00

104 lines
2.4 KiB
Plaintext

:- protocol(dictionaryp).
:- info([
version is 1.0,
authors is 'Paulo Moura',
date is 2000/7/24,
comment is 'Dictionary protocol.']).
:- public(as_dictionary/2).
:- mode(as_dictionary(@list, -dictionary), one).
:- info(as_dictionary/2, [
comment is 'Converts a list of key-value pairs to a dictionary.',
argnames is ['List', 'Dictionary']]).
:- public(as_list/2).
:- mode(as_list(@dictionary, -list), one).
:- info(as_list/2, [
comment is 'Converts a dictionary to a list of key-value pairs.',
argnames is ['Dictionary', 'List']]).
:- public(delete/4).
:- mode(delete(+dictionary, @ground, ?term, -dictionary), zero_or_one).
:- info(delete/4, [
comment is 'Deletes a matching Key-Value pair from a dictionary, returning the updated dictionary.',
argnames is ['Dictionary_in', 'Key', 'Value', 'Dictionary_out']]).
:- public(empty/1).
:- mode(empty(@dictionary), zero_or_one).
:- info(empty/1, [
comment is 'True if the dictionary is empty.',
argnames is ['Dictionary']]).
:- public(insert/4).
:- mode(insert(+ground, @term, +dictionary, -dictionary), one).
:- info(insert/4, [
comment is 'Inserts a Key-Value pair into a dictionary, returning the updated dictionary.',
argnames is ['Key', 'Value', 'Dictionary_in', 'Dictionary_out']]).
:- public(insert_all/3).
:- mode(insert_all(@list, +dictionary, -dictionary), one).
:- info(insert_all/3, [
comment is 'Inserts a list of Key-Value pairs into a dictionary, returning the updated dictionary.',
argnames is ['List', 'Dictionary_in', 'Dictionary_out']]).
:- public(lookup/3).
:- mode(lookup(+ground, ?term, @dictionary), zero_or_one).
:- mode(lookup(-ground, ?term, @dictionary), zero_or_more).
:- info(lookup/3, [
comment is 'Get a matching Key-Value pair from a dictionary.',
argnames is ['Key', 'Value', 'Dictionary']]).
:- public(keys/2).
:- mode(keys(@dictionary, -list), one).
:- info(keys/2, [
comment is 'Returns a list with all dictionary keys.',
argnames is ['Dictionary', 'List']]).
:- public(map/3).
:- mode(map(+functor, +dictionary, -dictionary), zero_or_one).
:- info(map/3, [
comment is 'Maps a binary predicate over each dictionary key-value pair returning a new pair.',
argnames is ['Functor', 'In', 'Out']]).
:- public(size/2).
:- mode(size(@dictionary, ?integer), zero_or_one).
:- info(size/2, [
comment is 'Number of dictionary entries.',
argnames is ['Dictionary', 'Size']]).
:- end_protocol.