Mercurial > hg > Members > anatofuz > test_perl1_alpine

view version.c @ 2:9f567da916dd default tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
cancel rev 1
author anatofuz <anatofuz@cr.ie.u-ryukyu.ac.jp>
date Thu, 13 Jun 2019 20:51:20 +0900
parents 0240ed5457bb
children
line wrap: on
line source

/* $Header: version.c,v 1.0 87/12/18 13:06:41 root Exp $
 *
 * $Log:	version.c,v $
 * Revision 1.0  87/12/18  13:06:41  root
 * Initial revision
 * 
 */

#include "patchlevel.h"

/* Print out the version number. */

version()
{
    extern char rcsid[];

    printf("%s\r\nPatch level: %d\r\n", rcsid, PATCHLEVEL);
}