lookup_variable_value(): fixed if find nothing, need go to parent environment to find
create_primitive_procedure(): merge USE_CPP_MAP or not, 2 version to 1 function