summaryrefslogtreecommitdiff
path: root/tnslc/parse/parse.tnsl
blob: 4983e13b256f8522dba691d72cda0b8836265708 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
/##
	Copyright 2021 Kyle Gunger

	This file is licensed under the CDDL 1.0 (the License)
	and may only be used in accordance with the License.
	You should have received a copy of the License with this
	software/source code. If you did not, a copy can be found
	at the following URL:

	https://opensource.org/licenses/CDDL-1.0

	THIS SOFTWARE/SOURCE CODE IS PROVIDED "AS IS" WITH NO
	WARRANTY, GUARANTEE, OR CLAIM OF FITNESS FOR ANY PURPOSE
	EXPRESS OR IMPLIED
#/

/; module parse
	:include "parse/token.tnsl"
	:include "parse/tokenizer.tnsl"
;/

/; print_tokens(~{}parse.Token dat)
	/;loop (int i = 0; i < len dat`) [i++]
		;tnsl.io.print("{ ")
		;tnsl.io.print(dat`{i}.token_type)
		;tnsl.io.print(" ")
		;tnsl.io.print(dat`{i}.data`)
		;tnsl.io.print(" } ")
	;/
	;tnsl.io.print("\n")
;/