XT Git

Repository browser, commits, branches, diffs, and smart HTTP Git transport inside the XT desktop.

Signed in as

guest

Signed in Read

Repositories

BearSSL
themaster • Read
elks-enhanced
themaster • Read
SSH Daemon Project
themaster • Read
Word Unperfect
themaster • Read

elks-enhanced

publicRead

Owner: themasterBranch: masterCommits: 6893Updated: 2026-04-19 00:15

Git CLI clone URL

git clone https://www.xt-emporium.com/git/elks-enhanced.git

Fullscreen desktop URL

Code Commits History Branches Bug Reports Discussions Compare Settings

elks-enhanced / elks / arch / i86 / lib / unused / setjmp.s

File editor

! setjmp.s

	.define	_setjmp
	.define	_longjmp

BP_OFF		=	0
SP_OFF		=	2
IP_OFF		=	4

	.text
	.even

_setjmp:
	pop	cx		! ip
	pop	bx		! pointer to jmp_buf
	dec	sp
	dec	sp
	mov	BP_OFF(bx),bp
	mov	SP_OFF(bx),sp
	mov	IP_OFF(bx),cx
	xor	ax,ax		! non-jump return
	jmp	cx

	.even
_longjmp:
	pop	bx		! junk ip
	pop	bx		! pointer to jmp_buf
	pop	ax		! value (sp now junk, don't fake args)
	cmp	ax,#1		! fixup 0 value to 1 (avoiding branches)
	adc	al,#0		! change ax to 1 iff ax was 0

! the  setjmp.s  in  MINIX 1.2  backtraces the frame pointers here
! this can't be done with more efficient nonstandard frames

	mov	bp,BP_OFF(bx)
	mov	sp,SP_OFF(bx)
	jmp	IP_OFF(bx)

Commit message

This repository is read-only for this account.

Repository snapshot

Current branch
master
Visibility
public
Your access
Read
Remote
Configured

File activity

View file history