Remove $void CPS expression type

[bpt/guile.git] / module / language / cps / verify.scm

diff --git a/module/language/cps/verify.scm b/module/language/cps/verify.scm
index a52924b..e005594 100644 (file)
--- a/module/language/cps/verify.scm
+++ b/module/language/cps/verify.scm
@@ -135,8 +135,6 @@
 
   (define (visit-expression exp k-env v-env)
     (match exp
-      (($ $void)
-       #t)
       (($ $const val)
        #t)
       (($ $prim (? symbol? name))