From 52272fc764d0ca3eee00dcf7f1f51734198ad777 Mon Sep 17 00:00:00 2001
From: Andy Wingo <wingo@pobox.com>
Date: Tue, 27 Apr 2010 23:04:39 +0200
Subject: [PATCH] fix bug in compile-glil.scm for return opcode-hack

* module/language/tree-il/compile-glil.scm (*primcall-ops*): Fix entry
  for `return'. Thanks to Jon Herron for the report.
---
 THANKS                                   | 1 +
 module/language/tree-il/compile-glil.scm | 2 +-
 2 files changed, 2 insertions(+), 1 deletion(-)

diff --git a/THANKS b/THANKS
index 2649a2a9a..cdab8403f 100644
--- a/THANKS
+++ b/THANKS
@@ -56,6 +56,7 @@ For fixes or providing information which led to a fix:
 	   Sven Hartrumpf
 	   Eric Hanchrow
 	   Judy Hawkins
+	    Jon Herron
             Sam Hocevar
 	Patrick Horgan
            Ales Hvezda
diff --git a/module/language/tree-il/compile-glil.scm b/module/language/tree-il/compile-glil.scm
index b45423a3c..4d5e29b64 100644
--- a/module/language/tree-il/compile-glil.scm
+++ b/module/language/tree-il/compile-glil.scm
@@ -123,7 +123,7 @@
    (make-struct . make-struct)
 
    ;; hack for javascript
-   ((return . 1) return)
+   ((return . 1) . return)
 
    ((bytevector-u8-ref . 2) . bv-u8-ref)
    ((bytevector-u8-set! . 3) . bv-u8-set)
-- 
2.20.1