From: David Vázquez <davazp@gmail.com>
Date: Mon, 24 Jun 2013 15:36:39 +0000 (+0200)
Subject: Fix GET-INTERNAL-REAL-TIME
X-Git-Url: http://repo.macrolet.net/gitweb/?a=commitdiff_plain;h=30ee997b7de86ee4899ccb2467bea03ad71491cb;p=jscl.git

Fix GET-INTERNAL-REAL-TIME
---

diff --git a/src/compiler.lisp b/src/compiler.lisp
index b1065ee..d299902 100644
--- a/src/compiler.lisp
+++ b/src/compiler.lisp
@@ -1288,7 +1288,7 @@
     `(return r)))
 
 (define-builtin get-internal-real-time ()
-  `(call (get (new (call Date)) "getTime")))
+  `(call (get (new (call |Date|)) "getTime")))
 
 (define-builtin values-array (array)
   (if *multiple-value-p*