/*
 * nsref.c - Implementation of nsRef type - reference objects.
 *
 * Copyright (C) 1997, George Madrid
 * All rights reserved.
 */

#include <stdlib.h>

#include "config.h"
#include "nsobj.h"
#include "nsref.h"
#include "nsrefarr.h"
#include "utils.h"

/* ---------- Private data type definition ---------- */
/* To hell with speed, this data type is OPAQUE.  This stuff may change */
/* drastically in the semi-near future */

/* ------------------------------------------------------------------------ */
int
nsr_primclass(nsRef nsr)
{
     return(nsr->primclass);
}

/* ------------------------------------------------------------------------ */
nsObj
nsr_class(nsRef nsr)
{
     /* What if there is no type specified? -gam */
     /* Gonna have to make this a method */

     return(nsr->ops->getClass(nsr));
}