Skip to content

Instantly share code, notes, and snippets.

@abeaumont

abeaumont/string-aref-test.dylan

Created March 21, 2016 16:58
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save abeaumont/594f862db30106de75ea to your computer and use it in GitHub Desktop.
Save abeaumont/594f862db30106de75ea to your computer and use it in GitHub Desktop.
Download ZIP
Raw
string-aref-test.dylan
module: string-aref-test
define function main ()
let t = "abcdefg";
let (a, b) = method() values(t[2], 'c') end();
format-out("%= %=\n", a, b);
let (c, d) = values(t[2], 'c');
format-out("%= %=\n", c, d);
let x = #[1, 2, 3, 4];
let (e, f) = method() values(x[2], 'c') end();
format-out("%= %=\n", e, f);
end function main;
main()
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment