let has_import env filename =
        let rec loop = function
                | [] -> false
                | s:: tl -> if s = filename then true else loop tl
        in loop env.imported