Lines Matching refs:a1
490 LINE a1; in commands() local
513 if ((a1 = address()) != 0) { in commands()
514 addr2 = a1; in commands()
526 if ((a1 = address()) != 0) { in commands()
527 addr2 = a1; in commands()
536 if ((a1 = address()) == 0) { in commands()
540 addr2 = a1; in commands()
543 dot = a1; in commands()
684 a1 = addr1; in commands()
687 count = a1 - zero; in commands()
691 puts(getaline((a1++)->cur)); in commands()
693 while (a1 <= addr2); in commands()
944 LINE a1; in address() local
948 a1 = 0; in address()
958 if (a1 == 0) in address()
959 a1 = zero; in address()
962 a1 += n; in address()
967 if (a1 || minus) in address()
976 if (a1 == 0) in address()
977 a1 = dot; in address()
983 if (a1 == 0) in address()
984 a1 = dot; in address()
990 a1 = dot; in address()
993 a1++; in address()
994 if (a1 > dol) in address()
995 a1 = zero; in address()
997 a1--; in address()
998 if (a1 < zero) in address()
999 a1 = dol; in address()
1002 if (execute(0, a1)) in address()
1004 if (a1 == dot) in address()
1010 a1 = dol; in address()
1014 a1 = dot; in address()
1020 for (a1 = zero; a1 <= dol; a1++) in address()
1021 if (names[c-'a'] == (a1->cur & ~01)) in address()
1027 if (a1 == 0) in address()
1029 a1 += minus; in address()
1033 if ((linebuf[0] != '.') && (a1 < zero || a1 > dol)) in address()
1035 return (a1); in address()
1431 LINE a1; in putfile() local
1437 a1 = addr1; in putfile()
1439 lp = getaline(a1++->cur); in putfile()
1444 count = (a1-zero-1)&077777; in putfile()
1467 } while (a1 <= addr2); in putfile()
1479 LINE a1, a2, rdot; in append() local
1494 a1 = ++dol; in append()
1495 a2 = a1+1; in append()
1497 while (a1 > rdot) in append()
1498 (--a2)->cur = (--a1)->cur; in append()
1629 LINE a1, a2, a3; in rdelete() local
1631 a1 = ad1; in rdelete()
1634 dol -= a2 - a1; in rdelete()
1636 (a1++)->cur = (a2++)->cur; in rdelete()
1638 a1 = ad1; in rdelete()
1639 if (a1 > dol) in rdelete()
1640 a1 = dol; in rdelete()
1641 dot = a1; in rdelete()
1648 LINE a1, a2, a3; in gdelete() local
1651 for (a1 = zero+1; (a1->cur&01) == 0; a1++) in gdelete()
1652 if (a1 >= a3) in gdelete()
1654 for (a2 = a1 + 1; a2 <= a3; ) { in gdelete()
1657 dot = a1; in gdelete()
1659 (a1++)->cur = (a2++)->cur; in gdelete()
1661 dol = a1-1; in gdelete()
1830 LINE a1; in global() local
1868 for (a1 = zero; a1 <= dol; a1++) { in global()
1869 a1->cur &= ~01; in global()
1870 if (a1 >= addr1 && a1 <= addr2 && execute(0, a1) == k) in global()
1871 a1->cur |= 01; in global()
1880 for (a1 = zero; a1 <= dol; a1++) { in global()
1881 if (a1->cur & 01) { in global()
1882 a1->cur &= ~01; in global()
1883 dot = a1; in global()
1888 a1 = zero; in global()
1897 LINE a1; in join() local
1902 for (a1 = addr1; a1 <= addr2; a1++) { in join()
1903 lp = getaline(a1->cur); in join()
1921 LINE a1; in substitute() local
1928 for (a1 = addr1; a1 <= addr2; a1++) { in substitute()
1929 if (execute(0, a1) == 0) in substitute()
1944 a1->cur &= ~01; in substitute()
1947 if (*markp == a1->cur) in substitute()
1950 a1->cur = subnewa; in substitute()
1951 append(getsub, a1); in substitute()
1953 a1 += nl; in substitute()
2232 reverse(LINE a1, LINE a2) in reverse() argument
2238 if (a2 <= a1) in reverse()
2240 a2->cur = a1->cur; in reverse()
2241 (a1++)->cur = t; in reverse()
2546 LINE a1; in globaln() local
2565 for (a1 = zero; a1 <= dol; a1++) { in globaln()
2566 a1->cur &= ~01; in globaln()
2567 if (a1 >= addr1 && a1 <= addr2 && execute(0, a1) == k) in globaln()
2568 a1->cur |= 01; in globaln()
2583 for (a1 = zero; a1 <= dol; a1++) { in globaln()
2584 if (a1->cur & 01) { in globaln()
2585 a1->cur &= ~01; in globaln()
2586 dot = a1; in globaln()
2587 puts(getaline(a1->cur)); in globaln()
2593 a1 = zero; in globaln()
2634 a1 = zero; in globaln()