+++ /dev/null
-#include "casl2.h"
-#include "assemble.h"
-
-int main(){
- int i, j;
- OPD *opd;
- char *str[] = {
- "", "GR0,GR1", "GR0,A", "GR1,12", "GR0,0,GR1",
- "\'aaa\',0", "\'aaa\',\'bbb\'", "\'aaa\'\',\'\'bbb\'", "\'aaa,bbb\'",
- "0,1,2,3,4,5,6,7,8,9,0,1,2,3,4,5,6,7,8,9,0,1,2,3,4,5,6,7,8,9,0,1,2,3,4,5,6,7,8,9",
- "0,1,2,3,4,5,6,7,8,9,0,1,2,3,4,5,6,7,8,9,0,1,2,3,4,5,6,7,8,9,0,1,2,3,4,5,6,7,8,9,0",
- "\'01234567890123456789012345678901234567\'",
- "\'012345678901234567890123456789012345678\'"
- };
- for(i = 0; i < sizeof str / sizeof str[0]; i++) {
- printf("%s\n", str[i]);
- opd = opdtok(str[i]);
- printf("OPDC:%d\n", opd->opdc);
- for(j = 0; j < opd->opdc; j++) {
- printf("OPDC[%d]:%s\n", j, opd->opdv[j]);
- }
- if(cerrno > 0){
- printf("Error - %d: %s\n", cerrno, cerrmsg);
- freecerr();
- }
- printf("\n");
- }
- return 0;
-}