shithub: riscv

Info  •  Files  •  Log  •  Branches

qa: remove ALLOC() and ALLOCN() macros

--- a/sys/src/cmd/qa/a.h

+++ b/sys/src/cmd/qa/a.h

@@ -23,25 +23,6 @@

 #define	STRINGSZ	200

 #define	NMACRO		10

-#define	ALLOC(lhs, type)\

-	while(nhunk < sizeof(type))\

-		gethunk();\

-	lhs = (type*)hunk;\

-	nhunk -= sizeof(type);\

-	hunk += sizeof(type);

-

-#define	ALLOCN(lhs, len, n)\

-	if(lhs+len != hunk || nhunk < n) {\

-		while(nhunk <= len)\

-			gethunk();\

-		memmove(hunk, lhs, len);\

-		lhs = hunk;\

-		hunk += len;\

-		nhunk -= len;\

-	}\

-	hunk += n;\

-	nhunk -= n;

-

 struct	Sym

 {

 	Sym*	link;

--- a/sys/src/cmd/qa/lex.c

+++ b/sys/src/cmd/qa/lex.c

@@ -675,9 +675,9 @@

 		s->type = itab[i].type;

 		s->value = itab[i].value;

 	}

-	ALLOCN(pathname, 0, 100);

+	pathname = allocn(pathname, 0, 100);

 	if(mygetwd(pathname, 99) == 0) {

-		ALLOCN(pathname, 100, 900);

+		pathname = allocn(pathname, 100, 900);

 		if(mygetwd(pathname, 999) == 0)

 			strcpy(pathname, "/???");

 	}

-- 

⑨