From 24130a3641ae179816ca5672bde12cc04be17813 Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Sun, 15 Nov 2009 12:20:27 -0800 Subject: Version 021 preparation. Bumped version numbers, and cleaned up trailing whitespace from some files. --- lib.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lib.c') diff --git a/lib.c b/lib.c index 25e8198e..05927cb9 100644 --- a/lib.c +++ b/lib.c @@ -141,7 +141,7 @@ obj_t *type_check2(obj_t *obj, int t1, int t2) obj_t *type_check3(obj_t *obj, int t1, int t2, int t3) { - if (!is_ptr(obj) || (obj->t.type != t1 && obj->t.type != t2 + if (!is_ptr(obj) || (obj->t.type != t1 && obj->t.type != t2 && obj->t.type != t3)) type_mismatch(L"~s is not of type ~s, ~s nor ~s", obj, code2type(t1), code2type(t2), code2type(t3), nao); -- cgit v1.2.3