diff options
| author | Julian Brown <julian@codesourcery.com> | 2010-01-12 11:50:36 +0000 |
|---|---|---|
| committer | Ramana Radhakrishnan <ramana@gcc.gnu.org> | 2010-01-12 11:50:36 +0000 |
| commit | 24fe19c35aec386d2166ab266efdafe446190de5 (patch) | |
| tree | 5a3041e972fb909a8c8d7d6c60863bb52ee99e76 /gcc | |
| parent | acc2dd549fe71bfc3091dc1647e1d7458d84bbd5 (diff) | |
| download | gcc-24fe19c35aec386d2166ab266efdafe446190de5.zip gcc-24fe19c35aec386d2166ab266efdafe446190de5.tar.gz gcc-24fe19c35aec386d2166ab266efdafe446190de5.tar.bz2 | |
Fix Neon Scheduler ocaml description.
For
2010-01-12 Julian Brown <julian@codesourcery.com>
* config/arm/neon-schedgen.ml (Utils): Don't try to
open missing module.
(find_with_result): New.
From-SVN: r155835
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/ChangeLog | 6 | ||||
| -rw-r--r-- | gcc/config/arm/neon-schedgen.ml | 9 |
2 files changed, 14 insertions, 1 deletions
diff --git a/gcc/ChangeLog b/gcc/ChangeLog index 4d8cfb3..17d3224 100644 --- a/gcc/ChangeLog +++ b/gcc/ChangeLog @@ -1,3 +1,9 @@ +2010-01-12 Julian Brown <julian@codesourcery.com> + + * config/arm/neon-schedgen.ml (Utils): Don't try to + open missing module. + (find_with_result): New. + 2010-01-12 Jakub Jelinek <jakub@redhat.com> PR debug/42662 diff --git a/gcc/config/arm/neon-schedgen.ml b/gcc/config/arm/neon-schedgen.ml index e564742..d735ea0 100644 --- a/gcc/config/arm/neon-schedgen.ml +++ b/gcc/config/arm/neon-schedgen.ml @@ -48,7 +48,14 @@ and at present we do not emit specific guards.) *) -open Utils +let find_with_result fn lst = + let rec scan = function + [] -> raise Not_found + | l::ls -> + match fn l with + Some result -> result + | _ -> scan ls in + scan lst let n1 = 1 and n2 = 2 and n3 = 3 and n4 = 4 and n5 = 5 and n6 = 6 and n7 = 7 and n8 = 8 and n9 = 9 |