Remove transient/instance-variable?, which is no longer used.
This commit is contained in:
parent
b14f75d946
commit
647fcd59d7
|
|
@ -13,7 +13,6 @@
|
||||||
instance-variable?
|
instance-variable?
|
||||||
transient-variable?
|
transient-variable?
|
||||||
special-variable?
|
special-variable?
|
||||||
transient/instance-variable?
|
|
||||||
machine-variable?)
|
machine-variable?)
|
||||||
|
|
||||||
(define unary-primitives
|
(define unary-primitives
|
||||||
|
|
@ -167,13 +166,10 @@
|
||||||
(define (transient-variable? var) (and (memq var transient-variables) #t))
|
(define (transient-variable? var) (and (memq var transient-variables) #t))
|
||||||
(define (special-variable? var) (and (memq var special-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)
|
(define (machine-variable? var)
|
||||||
(or (special-variable? var)
|
(or (special-variable? var)
|
||||||
(transient/instance-variable? var)
|
(transient-variable? var)
|
||||||
|
(instance-variable? var)
|
||||||
(global-variable? var)))
|
(global-variable? var)))
|
||||||
|
|
||||||
; vim:set sw=2 expandtab:
|
; vim:set sw=2 expandtab:
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue