File: entry.S

package info (click to toggle)

s390-tools 2.15.1-2

links: PTS
area: main
in suites: bullseye
size: 8,216 kB
sloc: ansic: 130,144; sh: 9,397; cpp: 8,359; perl: 2,517; makefile: 1,960; asm: 1,016

file content (20 lines) | stat: -rw-r--r-- 568 bytes

parent folder | download | duplicates (3)

/*
 * Entry module for stage 2 stand-alone dump tools
 *
 * Copyright IBM Corp. 2001, 2017
 *
 * s390-tools is free software; you can redistribute it and/or modify
 * it under the terms of the MIT license. See LICENSE for details.
 */

#define __LC_SAVE_AREA_SYNC	0x200	/* Save area for interrupts */
#define __LC_PGM_OLD_PSW	0x0150	/* Program check old PSW */

.globl pgm_check_handler
pgm_check_handler:
	stmg	%r0,%r15,__LC_SAVE_AREA_SYNC
	aghi	%r15,-200
	larl	%r14,pgm_check_handler_fn
	basr	%r14,%r14
	lmg	%r0,%r15,__LC_SAVE_AREA_SYNC
	lpswe	__LC_PGM_OLD_PSW(%r0)