blob: 6cd79dcc13d160112fe3746470b6cdb3c79e3927 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
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
|
