D tokens:
==============
     1	import
     2	std
     3	.
     4	stdio
     5	,
     6	std
     7	.
     8	algorithm
     9	,
    10	std
    11	.
    12	range
    13	;
    14	enum
    15	say
    16	=
    17	(
    18	in
    19	string
    20	s
    21	)
    22	pure
    23	=>
    24	s
    25	.
    26	group
    27	.
    28	map
    29	!
    30	q
    31	{
    32	text
    33	(
    34	a
    35	[
    36	1
    37	]
    38	,
    39	a
    40	[
    41	0
    42	]
    43	)
    44	}
    45	.
    46	join
    47	;
    48	void
    49	main
    50	(
    51	)
    52	{
    53	"1"
    54	.
    55	recurrence
    56	!
    57	(
    58	(
    59	t
    60	,
    61	n
    62	)
    63	=>
    64	t
    65	[
    66	n
    67	-
    68	1
    69	]
    70	.
    71	say
    72	)
    73	.
    74	take
    75	(
    76	8
    77	)
    78	.
    79	writeln
    80	;
    81	}

Crystal tokens (with ARGV, etc.)
================================
     1	if
     2	ARGV
     3	.
     4	length
     5	!=
     6	1
     7	puts
     8	"missing argument: n"
     9	exit
    10	1
    11	end
    12	n
    13	=
    14	ARGV
    15	[
    16	0
    17	]
    18	.
    19	to_i
    20	buffer
    21	=
    22	String
    23	::
    24	Buffer
    25	.
    26	new
    27	(
    28	20
    29	)
    30	n
    31	.
    32	times
    33	do
    34	puts
    35	str
    36	.
    37	length
    38	str
    39	.
    40	each_chunk
    41	do
    42	|
    43	digit
    44	,
    45	count
    46	|
    47	buffer
    48	<<
    49	'0'
    50	+
    51	count
    52	buffer
    53	<<
    54	digit
    55	end
    56	str
    57	=
    58	buffe
    59	.
    60	to_s
    61	buffer
    62	.
    63	clear
    64	end

Crystal tokens (without ARGV, etc.)
===================================
     1	buffer
     2	=
     3	String
     4	::
     5	Buffer
     6	.
     7	new
     8	(
     9	20
    10	)
    11	n
    12	.
    13	times
    14	do
    15	puts
    16	str
    17	.
    18	length
    19	str
    20	.
    21	each_chunk
    22	do
    23	|
    24	digit
    25	,
    26	count
    27	|
    28	buffer
    29	<<
    30	'0'
    31	+
    32	count
    33	buffer
    34	<<
    35	digit
    36	end
    37	str
    38	=
    39	buffe
    40	.
    41	to_s
    42	buffer
    43	.
    44	clear
    45	end