Warning: Attempt to read property "date" on null in /usr/local/www/websvn.planix.org/blame.php on line 247

Warning: Attempt to read property "msg" on null in /usr/local/www/websvn.planix.org/blame.php on line 247
WebSVN – planix.SVN – Blame – /os/trunk/sys/src/libmp/port/mpfield.c – Rev 26

Subversion Repositories planix.SVN

Rev

Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
26 7u83 1 
#include "os.h"
2 
#include <mp.h>
3 
#include "dat.h"
4 
 
5 
mpint*
6 
mpfield(mpint *N)
7 
{
8 
	Mfield *f;
9 
 
10 
	if(N == nil || N->flags & (MPfield|MPstatic))
11 
		return N;
12 
	if((f = cnfield(N)) != nil)
13 
		goto Exchange;
14 
	if((f = gmfield(N)) != nil)
15 
		goto Exchange;
16 
	return N;
17 
Exchange:
18 
	setmalloctag(f, getcallerpc(&N));
19 
	mpfree(N);
20 
	return f;
21 
}