comparison gcc/config/arm/neon-schedgen.ml @ 47:3bfb6c00c1e0

update it from 4.4.2 to 4.4.3.
author kent <kent@cr.ie.u-ryukyu.ac.jp>
date Sun, 07 Feb 2010 17:44:34 +0900
parents a06113de4d67
children 77e2b8dfacca
comparison
equal deleted inserted replaced
46:b85a337e5837 47:3bfb6c00c1e0
46 unguarded define_bypass construction is issued for that pair. 46 unguarded define_bypass construction is issued for that pair.
47 (For each pair only one define_bypass construction will be emitted, 47 (For each pair only one define_bypass construction will be emitted,
48 and at present we do not emit specific guards.) 48 and at present we do not emit specific guards.)
49 *) 49 *)
50 50
51 open Utils 51 let find_with_result fn lst =
52 let rec scan = function
53 [] -> raise Not_found
54 | l::ls ->
55 match fn l with
56 Some result -> result
57 | _ -> scan ls in
58 scan lst
52 59
53 let n1 = 1 and n2 = 2 and n3 = 3 and n4 = 4 and n5 = 5 and n6 = 6 60 let n1 = 1 and n2 = 2 and n3 = 3 and n4 = 4 and n5 = 5 and n6 = 6
54 and n7 = 7 and n8 = 8 and n9 = 9 61 and n7 = 7 and n8 = 8 and n9 = 9
55 62
56 type availability = Source of int 63 type availability = Source of int