summaryrefslogtreecommitdiff
path: root/support/tab4tex/source/compiler.inc
blob: 15e0027b65cc35b369e71167961e5086c2368197 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
* Compiler.inc
* Gregory White <glwhite@netconnect.com.au>
* Posted to the Snobol list (March 2003)
* and adapted as a function


	DEFINE('COMPILER()')			:(COMPILER_END)
	
compiler

IDprocessor    :($('COMPILER' SIZE(DATE())))

COMPILER17 compiler 	= 'SPITBOL' 	:(return)

COMPILER19 compiler	= 'CSNOBOL4'	:(return)

COMPILER20 compiler	= 'SNOBOL4+'  	:(return)

compiler_end

* Uses the different size of DATE() to detect the compiler used