Skip to content

Instantly share code, notes, and snippets.

@IgnoredAmbience
Created September 25, 2014 13:03
Show Gist options
  • Save IgnoredAmbience/d47f4b16a9a3f42bf289 to your computer and use it in GitHub Desktop.
Save IgnoredAmbience/d47f4b16a9a3f42bf289 to your computer and use it in GitHub Desktop.
begin
int i = -2147483648;
while i < 2147483647 do
pair (int, int) px = newpair (-559038737, -559038737);
i = i + 1
done;
pair (int, int) pi = newpair (101, 102) ;
pair (char, char) pc = newpair ('a', 'b');
pair (pair, pair) pp = newpair (pi, pc);
pi = snd pp;
pc = fst pp;
int i1 = fst pi;
int i2 = snd pi;
println i1;
println i2;
char c1 = fst pc;
char c2 = snd pc;
println c1;
println c2
end
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment