view lab4/share.mli @ 1:b5139af1a420 tip basis

Fixed permissions on compile scripts
author Mike Spivey <>
date Fri, 13 Oct 2017 17:27:58 +0100
parents bfdcc3820b32
line wrap: on
line source
(* lab4/share.mli *)
(* Copyright (c) 2017 J. M. Spivey *)

(* The function |traverse| transforms a list of optrees by finding 
   common subexpressions; for each of them, it allocates a temp with
   an initializing assignment, then replaces all occurrences of the
   subexpression with a use of the temp.  Procedure calls are also moved
   to the top level by a similar mechanism. *)

(* |traverse| -- find common subexpressions in a procedure body *)
val traverse : Optree.optree list -> Optree.optree list