Add line function. Rename current-surface to current-graphics.