version 1.1, 2018/09/19 05:45:06 |
version 1.2, 2018/09/28 08:20:27 |
|
|
* 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: OpenXM_contrib2/asir2018/builtin/print.c,v 1.1 2018/09/19 05:45:06 noro Exp $ |
*/ |
*/ |
#include "ca.h" |
#include "ca.h" |
#include "parse.h" |
#include "parse.h" |
Line 114 void Pprint(NODE arg,pointer *rp) |
|
Line 114 void Pprint(NODE arg,pointer *rp) |
|
opt = (Q)ARG1(arg); |
opt = (Q)ARG1(arg); |
if ( INT(opt) ) { |
if ( INT(opt) ) { |
printexpr(CO,obj); |
printexpr(CO,obj); |
switch ( QTOS(opt) ) { |
switch ( ZTOS(opt) ) { |
case 0: |
case 0: |
break; |
break; |
case 2: |
case 2: |