/*  I N L I N E   S U B S T I T U T I O N
 *
 *  I L 1 _ A U X . H
 */

extern bool   same_size();	/* (int t1,t2)
				 * See if the two types t1 and t2 have
				 * the same size.
				 */
extern rem_actuals();		/* (actual_p atcs)
				 * remove an actual-list from core.
				 */
extern remov_formals();		/* (proc_p p)
				 * Remove the formals-list of p from core.
				 */
extern rem_indir_acc();		/* (proc_p p)
				 * Remove formal that may be accessed
				 * indirectly from formal lists of p
				 */
extern bool par_overlap();	/* (offset off1, int t1, offset off2, int t2)
				 * See if the formal at offset off1 and type t1
				 * overlaps the formal at offset off2
				 * and type t2.
				 */
extern short looplevel();	/* (bblock_p b)
				 * Determine the loop nesting level of b.
				 */
extern short proclength();	/* (proc_p p)
				 * Determine the number of EM instructions
				 * in p. Do not count pseudos.
				 */

extern line_p copy_code();	/* (line_p l1,l2)
				 * copy the code between l1 and l2.
				 * Pseudos may not be contained in
				 * the list of instructions. If l1==l2
				 * the result is only one instruction.
				 */