INTERFACEFilePath ; PROCEDURE Normalize (dest, src: TEXT): TEXT;
return a relative path from filesrc
to filedest
PROCEDURE Classify (path: TEXT): Kind;
classify the file based on its suffix
TYPE Kind = { I3, M3, IG, MG, TMPL, QUAKE, FV, H, C, other }; END FilePath.