p2: fix print 1,2,3: call not-empty listexprs

potion: 1 sqrt(x)   => (expr (value (1), msg ("sqrt" list (expr (msg ("x"))))))
p2:     print 1,2,3 => (expr (value (1), msg ("print" list (expr (value (2)), expr (value (3)))))