From 191ee91edb9f0aa24d5f5af6a037d6816ca9a926 Mon Sep 17 00:00:00 2001
From: otya128 <otya128@users.noreply.github.com>
Date: Wed, 31 Aug 2016 17:52:14 +0900
Subject: [PATCH] =?UTF-8?q?CHKCALL=E3=82=92=E8=BF=BD=E5=8A=A0?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 SMILEBASIC/builtinfunctions.d | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/SMILEBASIC/builtinfunctions.d b/SMILEBASIC/builtinfunctions.d
index d8d4e8d..9547b26 100644
--- a/SMILEBASIC/builtinfunctions.d
+++ b/SMILEBASIC/builtinfunctions.d
@@ -1439,6 +1439,10 @@ class BuiltinFunction
         BGCLR(p, DefaultValue!(int, false)(true));
         GCLS(p, DefaultValue!(int, false)(true));
     }
+    static int CHKCALL(PetitComputer p, wstring func)
+    {
+        return (func in p.vm.currentSlot.functions) != null || (func in otya.smilebasic.builtinfunctions.BuiltinFunction.builtinFunctions) != null;
+    }
     //alias void function(PetitComputer, Value[], Value[]) BuiltinFunc;
     static BuiltinFunctions[wstring] builtinFunctions;
     static wstring getBasicName(BFD)(const wstring def)