62bc229f4a
Issue #137 git-svn-id: http://picoc.googlecode.com/svn/trunk@581 21eae674-98b7-11dd-bd71-f92a316d2d60
30 lines
739 B
C
30 lines
739 B
C
#include "../interpreter.h"
|
|
|
|
void UnixSetupFunc()
|
|
{
|
|
}
|
|
|
|
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;
|
|
}
|
|
|
|
/* list of all library functions and their prototypes */
|
|
struct LibraryFunction UnixFunctions[] =
|
|
{
|
|
{ Ctest, "void test(int);" },
|
|
{ Clineno, "int lineno();" },
|
|
{ NULL, NULL }
|
|
};
|
|
|
|
void PlatformLibraryInit(Picoc *pc)
|
|
{
|
|
IncludeRegister(pc, "picoc_unix.h", &UnixSetupFunc, &UnixFunctions[0], NULL);
|
|
}
|