home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
DOS/V Power Report 1997 March
/
VPR9703A.ISO
/
VPR_DATA
/
DOGA
/
SOURCES
/
POLYEDIT.LZH
/
ML
/
MLINIT.C
< prev
next >
Wrap
C/C++ Source or Header
|
1995-03-05
|
741b
|
39 lines
#include <stdio.h>
#include <stdlib.h>
#include "lib.h"
#include "ml.h"
extern Library **LibAry ;
extern int (**SystemFunc)();
/* _mlinit.c */
extern void _MLInit( Library* );
static int ver = ( 2 << 20 ) + ( 0 << 10 ) + 2 ;
void MLInit()
{
Library *libinfo ;
int id ;
LibraryInit();
id = LibraryGet( "Macro Language Library" );
if ( id == 0 )
{
printf( "\'Marco Language\' ライブラリが常駐していません。\n" );
exit( 1 );
}
libinfo = LibraryGetInfo( id );
if ( ( libinfo->ver1 << 20 ) + ( libinfo->ver2 << 10 ) + libinfo->ver3 < ver )
{
printf( "\'Marco Language\' ライブラリのバージョンが違います。\n" );
exit( 1 );
}
_MLInit( LibAry[id] );
__MLInit( SystemFunc );
}