xref: /csrg-svn/usr.bin/pascal/pdx/test/small.p (revision 62160)
148087Sbostic(*
2*62160Sbostic * Copyright (c) 1980, 1993
3*62160Sbostic *	The Regents of the University of California.  All rights reserved.
448087Sbostic *
548087Sbostic * %sccs.include.redist.c%
648087Sbostic *
7*62160Sbostic *	@(#)small.p	8.1 (Berkeley) 06/06/93
848087Sbostic *)
948087Sbostic
1048087Sbosticprogram small(input, output);
1148087Sbosticbegin
1248087Sbostic	writeln('this is small', 1 div 0);
1348087Sbosticend.
14