rs.PropertyListBox() Help sample error

Scripting
,
1

The sample is this:

import rhinoscriptsyntax as rs
objs = rs.GetObjects("Select Objects")
if objs:
    names = []
    for obj in objs:
        name = rs.ObjectName(obj)
        if name is None: name=""
        names.append(name)
    results = rs.PropertyListBox(objs, names, "Modify object name(s)")
    if results:
        for i in compat.RANGE(len(objs)):  #this line
            rs.ObjectName( objs[i], results[i] )

I looked at that and was mystified by the compat.RANGE item. The sample errors out at that. Most likely a typo that inserted this from some other non-standard module…?