raise (GrafiteTypes.Command_error ("bad source pattern: " ^
Lazy.force msg))
| MultiPassDisambiguator.DisambiguationError _ ->
raise (GrafiteTypes.Command_error ("bad source pattern: " ^
Lazy.force msg))
| MultiPassDisambiguator.DisambiguationError _ ->