*** empty log message ***
This commit is contained in:
parent
131dc2f77f
commit
6d3ccf1fb1
@ -1,5 +1,5 @@
|
|||||||
/*
|
/*
|
||||||
* $Id: awk.c,v 1.48 2006-05-10 16:02:38 bacon Exp $
|
* $Id: awk.c,v 1.49 2006-05-11 17:32:37 bacon Exp $
|
||||||
*/
|
*/
|
||||||
|
|
||||||
#include <xp/awk/awk_i.h>
|
#include <xp/awk/awk_i.h>
|
||||||
@ -97,7 +97,6 @@ int xp_awk_close (xp_awk_t* awk)
|
|||||||
return 0;
|
return 0;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
/* TODO: write a function to clear awk->parse data structure.
|
/* TODO: write a function to clear awk->parse data structure.
|
||||||
this would be need either as a separate function or as a part of xp_awk_clear...
|
this would be need either as a separate function or as a part of xp_awk_clear...
|
||||||
do i have to pass an option to xp_awk_clear to do this??? */
|
do i have to pass an option to xp_awk_clear to do this??? */
|
||||||
|
@ -1,5 +1,5 @@
|
|||||||
/*
|
/*
|
||||||
* $Id: parse.c,v 1.103 2006-05-10 16:02:39 bacon Exp $
|
* $Id: parse.c,v 1.104 2006-05-11 17:32:37 bacon Exp $
|
||||||
*/
|
*/
|
||||||
|
|
||||||
#include <xp/awk/awk_i.h>
|
#include <xp/awk/awk_i.h>
|
||||||
@ -339,15 +339,14 @@ static void __dump (xp_awk_t* awk)
|
|||||||
|
|
||||||
int xp_awk_parse (xp_awk_t* awk)
|
int xp_awk_parse (xp_awk_t* awk)
|
||||||
{
|
{
|
||||||
|
|
||||||
if (awk->srcio == XP_NULL)
|
if (awk->srcio == XP_NULL)
|
||||||
{
|
{
|
||||||
|
/* the source code io handler is not set */
|
||||||
awk->errnum = XP_AWK_ENOSRCIO;
|
awk->errnum = XP_AWK_ENOSRCIO;
|
||||||
return -1;
|
return -1;
|
||||||
}
|
}
|
||||||
|
|
||||||
/* if you want to parse anew, call xp_awk_clear first.
|
xp_awk_clear (awk);
|
||||||
* otherwise, the result is appened to the accumulated result */
|
|
||||||
|
|
||||||
GET_CHAR (awk);
|
GET_CHAR (awk);
|
||||||
GET_TOKEN (awk);
|
GET_TOKEN (awk);
|
||||||
@ -358,8 +357,7 @@ int xp_awk_parse (xp_awk_t* awk)
|
|||||||
|
|
||||||
if (__parse_progunit(awk) == XP_NULL)
|
if (__parse_progunit(awk) == XP_NULL)
|
||||||
{
|
{
|
||||||
/* TODO: cleanup the parse tree created so far....
|
xp_awk_clear (awk);
|
||||||
function tables also etc... */
|
|
||||||
return -1;
|
return -1;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
Loading…
Reference in New Issue
Block a user