evolved.id works with negative count parameter

develop/untests.lua

@@ -56,6 +56,10 @@ do
 end
 
 do
+    do
+        local i0 = evo.id(-1)
+        assert(type(i0) == 'nil')
+    end
     do
         local i0 = evo.id(0)
         assert(type(i0) == 'nil')

evolved.lua

@@ -3458,7 +3458,7 @@ end
 function __evolved_id(count)
     count = count or 1
 
-    if count == 0 then
+    if count <= 0 then
         return
     end