;  liblink.asm -- jimm mackraz, oct 28, 1986
;  application side interface for C-routines calling example library

	include 'exec/types.i'
	include 'exec/libraries.i'

	LIBINIT
	LIBDEF	_LVOGetDown
	LIBDEF	_LVODouble

	; --- xref from application
	public	_libbase

	; --- xdef for application
	public	_GetDown
	public	_Double

_GetDown:
	move.l	_libbase,a6
	jmp		_LVOGetDown(a6)	

_Double:
	move.l	4(sp),d0		; first argument on stack
	move.l	_libbase,a6
	jmp	_LVODouble(a6)
