From e08d244a18870131820814880685504f0ea467e6 Mon Sep 17 00:00:00 2001
From: David Monniaux <david.monniaux@univ-grenoble-alpes.fr>
Date: Thu, 4 Apr 2019 21:40:04 +0200
Subject: more on select

---
 mppa_k1c/SelectOp.vp | 5 +++++
 1 file changed, 5 insertions(+)

(limited to 'mppa_k1c/SelectOp.vp')

diff --git a/mppa_k1c/SelectOp.vp b/mppa_k1c/SelectOp.vp
index 31e81093..10c91bba 100644
--- a/mppa_k1c/SelectOp.vp
+++ b/mppa_k1c/SelectOp.vp
@@ -61,6 +61,11 @@ Section SELECT.
 
 Context {hf: helper_functions}.
 
+(** Ternary operator *)
+Definition select o0 o1 oselect :=
+ Eop (Oselect (Ccomp0 Ceq))
+              (o0:::o1:::oselect:::Enil).
+				      
 (** ** Constants **)
 
 Definition addrsymbol (id: ident) (ofs: ptrofs) :=
-- 
cgit