tag.c

来自「压缩包里面的都是精致的基本C语言小程序」· C语言 代码 · 共 46 行

#include <stdio.h>
#include "mystdlib.h"
#include "error.h"
#include "tag.h"

static int maxSize = 1000;

struct tag
{
  int junk;
};

tag newTag ()
{
  tag temp = checkedMalloc (sizeof (*temp));
  return temp;
}

int tagEquals (poly t1, poly t2)
{
/*
  strOutput2 ("now comparing tag: ");
  strOutput (tagToString (t1));
  strOutput2 ("; ");
  strOutput (tagToString (t2));
  strOutput2 ("\n");
*/
  return (((tag)t1) == (((tag)t2)));
}

str tagToString (poly t)
{
  char *temp;
  temp = checkedMalloc (maxSize * sizeof (char));
  
  sprintf (temp, "%p", (t));

  if(!(strValid (temp, maxSize)))
     exception ("space too limited: tag.c\n");
     
  str sss = newStr (temp);
  checkedFree (temp);
  
  return sss;
}