version 1.24, 2007/11/22 05:14:48 |
version 1.26, 2015/03/15 19:31:30 |
|
|
* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, |
* DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE, |
* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. |
* PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE. |
* |
* |
* $OpenXM: OpenXM_contrib2/asir2000/builtin/print.c,v 1.23 2007/11/07 19:26:17 ohara Exp $ |
* $OpenXM: OpenXM_contrib2/asir2000/builtin/print.c,v 1.25 2011/06/16 08:17:15 noro Exp $ |
*/ |
*/ |
#include "ca.h" |
#include "ca.h" |
#include "parse.h" |
#include "parse.h" |
|
|
|
void Psprintf(NODE,STRING *); |
|
|
void Pprintf(); |
void Pprintf(); |
void Pprint(); |
void Pprint(); |
void Pquotetolist(); |
void Pquotetolist(); |
Line 165 void fnodetotree(FNODE f,LIST *rp) |
|
Line 167 void fnodetotree(FNODE f,LIST *rp) |
|
|
|
if ( !f ) { |
if ( !f ) { |
MKSTR(head,"internal"); |
MKSTR(head,"internal"); |
n = mknode(2,head,0); |
n = mknode(2,head,NULLP); |
MKLIST(*rp,n); |
MKLIST(*rp,n); |
return; |
return; |
} |
} |