ea10e1a369
git-svn-id: http://picoc.googlecode.com/svn/trunk@410 21eae674-98b7-11dd-bd71-f92a316d2d60
31 lines
861 B
C
31 lines
861 B
C
#include "picoc.h"
|
|
|
|
void PlatformLibraryInit()
|
|
{
|
|
}
|
|
|
|
void Ctest (struct ParseState *Parser, struct Value *ReturnValue, struct Value **Param, int NumArgs)
|
|
{
|
|
printf("test(%d)\n", Param[0]->Val->Integer);
|
|
Param[0]->Val->Integer = 1234;
|
|
}
|
|
|
|
void Clineno (struct ParseState *Parser, struct Value *ReturnValue, struct Value **Param, int NumArgs) {
|
|
ReturnValue->Val->Integer = Parser->Line;
|
|
}
|
|
|
|
void Cerrormsg (struct ParseState *Parser, struct Value *ReturnValue, struct Value **Param, int NumArgs) {
|
|
PlatformErrorPrefix(Parser);
|
|
LibPrintf(Parser, ReturnValue, Param, NumArgs);
|
|
}
|
|
|
|
/* list of all library functions and their prototypes */
|
|
struct LibraryFunction PlatformLibrary[] =
|
|
{
|
|
{ Ctest, "void test(int);" },
|
|
{ Clineno, "int lineno();" },
|
|
{ Cerrormsg, "void errorprintf(char *,...);" },
|
|
{ NULL, NULL }
|
|
};
|
|
|