In autolisp how I can make xrecord in a dictionary that has a hard reference pointer to a perment entity like layer 0 so he will not be erased when purging or wblocking? Thanks you.