From 76f49ca6af4ffbc77c0ba7965d409c3de04011bd Mon Sep 17 00:00:00 2001
From: xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e>
Date: Sun, 6 Apr 2014 18:32:27 +0000
Subject: Support Onot operator / notl instruction.  More constant propagation
 during selection.

git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@2451 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
---
 ia32/PrintAsm.ml | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'ia32/PrintAsm.ml')

diff --git a/ia32/PrintAsm.ml b/ia32/PrintAsm.ml
index d67fb9e..9a2648a 100644
--- a/ia32/PrintAsm.ml
+++ b/ia32/PrintAsm.ml
@@ -644,6 +644,8 @@ let print_instruction oc = function
       fprintf oc "	xorl	%a, %a\n" ireg r1 ireg rd
   | Pxor_ri(rd, n) ->
       fprintf oc "	xorl	$%a, %a\n" coqint n ireg rd
+  | Pnot(rd) ->
+      fprintf oc "	notl	%a\n" ireg rd
   | Psal_rcl(rd) ->
       fprintf oc "	sall	%%cl, %a\n" ireg rd
   | Psal_ri(rd, n) ->
-- 
cgit v1.2.3