From e2242f20105b0c36e9990d398b1d8676d443392f Mon Sep 17 00:00:00 2001
From: Bill Currie <bill@taniwha.org>
Date: Sat, 25 Mar 2000 12:23:41 +0000
Subject: [PATCH] add support for % operator in QC (untested)

---
 common/pr_comp.h | 4 +++-
 common/pr_exec.c | 4 ++++
 2 files changed, 7 insertions(+), 1 deletion(-)

diff --git a/common/pr_comp.h b/common/pr_comp.h
index d5f0269..2e9f60a 100644
--- a/common/pr_comp.h
+++ b/common/pr_comp.h
@@ -124,7 +124,9 @@ enum {
 	OP_OR,
 
 	OP_BITAND,
-	OP_BITOR
+	OP_BITOR,
+
+	OP_MOD_F,
 };
 
 
diff --git a/common/pr_exec.c b/common/pr_exec.c
index b95c612..e400a47 100644
--- a/common/pr_exec.c
+++ b/common/pr_exec.c
@@ -477,6 +477,10 @@ while (1)
 		c->_float = a->_float / b->_float;
 		break;
 
+	case OP_MOD_F:
+		c->_float = (int)a->_float % (int)b->_float;
+		break;
+
 	case OP_BITAND:
 		c->_float = (int)a->_float & (int)b->_float;
 		break;