RosettaCodeData/Task/Increment-a-numerical-string/XLISP/increment-a-numerical-string.l

(DEFUN INCREMENT-STRING (X)
    (NUMBER->STRING (+ (STRING->NUMBER X) 1)))
Initial data commit 2023-07-01 11:58:00 -04:00			`(DEFUN INCREMENT-STRING (X)`
			`(NUMBER->STRING (+ (STRING->NUMBER X) 1)))`