fix for [bug 1858] (this_object() in constants)

Rev: src/array.c:1.119
Rev: src/array.h:1.38
Rev: src/mapping.c:1.138
Rev: src/mapping.h:1.40
Rev: src/multiset.c:1.39
Rev: src/multiset.h:1.19
Rev: src/program.c:1.373
Rev: src/svalue.c:1.125
Rev: src/svalue.h:1.97