diff --git a/libcompiler/primitives.scm b/libcompiler/primitives.scm
index 872468a..16a4e8d 100644
--- a/libcompiler/primitives.scm
+++ b/libcompiler/primitives.scm
@@ -13,7 +13,6 @@
          instance-variable?
          transient-variable?
          special-variable?
-         transient/instance-variable?
          machine-variable?)
 
 (define unary-primitives
@@ -167,13 +166,10 @@
 (define (transient-variable? var) (and (memq var transient-variables) #t))
 (define (special-variable?   var) (and (memq var special-variables)   #t))
 
-(define (transient/instance-variable? var)
-  (or (transient-variable? var)
-      (instance-variable? var)))
-
 (define (machine-variable? var)
-  (or (special-variable? var)
-      (transient/instance-variable? var)
-      (global-variable? var)))
+  (or (special-variable?   var)
+      (transient-variable? var)
+      (instance-variable?  var)
+      (global-variable?    var)))
 
 ; vim:set sw=2 expandtab: