diff --git a/module/ice-9/time.scm b/module/ice-9/time.scm
index 0fad8dfca..b693d6126 100644
--- a/module/ice-9/time.scm
+++ b/module/ice-9/time.scm
@@ -1,4 +1,4 @@
-;;;; 	Copyright (C) 2001, 2004, 2006 Free Software Foundation, Inc.
+;;;; 	Copyright (C) 2001, 2004, 2006, 2018 Free Software Foundation, Inc.
 ;;;;
 ;;;; This library is free software; you can redistribute it and/or
 ;;;; modify it under the terms of the GNU Lesser General Public
@@ -52,7 +52,7 @@
             (get identity gc-start gc-end))
     result))
 
-(define-macro (time exp)
-  `((@@ (ice-9 time) time-proc) (lambda () ,exp)))
+(define-syntax-rule (time exp)
+  (time-proc (lambda () exp)))
 
 ;;; time.scm ends here