Reverse a string: Difference between revisions
Content deleted Content added
Added BBC BASIC |
m →{{header|OCaml}}: indentation |
||
Line 824: | Line 824: | ||
here is a 100% functionnal string reversing function: |
here is a 100% functionnal string reversing function: |
||
<lang ocaml> |
<lang ocaml>let rec revs strin list index = |
||
if List.length list = String.length strin |
|||
then String.concat "" list |
|||
</lang> |
|||
else revs strin ((String.sub strin index 1)::list) (index+1)</lang> |
|||
revs "Hello World!" [] 0 |
revs "Hello World!" [] 0 |