/* $Header:kFP0.s 12.0$ */
/* $ACIS:kFP0.s 12.0$ */
/* $Source: /ibm/acis/usr/sys/ca/RCS/kFP0.s,v $ */

	.data
#if !defined(NO_RCS_HDRS)
rcsid:	.asciz	"$Header:kFP0.s 12.0$"
#endif
	.text

/*
 * 5799-WZQ (C) COPYRIGHT IBM CORPORATION  1986,1987,1988
 * LICENSED MATERIALS - PROPERTY OF IBM
 * REFER TO COPYRIGHT INSTRUCTIONS FORM NUMBER G120-2083
 */
#include "../machine/machparam.h"

#ifdef NFL
#include "assym.s"
#include "../machine/locore.h"
	.text
eye_profil(findfpm):
	get	r2,$USER_FPM
	c	r1,r2
	blr	r15
	get	r2,$KERN_FPM
	br	r15

 	.align 2;
	.globl	_iskernel
eye_profil(iskernel):
	get	r2,$0
	get	r3,$USER_FPM
	c	r1,r3
	blr	r15
	get	r2,$1
	br	r15
#endif NFL
	.globl	.oVncs
	.set	.oVncs,0 

