1*48517Sbostic /*- 2*48517Sbostic * Copyright (c) 1980 The Regents of the University of California. 3*48517Sbostic * All rights reserved. 4*48517Sbostic * 5*48517Sbostic * %sccs.include.proprietary.c% 619975Sdist */ 719975Sdist 815447Sralph #ifndef lint 9*48517Sbostic static char sccsid[] = "@(#)close.c 5.2 (Berkeley) 04/22/91"; 10*48517Sbostic #endif /* not lint */ 1115447Sralph 1215447Sralph #include "hp2648.h" 1315447Sralph 1415447Sralph closepl() 1515447Sralph { 1615447Sralph putchar('Z'); 1715447Sralph fflush(stdout); 1815447Sralph if ( shakehands == TRUE ) { 1915447Sralph stty(fildes, &sarg); 2015447Sralph close(fildes); 2115447Sralph } 2215447Sralph } 23