diff options
Diffstat (limited to 'module/language/glil/spec.scm')
-rw-r--r-- | module/language/glil/spec.scm | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/module/language/glil/spec.scm b/module/language/glil/spec.scm index d5291a211..3b7e9700a 100644 --- a/module/language/glil/spec.scm +++ b/module/language/glil/spec.scm @@ -1,6 +1,6 @@ ;;; Guile Lowlevel Intermediate Language -;; Copyright (C) 2001 Free Software Foundation, Inc. +;; Copyright (C) 2001, 2009 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 @@ -23,6 +23,7 @@ #:use-module (language glil) #:use-module (language glil compile-assembly) #:use-module (language glil decompile-assembly) + #:use-module (language glil compile-sassy) #:export (glil)) (define (write-glil exp . port) @@ -37,5 +38,7 @@ #:reader read #:printer write-glil #:parser parse-glil - #:compilers `((assembly . ,compile-asm)) + #:compilers `((assembly . ,compile-asm) + (sassy . ,(lambda x e opts) + (values (compile-sassy x) e e))) #:decompilers `((assembly . ,decompile-assembly))) |