zindel · January 3, 2019 09:00
diff --git a/Fastpack.ml b/Fastpack.ml
      let resolveDeps = fix (fun recur ->
        let%bind _js, reqs = File.compute >>> parse in
        let%bind deps = return reqs ||> resolve in
        let%bind depsOfDeps = return deps ||> recur in
        return (deps @ List.flatten depsOfDeps)
      ) in
	let resolveDeps = fix (fun recur ->
	let%bind _js, reqs = File.compute >>> parse in
	let%bind deps = return reqs \|\|> resolve in
	let%bind depsOfDeps = return deps \|\|> recur in
	return (deps @ List.flatten depsOfDeps)
	) in