add back test

Author: shikokuchuo

tests/tests.R

@@ -467,6 +467,7 @@ nanotesterr(start(fakelist), "valid Listener")
 nanotesterr(close(fakelist), "valid Listener")
 unres <- `class<-`(NA, "unresolvedValue")
 nanotest(unresolved(unres))
+nanotestp(unres)
 unres <- `class<-`("", "unresolvedValue")
 nanotest(!unresolved(unres))
 nanotest(identical(call_aio("a"), "a"))