--- trunk/src/compiler/common/paths_sml.in 2012/05/25 14:50:55 1887 +++ trunk/src/compiler/common/paths_sml.in 2012/05/25 15:05:17 1888 @@ -42,13 +42,10 @@ in String.fields (fn #":" => true | _ => false) path end (* getPath *) -(* FIXME: won't need the isAbsolute check in 110.75 *) - fun findExe (paths, name) = if OS.Path.isAbsolute name - then name - else (case PathUtil.findExe paths name - of SOME p => p - | NONE => raise Fail(concat["unable to find ", name, " executable"]) - (* end case *)) + fun findExe (paths, name) = (case PathUtil.findExe paths name + of SOME p => p + | NONE => raise Fail(concat["unable to find ", name, " executable"]) + (* end case *)) in val dnorm = findExe ([diderotBin, installBin, diderotSrc // "dnorm"], "dnorm") val cc = let