From 0ffc8f616215052d372d51c67d40022800da5e31 Mon Sep 17 00:00:00 2001
From: Oldes <oldes.huhuman@gmail.com>
Date: Thu, 16 Apr 2020 17:30:51 +0200
Subject: [PATCH] FIX: using VAL_TYPE instead of direct type code

improving https://github.com/Oldes/Rebol3/commit/7c2a11ed7a289a3515650da98e65696fbf55fd68

related to: https://github.com/Oldes/Rebol-issues/issues/276
---
 src/core/t-date.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/core/t-date.c b/src/core/t-date.c
index 4b544a7c2e..79e1842243 100644
--- a/src/core/t-date.c
+++ b/src/core/t-date.c
@@ -746,7 +746,7 @@
 
 		if (type == REB_DATE) {
 			if (action == A_SUBTRACT) {
-				if(!IS_DATE(val)) Trap_Math_Args(REB_INTEGER, A_SUBTRACT);
+				if(!IS_DATE(val)) Trap_Math_Args(VAL_TYPE(val), A_SUBTRACT);
 				num = Diff_Date(date, VAL_DATE(arg));
 				goto ret_int;
 			}