Added function LITERAL-P.