fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

see changelog

Browse Source
This commit is contained in:
Eddie Runia
1999-06-08 12:29:33 +00:00
parent b1ad086b8a
commit 91b03e96aa
4 changed files with 19 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
harbour/ChangeLog
View File

@@ -1,3 +1,11 @@
19990608-13:25 CET Eddie Runia
* source/vm/initsymb.c
SECONDS added
* tests/working/runner.c
_FILEs removed.
* tests/working/run_exp.h
HB_SETFIXED added
19990608-11:45 CET Eddie Runia
* source/tools/debug.c
even though it makes no difference hb_arrayClone is used in statics(),

3
harbour/source/vm/initsymb.c
View File

@@ -41,6 +41,7 @@ HARBOUR MONTH( void );
HARBOUR PCOUNT( void );
HARBOUR REPLICATE( void );
HARBOUR RTRIM( void );
HARBOUR SECONDS( void );
HARBOUR SPACE( void );
HARBOUR SQRT( void );
HARBOUR STR( void );
@@ -104,7 +105,7 @@ static SYMBOL symbols[] = {
{ "ROUND" , FS_PUBLIC, NULL , 0 },
{ "ROW" , FS_PUBLIC, NULL , 0 },
{ "RTRIM" , FS_PUBLIC, RTRIM , 0 },
{ "SECONDS" , FS_PUBLIC, NULL , 0 },
{ "SECONDS" , FS_PUBLIC, SECONDS , 0 },
{ "SELECT" , FS_PUBLIC, NULL , 0 },
{ "SETPOS" , FS_PUBLIC, NULL , 0 },
{ "SPACE" , FS_PUBLIC, SPACE , 0 },

4
harbour/tests/working/run_exp.h
View File

@@ -118,6 +118,7 @@ HARBOUR MAXCOL();
HARBOUR SETPRC();
HARBOUR SCROLL();
HARBOUR VERSION();
HARBOUR HB_SETFIXED();
/* Same story.
@@ -237,7 +238,8 @@ static SYMBOL symbols[] = {
{ "MAXCOL", FS_PUBLIC, MAXCOL , 0 },
{ "SETPRC", FS_PUBLIC, SETPRC , 0 },
{ "SCROLL", FS_PUBLIC, SCROLL , 0 },
{ "VERSION", FS_PUBLIC, VERSION , 0 }
{ "VERSION", FS_PUBLIC, VERSION , 0 },
{ "HB_SETFIXED", FS_PUBLIC, HB_SETFIXED , 0 }
};

15
harbour/tests/working/runner.c
View File

@@ -1,6 +1,5 @@
#include "pcode.h"
#define FILE _FILE
#include <stdio.h>
/* #if INTEL32 */
@@ -50,19 +49,17 @@ PASM_CALL CreateFun( PSYMBOL, PBYTE ); /* Create a dynamic function*/
void Do( WORD );
ULONG FindSymbol( char *, PDYNFUNC, ULONG );
HARBOUR HB_RUN();
void HRB_FileClose( _FILE * );
void HRB_FileRead ( char *, int, int, _FILE * );
_FILE *HRB_FileOpen ( char * );
void HRB_FileClose( FILE * );
void HRB_FileRead ( char *, int, int, FILE * );
FILE *HRB_FileOpen ( char * );
void Push( PHB_ITEM );
void PushNil( void );
void PushSymbol( PSYMBOL );
BYTE ReadByte( _FILE * );
char *ReadId ( _FILE * );
long ReadLong( _FILE * );
BYTE ReadByte( FILE * );
char *ReadId ( FILE * );
long ReadLong( FILE * );
#undef FILE
#include "run_exp.h"
#define FILE _FILE
/*
*