1: /* 2: * Copyright (c) 1980 Regents of the University of California. 3: * All rights reserved. The Berkeley software License Agreement 4: * specifies the terms and conditions for redistribution. 5: */ 6: 7: #ifndef lint 8: static char sccsid[] = "@(#)clospl.c 5.2 (Berkeley) 6/8/85"; 9: #endif not lint 10: 11: clospl_(){ 12: closepl(); 13: }