Skip to content

Instantly share code, notes, and snippets.

@WayneCui

WayneCui/red-test.red

Created March 5, 2014 05:03
Show Gist options
  • Save WayneCui/9361528 to your computer and use it in GitHub Desktop.
Save WayneCui/9361528 to your computer and use it in GitHub Desktop.
Download ZIP
Red 测试
Raw
red-test.red
Red []
data: [1 2 3 4 "a" "b" "c" "d"]
output: make block! length? data
foreach [p1 p2 p3 p4] data [ output: reduce/into [p1 p3 p4] output ]
probe head output
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment