diff options
author | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2019-04-04 21:40:04 +0200 |
---|---|---|
committer | David Monniaux <david.monniaux@univ-grenoble-alpes.fr> | 2019-04-04 21:40:04 +0200 |
commit | e08d244a18870131820814880685504f0ea467e6 (patch) | |
tree | 58f95c1b0872bb7c6bc74a43b349f97171a37c51 /backend/Selection.v | |
parent | 71c38724bee43fe1a2ce67ee51f09478cd167929 (diff) | |
download | compcert-kvx-e08d244a18870131820814880685504f0ea467e6.tar.gz compcert-kvx-e08d244a18870131820814880685504f0ea467e6.zip |
more on select
Diffstat (limited to 'backend/Selection.v')
-rw-r--r-- | backend/Selection.v | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/backend/Selection.v b/backend/Selection.v index ec4a7b38..7191d5cb 100644 --- a/backend/Selection.v +++ b/backend/Selection.v @@ -283,10 +283,7 @@ Definition sel_builtin optid ef args := | Some id => match args with | a1::a2::a3::nil => - OK (Sassign id (Eop (Oselect (Ccomp0 Ceq)) - ((sel_expr a3)::: - (sel_expr a2)::: - (sel_expr a1):::Enil))) + OK (Sassign id (select (sel_expr a3) (sel_expr a2) (sel_expr a1))) | _ => Error (msg "__builtin_ternary_(u)int: arguments") end end |