| version 1.6, 2003/04/30 06:17:57 |
version 1.7, 2003/05/14 07:08:05 |
|
|
| /* $OpenXM: OpenXM/src/k097/simple.y,v 1.5 2002/11/29 06:20:02 takayama Exp $ */ |
/* $OpenXM: OpenXM/src/k097/simple.y,v 1.6 2003/04/30 06:17:57 takayama Exp $ */ |
| /* simple.y 1996, 1/1 --- 1/6 */ |
/* simple.y 1996, 1/1 --- 1/6 */ |
| /* simple.y.ccc, 1996, 4/1 --- */ |
/* simple.y.ccc, 1996, 4/1 --- */ |
| %{ |
%{ |
|
|
| PSfor_prefix |
PSfor_prefix |
| : PSFOR '(' ID '=' exp ';' ID '<' exp ';' ID INCREMENT ')' |
: PSFOR '(' ID '=' exp ';' ID '<' exp ';' ID INCREMENT ')' |
| { |
{ |
| |
pkkan(" 2 -1 roll \n"); |
| pkkan("%%PSfor initvalue.\n (integer) data_conversion \n"); |
pkkan("%%PSfor initvalue.\n (integer) data_conversion \n"); |
| |
pkkan(" 2 -1 roll \n"); |
| ips($3); |
ips($3); |
| ips($7); ips($11); |
ips($7); ips($11); |
| /* They must be equal id, but it is not checked. */ |
/* They must be equal id, but it is not checked. */ |
![[BACK]](/icons/cvsweb/back.gif){kind=icon}
Return to simple.y CVS log ![[TXT]](/icons/cvsweb/text.gif){kind=icon}
![[DIR]](/icons/cvsweb/dir.gif){kind=icon}
Up to [local] / OpenXM / src / k097