RosettaCodeData/Task/S-Expressions/J/s-expressions-2.j
Ingy döt Net b83f433714 tasks a-s
2013-04-10 23:57:08 -07:00

12 lines
1.5 KiB
Text

readSexpr '((data "quoted data" 123 4.5) (data (!@# (4.5) "(more" "data)")))'
┌───────────────────────────┬────────────────────────────────┐
│┌─────┬───────────┬───┬───┐│┌─────┬────────────────────────┐│
││`data│quoted data│123│4.5│││`data│┌────┬─────┬─────┬─────┐││
│└─────┴───────────┴───┴───┘││ ││`!@#│┌───┐│(more│data)│││
│ ││ ││ ││4.5││ │ │││
│ ││ ││ │└───┘│ │ │││
│ ││ │└────┴─────┴─────┴─────┘││
│ │└─────┴────────────────────────┘│
└───────────────────────────┴────────────────────────────────┘
writeSexpr readSexpr '((data "quoted data" 123 4.5) (data (!@# (4.5) "(more" "data)")))'
((data "quoted data" 123 4.5) (data (!@# (4.5) "(more" "data)")))