/* These functions replace the functions  which were previously   */
/* linked from SAS/C lcr.lib, which is not available for MaxonC++ */

#include <string.h>
#include <stdio.h>

void *movmem(const void *from, void *to, int len)
{
   return memmove(to, from, len);
}

void *setmem(void *mem, int num, int value)
{
   return memset(mem, value, num);
}

void strins(char *to, const char *from)
{
   char *tmp = (char *)malloc((size_t)(strlen(to) + 1));
   if (tmp)
   {
      strcpy(tmp, to);
      strcpy(to, from);
      strcat(to, tmp);
      free(tmp);
   }
}

int unlink(const char *name)
{
   return remove(name);
}