| 6545 | } |
| 6546 | |
| 6547 | static void iiReportTypes(int nr,int t,const short *T) |
| 6548 | { |
| 6549 | char buf[250]; |
| 6550 | buf[0]='\0'; |
| 6551 | if (nr==0) |
| 6552 | snprintf(buf,250,"wrong length of parameters(%d), expected ",t); |
| 6553 | else |
| 6554 | snprintf(buf,250,"par. %d is of type `%s`, expected ",nr,Tok2Cmdname(t)); |
| 6555 | for(int i=1;i<=T[0];i++) |
| 6556 | { |
| 6557 | strcat(buf,"`"); |
| 6558 | strcat(buf,Tok2Cmdname(T[i])); |
| 6559 | strcat(buf,"`"); |
| 6560 | if (i<T[0]) strcat(buf,","); |
| 6561 | } |
| 6562 | WerrorS(buf); |
| 6563 | } |
| 6564 | |
| 6565 | BOOLEAN iiCheckTypes(leftv args, const short *type_list, int report) |
| 6566 | { |
no test coverage detected