Implement a failing symbol-plist as primitive
Fix SYMBOL-PLIST and (SETF SYMBOL-PLIST)