예제 #1
0
static void init_function (TreeNode *func)
{
 if (funcCode == NULL)	/* first function */
 {
  funcCode = newvector(CODE_BLOCK, Byte);
  maxcode = CODE_BLOCK;
 }
 pc=0; basepc=funcCode; maxcurr=maxcode; 
 nlocalvar=0;
  if (lua_debug)
  {
    code_byte(SETFUNCTION); 
    code_code((Byte *)luaI_strdup(lua_file[lua_nfile-1]));
    code_word(luaI_findconstant(func));
  }
}
예제 #2
0
파일: fread.c 프로젝트: Onirik79/bardmud
/*
 * Legge una struttura di sinonimo da un file.
 */
SYNO_DATA *fread_synonym( MUD_FILE *fp, int type )
{
	SYNO_DATA	*synonym;

	if ( !fp )
	{
		send_log( NULL, LOG_BUG, "fread_synonym: fp passato è NULL" );
		return NULL;
	}

	if ( type < 0 || type >= MAX_CODE )
	{
		send_log( NULL, LOG_BUG, "fread_synonym: type passato errato: %d", type );
		return NULL;
	}

	CREATE( synonym, SYNO_DATA, 1 );

	synonym->cat = code_code( fp, fread_word(fp), type );
	synonym->syn = fread_string( fp );

	return synonym;
}