Added pname to primitive type
Added null? and cadr