/************************************************************************
 * This program is Copyright (C) 1986 by Jonathan Payne.  JOVE is	*
 * provided to you without charge, and with no warranty.  You may give	*
 * away copies of JOVE, including sources, provided that this notice is *
 * included in all the files.						*
 ************************************************************************/

#include "jove.h"

RCS("$Id: version.c,v 14.30 1993/01/26 18:43:14 tom Exp tom $")

#include "version.h"

DEF_STR( "version", version, 10, V_STRING|V_CONST ) = VERSION;
DEF_STR( "system", SysName, 20, V_STRING|V_CONST ) _IF(def PRIVATE) = SYSTEM;

#ifndef VERSION_SYSTEM_DATE_AND_GURU
#   define VERSION_SYSTEM_DATE_AND_GURU	version
#endif

DEF_CMD( "version", ShowVersion, NO )
{
	s_mess("Jonathan's Own Version of Emacs (%s)",
	       VERSION_SYSTEM_DATE_AND_GURU);
}

DEF_STR( "model", Model, 6, V_STRING|V_CONST ) _IF(def PRIVATE) =
#ifdef TINY
	"TINY"
#else
#   ifdef SMALL
	"SMALL"
#   else
	"BIG"
#   endif
#endif
; /* so that we can test this in a .joverc */

/*======================================================================
 * $Log: version.c,v $
 * Revision 14.30  1993/01/26  18:43:14  tom
 * cleanup whitespace.
 *
 * Revision 14.29  1992/12/29  13:44:43  tom
 * more portability kludges...
 *
 * Revision 14.27  1992/08/26  23:57:00  tom
 * Initial checkin.
 *
 */