fixed implemenation of SETQ