How to select all entities passing through a point in AutoLISP

In AutoCAD if you want to use AutoLISP to select all entities/objects that crosses a point the ssget function can be used by passing the same point twice like this:
(ssget "c" pt1 pt1)