1signature MLstring = 2sig 3 4 exception stringerror of int * string 5 val scanMLstring : string -> string 6 7end 8