madd.borg

{
` example of usage:
` jit(load("madd.borg"))
load("down.borg");

` hardcoded  
domadd: down("madd");
domadd.add("madd", "int uadd(int)", "#define uadd(a) a");
domadd.add("madd", "float uadd(float)", "");
domadd.add("madd", "int add(int, int)", "#define add(a,b) a+b"+eoln+eoln);
domadd.add("madd", "float add(float, float)", "");
domadd.add("madd", "float add(int, float)", "");
domadd.add("madd", "float add(float, int)", "");
domadd.add("madd", "char* mycat(char*, char*)",
  "char *mycat(char *t1, char *t2)"+eoln+
  "{ int l1=strlen(t1);"+eoln+
  "  int l=l1+strlen(t2);"+eoln+
  "  "+eoln+
  "  if (l > _BUF_SIZE_)"+eoln+
  "    _error_str_(_BUF_ERROR_, MADD_str);"+eoln+
  "  strcpy(_BUF_, t1);"+eoln+
  "  strcat(_BUF_+l1, t2);"+eoln+
  "  return _BUF_;"+eoln+
  "}"+eoln+eoln);

domadd.generate()

`madd
`madd(2,3)
`madd(2.1,5)
}