src/usr.bin/m4/eval.c - diff

Return to eval.c CVS log

Up to [local] / src / usr.bin / m4

Diff for /src/usr.bin/m4/eval.c between version 1.40 and 1.41

-version 1.40, 2001/10/10 11:17:10
+version 1.41, 2001/10/10 23:25:31
 Line 534
 Line 534
 Line 534
                                          pbstr(argv[argno + 1]);
                                  break;
                          case '*':
-                                 for (n = argc - 1; n > 2; n--) {
+                                 if (argc > 2) {
-                                         pbstr(argv[n]);
+                                         for (n = argc - 1; n > 2; n--) {
-                                         putback(COMMA);
+                                                 pbstr(argv[n]);
-                                 }
+                                                 putback(COMMA);
-                                 pbstr(argv[2]);
+                                         }
+                                         pbstr(argv[2]);
+                                 }
                                  break;
                          case '@':
-                                 for (n = argc - 1; n > 2; n--) {
+                                 if (argc > 2) {
-                                         pbstr(rquote);
+                                         for (n = argc - 1; n > 2; n--) {
-                                         pbstr(argv[n]);
+                                                 pbstr(rquote);
-                                         pbstr(lquote);
+                                                 pbstr(argv[n]);
-                                         putback(COMMA);
+                                                 pbstr(lquote);
-                                 }
+                                                 putback(COMMA);
-                                 pbstr(rquote);
+                                         }
-                                 pbstr(argv[2]);
+                                         pbstr(rquote);
-                                 pbstr(lquote);
+                                         pbstr(argv[2]);
+                                         pbstr(lquote);
+                                 }
                                  break;
                          default:
                                  PUTBACK(*p);