From cba0e9ac0a603fd27ecc79b38bfb8cd12a505e7a Mon Sep 17 00:00:00 2001
From: ceriel <devnull@localhost>
Date: Mon, 1 Feb 1988 10:17:51 +0000
Subject: [PATCH] compare pointers with CMP

---
 lang/m2/comp/code.c | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/lang/m2/comp/code.c b/lang/m2/comp/code.c
index 29ff7819..624f9d2d 100644
--- a/lang/m2/comp/code.c
+++ b/lang/m2/comp/code.c
@@ -821,6 +821,8 @@ CodeOper(expr, true_label, false_label)
 		case T_POINTER:
 		case T_HIDDEN:
 		case T_EQUAL:
+			C_cmp();
+			break;
 		case T_CARDINAL:
 		case T_INTORCARD:
 			C_cmu(tp->tp_size);