RosettaCodeData/Task/Reverse-a-string/M4/reverse-a-string.m4

2 lines
83 B
Plaintext

define(`invert',`ifelse(len(`$1'),0,,`invert(substr(`$1',1))'`'substr(`$1',0,1))')