diff options
Diffstat (limited to 'src/interp/i-util.boot')
-rw-r--r-- | src/interp/i-util.boot | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/interp/i-util.boot b/src/interp/i-util.boot index cb81359f..9a100a3e 100644 --- a/src/interp/i-util.boot +++ b/src/interp/i-util.boot @@ -172,3 +172,7 @@ extractCONDClauses clauses == [[pred1,:act1],:restClauses] [[''T,clauses]] +++ Returns true if symbol `id' is either a local variable +++ or an iterator variable. +isLocallyBound id == + id in $localVars or id in $iteratorVars |