search for: newpt

Displaying 2 results from an estimated 2 matches for "newpt".

Did you mean: newt
2001 Sep 09
0
plots with symbols proportional to number of repeats
...parse(substitute(x)), ylab=deparse(substitute(y)), ...) { pair <- function(x,y) { paste(x,y,sep="/") } unpair <- function(x) { t(sapply(strsplit(x,"/"),as.numeric)) } f <- factor(pair(x,y)) n <- table(f) newpts <- unpair(levels(f)) symbols(newpts[,1],newpts[,2],circles=n,inches=maxsize, xlab=xlab,ylab=ylab,...) } x <- c(0.1,0.1,0.1,0.1,0.1,0.2,0.2,0.2,0.2,0.3,0.3) y <- c( 1, 1, 1, 1, 2, 2, 2, 3, 3, 4, 5 ) plot(x,y) sizeplot(x,y) -- 318 Carr Hall...
2003 Aug 22
3
PAE removal patch for testing
...pbits != *pte) { - *pte = pbits; + if (pbits != ptbase[sindex]) { + ptbase[sindex] = pbits; anychanged = 1; } } @@ -1822,8 +1994,10 @@ pmap_enter(pmap_t pmap, vm_offset_t va, vm_page_t m, vm_prot_t prot, boolean_t wired) { - vm_paddr_t pa, opa; - pt_entry_t *pte, origpte, newpte; + vm_offset_t pa; + register unsigned *pte; + vm_offset_t opa; + vm_offset_t origpte, newpte; vm_page_t mpte; if (pmap == NULL) @@ -1847,15 +2021,15 @@ } #if 0 && defined(PMAP_DIAGNOSTIC) else { - pd_entry_t *pdeaddr = pmap_pde(pmap, va); - if (((origpte = *pdeaddr) & PG_...