From b53a8d85da1ddb2e27619dfdc3848a8420fde70e Mon Sep 17 00:00:00 2001 From: Ryan Kavanagh Date: Fri, 12 Nov 2021 21:33:05 -0500 Subject: Added parsing of currentsong for mpd protocol --- mpdwatch/parse.mli | 16 ++++++++++++++++ 1 file changed, 16 insertions(+) create mode 100644 mpdwatch/parse.mli (limited to 'mpdwatch/parse.mli') diff --git a/mpdwatch/parse.mli b/mpdwatch/parse.mli new file mode 100644 index 0000000..6cd79dc --- /dev/null +++ b/mpdwatch/parse.mli @@ -0,0 +1,16 @@ +type currentsong = { + artist: string list; + performer: string list; + composer: string list; + title: string option; + track: int option; + musicbrainz_albumid: string option; + musicbrainz_artistid: string list; + musicbrainz_trackid: string option; +} + +exception ParseError of string + +val parse_string : 'a Angstrom.t -> string -> 'a + +val currentsong_parser : currentsong Angstrom.t -- cgit v1.2.3