148526Sbostic /*- 2*61414Sbostic * Copyright (c) 1983, 1993 3*61414Sbostic * The Regents of the University of California. All rights reserved. 448526Sbostic * 548526Sbostic * %sccs.include.proprietary.c% 648526Sbostic */ 748526Sbostic 813382Ssam #ifndef lint 9*61414Sbostic static char sccsid[] = "@(#)erase.c 8.1 (Berkeley) 06/04/93"; 1048526Sbostic #endif /* not lint */ 1113382Ssam 1213382Ssam extern vti; erase()1313382Ssamerase(){ 1413382Ssam int i; 1513382Ssam i=0401; 1613382Ssam write(vti,&i,2); 1713382Ssam } 18