<commit_before><commit_msg>*** empty log message ***<commit_after>.define .lino,.filn

.define F_DUM,EXIT

.define	begtext,begdata,begbss
.define	EARRAY,ERANGE,ESET,EIDIVZ,EHEAP,EILLINS,ECASE
.define	hol0,.reghp,.limhp,.trpim,.trppc
.define	LINO_AD,FILN_AD

! m68k4 runtime start-off for the Bleasdale 68000 system

F_DUM	= 0


LINO_AD	= 0
FILN_AD	= 4

EARRAY	= 0
ERANGE	= 1
ESET	= 2
EIDIVZ	= 6
EHEAP	= 17
EILLINS	= 18
ECASE	= 20

.base 0x20000
	.text
begtext:
	! Bleasdale puts the argument and environment vectors
	! themselves on top of the stack, instead of POINTERS
	! to these vectors. We get things right here.
	move.l	4(sp),a0
	clr.l	-4(a0)
	move.l	sp,a0
	sub.l	#8,sp
	move.l	(a0),(sp)
	add.l	#4,a0
	move.l	a0,4(sp)
1:
	tst.l	(a0)+
	bne	1b
	move.l	4(sp),a1
	cmp.l	(a1),a0
	blt	2f
	sub.l	#4,a0
2:
	move.l	a0,8(sp)

	! Now the stack contains an argc (4 bytes), argv-pointer and
	! envp pointer.

	pea	endbss
	jsr	_brk
	add.l	#4,sp
	jsr	_m_a_i_n
	add	#012,sp
EXIT:
	jsr	__exit
	! As a temporary measure
	jsr .trp
	

	.data
begdata:
hol0:
.lino:
	.long	0	! lino
.filn:
	.long	0	! filn
.reghp:
	.long	endbss
.limhp:
	.long	endbss
.trppc:
	.long	0
.trpim:
	.long	0	! was short


	.bss
begbss:
{'fraction_non_alphanumeric': 0.12395309882747069, 'fraction_numerical': 0.051926298157453935, 'mean_word_length': 3.283154121863799, 'pattern_counts': {'":': 0, '<': 3, '<?xml version=': 0, '>': 3, 'https://': 0, 'lorem ipsum': 0, 'www.': 0, 'xml': 0}, 'pii_count': 0, 'substrings_counts': 0, 'word_list_counts': {'cursed_substrings.json': 0, 'profanity_word_list.json': 0, 'sexual_word_list.json': 0, 'zh_pornsignals.json': 0}}
{'dir': 'git-commits-cleaned', 'id': '2822650', 'n_tokens_mistral': 660, 'n_tokens_neox': 623, 'n_words': 160}