let map_classes data folder = fold_classes data folder StringMap.empty