Start

[mono.git] / mcs / mbas / literal.cs

diff --git a/mcs/mbas/literal.cs b/mcs/mbas/literal.cs
index ea7c6dc4118db6629a347da85fd0b40e80c49132..2aec7d3588df966f95fce90f61e2c0fdaf1cce1e 100644 (file)
--- a/mcs/mbas/literal.cs
+++ b/mcs/mbas/literal.cs
@@ -196,4 +196,17 @@ namespace Mono.MonoBASIC {
                        return this;
                }
        }
+       
+       public class DateLiteral : DateConstant {
+               public DateLiteral (DateTime s) : base (s)
+               {
+               }
+
+               public override Expression DoResolve (EmitContext ec)
+               {
+                       type = TypeManager.date_type;
+
+                       return this;
+               }
+       }
 }