From f90bd4530f40fd9814b5975e66a67db395c829ca Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?=E5=85=B3=E5=80=A9=E5=80=A9?=
 <amethyst.asuka@gcmodeller.org>
Date: Sat, 30 Mar 2019 14:33:58 +0800
Subject: [PATCH] variant try cast

---
 Language/Value/Variant.vb | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/Language/Value/Variant.vb b/Language/Value/Variant.vb
index f97094d2..0d4b3607 100644
--- a/Language/Value/Variant.vb
+++ b/Language/Value/Variant.vb
@@ -75,6 +75,10 @@ Namespace Language
             End Get
         End Property
 
+        Public Function [TryCast](Of T)() As T
+            Return DirectCast(Value, T)
+        End Function
+
         <MethodImpl(MethodImplOptions.AggressiveInlining)>
         Public Overloads Shared Widening Operator CType(obj As [Variant](Of A, B)) As Type
             Return obj.GetUnderlyingType