/*****************************************************************************
*   This is the `veriuser.c' file.  For more information about the contents
*   of this file, please see `veriuser.doc'.
*****************************************************************************/

#include "veriuser.h"

char *veriuser_version_str = "";

int (*endofcompile_routines[])() = 
{
    /*** my_eoc_routine, ***/
    0 /*** final entry must be 0 ***/
};

bool err_intercept(level,facility,code)
int level; char *facility; char *code;
{ return(true); }

void value_check(), value_call();
s_tfcell veriusertfs[] =
{
	{userfunction, 1, value_check, 0, value_call, 0, "$value$plusargs", 1},
	// The following is for MTI v5.3 which does not accept $value$plusargs
	//	{userfunction, 1, value_check, 0, value_call, 0, "$value", 1},

    {0} /*** final entry must be 0 ***/
};