Re: [Pharo-users] scope shadowing problem.

Nov. 14, 2016


      2016-11-14 22:34 GMT+01:00 CodeDmitry <dimamakhnin@gmail.com>:
...
Is there a way to stop Pharo from preventing me from shadowing blocks?
There is no setting for ignoring this warning, but you can compile the code
in a non-interactive way:

Object compile: 'foo
    [ :superenv |
    | env |
    env := Dictionary new.
    [ :superenv |
    | env |
    env := Dictionary new.
    [ :superenv |
    | env |
    env := Dictionary new

    "..." ] value: env ] value: env ] value: nil'
...
[:superenv |
         |env|
         env := Dictionary new.
[:superenv |
        |env|
        env := Dictionary new.
        [:superenv |
            |env|
            env := Dictionary new.
"..."
        ] value: env.
    ] value: env.
] value: nil.
It says superenv name already defined, even though that is the whole point,
I want to demonstrate dynamic links, eg:
var env_get = function(env, varname) {
    var tenv = env;
while (true) {
        if (tenv.hasOwnProperty(varname)) {
            return tenv[varname];
        } else {
            if (tenv.superenv == null) {
                throw "no such variable" + tenv;
            } else {
                tenv = tenv.superenv;
            }
        }
    }
};
(function(superenv) {
    var env = {
        'superenv': superenv,
        'one': 1
    };
console.log(env_get(env, "one"));
(function(superenv) {
        var env = {
            'superenv': superenv,
            'two': 2
        };
        console.log(env_get(env, "one"));
        console.log(env_get(env, "two"));
(function(superenv) {
            var env = {
                'superenv': superenv,
                'three': 3
            }
            console.log(env_get(env, "one"));
            console.log(env_get(env, "two"));
            console.log(env_get(env, "three"));
        })(env);
    })(env);
})(null);
in JavaScript
and
(defun env_get (env varname) (let
    ((tenv))
    (setq tenv env)
(loop (let
        ((val))
(setq val (gethash varname tenv))
        (if val
            (return val)
            (let
                ((superenv))
                (setq superenv (gethash 'superenv tenv))
(if superenv
                    (setq tenv superenv)
                    (return 'undefined)
                )
            )
        )
    ))
))
((lambda (superenv) (let
    ((env))
(setq env (make-hash-table))
    (setf (gethash 'superenv env) nil)
    (setf (gethash 'one env) 1)
(print (env_get env 'one))
    (print (env_get env 'two))
    (print (env_get env 'three))
((lambda (superenv) (let
        ((env))
(setq env (make-hash-table))
        (setf (gethash 'superenv env) superenv)
        (setf (gethash 'two env) 2)
(print (env_get env 'one))
        (print (env_get env 'two))
        (print (env_get env 'three))
((lambda (superenv) (let
            ((env))
(setq env (make-hash-table))
            (setf (gethash 'superenv env) superenv)
            (setf (gethash 'two env) 2)
            (setf (gethash 'three env) 3)
(print (env_get env 'one))
            (print (env_get env 'two))
            (print (env_get env 'three))
        )) env)
    )) env)
)) nil)
in Lisp.
--
View this message in context: http://forum.world.st/scope-
shadowing-problem-tp4923049.html
Sent from the Pharo Smalltalk Users mailing list archive at Nabble.com.

Re: [Pharo-users] scope shadowing problem.

Nicolai Hess