head     56.3;
access   paws bayes jws quist brad dew jwh;
symbols  ;
locks    ; strict;
comment  @# @;


56.3
date     93.01.27.13.19.54;  author jwh;  state Exp;
branches ;
next     56.2;

56.2
date     93.01.27.12.00.39;  author jwh;  state Exp;
branches ;
next     56.1;

56.1
date     91.11.05.09.39.04;  author jwh;  state Exp;
branches ;
next     55.1;

55.1
date     91.08.25.10.17.44;  author jwh;  state Exp;
branches ;
next     54.3;

54.3
date     91.08.21.12.34.16;  author jwh;  state Exp;
branches ;
next     54.2;

54.2
date     91.08.21.09.45.12;  author jwh;  state Exp;
branches ;
next     54.1;

54.1
date     91.03.18.15.23.30;  author jwh;  state Exp;
branches ;
next     53.1;

53.1
date     91.03.11.19.24.42;  author jwh;  state Exp;
branches ;
next     52.1;

52.1
date     91.02.19.09.08.20;  author jwh;  state Exp;
branches ;
next     51.1;

51.1
date     91.01.30.16.07.34;  author jwh;  state Exp;
branches ;
next     50.1;

50.1
date     90.10.29.16.22.55;  author jwh;  state Exp;
branches ;
next     49.1;

49.1
date     90.08.14.14.07.12;  author jwh;  state Exp;
branches ;
next     48.1;

48.1
date     90.07.26.11.13.04;  author jwh;  state Exp;
branches ;
next     47.1;

47.1
date     90.05.14.10.53.51;  author dew;  state Exp;
branches ;
next     46.1;

46.1
date     90.05.07.08.40.37;  author jwh;  state Exp;
branches ;
next     45.1;

45.1
date     90.04.19.15.47.56;  author jwh;  state Exp;
branches ;
next     44.1;

44.1
date     90.04.01.22.05.44;  author jwh;  state Exp;
branches ;
next     43.1;

43.1
date     90.03.20.13.56.11;  author jwh;  state Exp;
branches ;
next     42.1;

42.1
date     90.01.23.17.41.12;  author jwh;  state Exp;
branches ;
next     41.1;

41.1
date     89.12.22.11.24.04;  author jwh;  state Exp;
branches ;
next     40.1;

40.1
date     89.09.29.11.46.23;  author jwh;  state Exp;
branches ;
next     39.1;

39.1
date     89.09.26.16.31.13;  author dew;  state Exp;
branches ;
next     38.1;

38.1
date     89.08.29.11.22.25;  author jwh;  state Exp;
branches ;
next     37.1;

37.1
date     89.05.12.11.35.34;  author dew;  state Exp;
branches ;
next     36.1;

36.1
date     89.02.06.10.14.21;  author dew;  state Exp;
branches ;
next     35.1;

35.1
date     89.02.02.13.27.27;  author dew;  state Exp;
branches ;
next     34.1;

34.1
date     89.01.23.16.02.41;  author jwh;  state Exp;
branches ;
next     33.1;

33.1
date     89.01.16.11.36.17;  author dew;  state Exp;
branches ;
next     32.1;

32.1
date     89.01.10.11.43.26;  author bayes;  state Exp;
branches ;
next     31.1;

31.1
date     88.12.14.18.04.35;  author bayes;  state Exp;
branches ;
next     30.1;

30.1
date     88.12.09.13.42.09;  author dew;  state Exp;
branches ;
next     29.1;

29.1
date     88.10.31.15.26.38;  author bayes;  state Exp;
branches ;
next     28.1;

28.1
date     88.10.06.10.54.53;  author dew;  state Exp;
branches ;
next     27.1;

27.1
date     88.09.29.11.23.50;  author bayes;  state Exp;
branches ;
next     26.1;

26.1
date     88.09.28.12.59.23;  author bayes;  state Exp;
branches ;
next     25.1;

25.1
date     88.03.02.09.20.28;  author bayes;  state Exp;
branches ;
next     24.1;

24.1
date     87.08.31.09.37.24;  author jws;  state Exp;
branches ;
next     23.1;

23.1
date     87.08.26.10.13.59;  author bayes;  state Exp;
branches ;
next     22.1;

22.1
date     87.08.17.10.56.48;  author bayes;  state Exp;
branches ;
next     21.1;

21.1
date     87.08.12.13.42.07;  author bayes;  state Exp;
branches ;
next     20.1;

20.1
date     87.07.30.10.54.49;  author bayes;  state Exp;
branches ;
next     19.1;

19.1
date     87.06.01.08.11.21;  author jws;  state Exp;
branches ;
next     18.1;

18.1
date     87.05.20.15.07.13;  author bayes;  state Exp;
branches ;
next     17.1;

17.1
date     87.04.30.10.23.03;  author jws;  state Exp;
branches ;
next     16.1;

16.1
date     87.04.26.15.35.53;  author jws;  state Exp;
branches ;
next     15.1;

15.1
date     87.04.13.09.07.57;  author jws;  state Exp;
branches ;
next     14.1;

14.1
date     87.04.01.15.08.37;  author jws;  state Exp;
branches ;
next     13.2;

13.2
date     87.04.01.09.46.15;  author jws;  state Exp;
branches ;
next     13.1;

13.1
date     87.02.28.18.22.18;  author jws;  state Exp;
branches ;
next     12.1;

12.1
date     87.02.02.13.11.31;  author jws;  state Exp;
branches ;
next     11.1;

11.1
date     87.01.19.09.37.22;  author jws;  state Exp;
branches ;
next     10.1;

10.1
date     86.12.24.10.44.54;  author jws;  state Exp;
branches ;
next     9.1;

9.1
date     86.12.12.14.20.29;  author bayes;  state Exp;
branches ;
next     8.1;

8.1
date     86.11.27.11.42.03;  author jws;  state Exp;
branches ;
next     7.1;

7.1
date     86.11.20.13.31.02;  author hal;  state Exp;
branches ;
next     6.1;

6.1
date     86.11.04.17.40.09;  author paws;  state Exp;
branches ;
next     5.1;

5.1
date     86.10.28.16.25.10;  author hal;  state Exp;
branches ;
next     4.1;

4.1
date     86.09.30.19.34.25;  author hal;  state Exp;
branches ;
next     3.1;

3.1
date     86.09.01.11.44.07;  author hal;  state Exp;
branches ;
next     2.1;

2.1
date     86.07.30.14.28.49;  author hal;  state Exp;
branches ;
next     1.1;

1.1
date     86.06.30.14.19.04;  author danm;  state tmp;
branches ;
next     ;


desc
@Base file for PWS 3.2 release.

@


56.3
log
@
pws2rcs automatic delta on Wed Jan 27 13:14:25 MST 1993
@
text
@					      (*

 (c) Copyright Hewlett-Packard Company, 1983.
All rights are reserved.  Copying or other
reproduction of this program except for archival
purposes is prohibited without the prior
written consent of Hewlett-Packard Company.


	    RESTRICTED RIGHTS LEGEND

Use, duplication, or disclosure by the Government
is subject to restrictions as set forth in
paragraph (b) (3) (B) of the Rights in Technical
Data and Computer Software clause in
DAR 7-104.9(a).

HEWLETT-PACKARD COMPANY
Fort Collins, Colorado                         *)

$SYSPROG$
$DEBUG OFF$$RANGE OFF$
$ALLOW_PACKED ON$   {JWS 3/31/87}
program bubbles;
  module bubble;
  $SEARCH 'BUB_DVR'$
  import bub_dvr,sysglobals,iodeclarations,isr;
  export

    procedure bub_tm(fp:fibp; request:amrequesttype;
		     anyvar buffer : window; bufsize, position : integer);

    procedure bub_isr(isrib : pisrib);

    procedure bub_init;

  IMPLEMENT
    procedure xlate_errors(error : berrortype);
    begin
      case error of
	bnoerror :   ioresult := ord(inoerror);
	btimeout :   ioresult := ord(zbadhardware);
	bopfailed :  ioresult := ord(zbadhardware);
	bbadinterupt:ioresult := ord(zstrangei);
	bbadsector : ioresult := ord(znosuchblk);
	bbadcount :  ioresult := ord(zbadmode);
	bnotbubble : ioresult := ord(znodevice);
	bbaddata :   ioresult := ord(zbadblock);
	biofail :    ioresult := ord(ztimeout);
      otherwise   ioresult := ord(zcatchall);
      end;
    end;

    procedure bub_tm(fp:fibp; request:amrequesttype;
		     anyvar buffer : window; bufsize, position : integer);
    var
      card : anyptr;
      info : infoptr;

    begin
      ioresult := ord(inoerror);
      with fp^ , unitable^[funit] do
      begin
	card := isc_table[sc].card_ptr;
	if isc_table[sc].io_tmp_ptr=NIL then ioresult := ord(znodevice)
	else
	begin
	  info := addr(isc_table[sc].io_tmp_ptr^.drv_misc);
	  with info^ do
	  case request of
	    startread,
	    readbytes:    if runstate<>b_idle then ioresult := ord(znotready)
			  else
			  begin
			    if (position+bufsize)<=fpeof then
			    begin         { is inside the file }
			      bbuffer.brec := addr(buffer);
			      bstart := fileid + byteoffset + position;
			      bcount := bufsize;
			      bretry := 3;
			      if bcount<>0 then bubdoread(card,info);
			      if request=readbytes then
				 while runstate<>b_idle do; { wait for idle }
			      if runstate=b_idle then xlate_errors(errorcode);
			    end
			    else ioresult := ord(ieof);
			  end;
	    startwrite,
	    writebytes:   if runstate<>b_idle then ioresult := ord(znotready)
			  else
			  begin
			    if (position+bufsize)<=fpeof then
			    begin
			      bbuffer.brec := addr(buffer);
			      bstart := fileid + byteoffset + position;
			      if bufsize>0
			      then bcount := (bufsize + 255) DIV 256 * 256
			      else bcount := bufsize;
			      bretry := 3;
			      if bcount<>0 then bubdowrite(card,info);
			      if request=writebytes then
				 while runstate<>b_idle do;   { wait for idle }
			      if runstate=b_idle then xlate_errors(errorcode);
			    end
			    else ioresult := ord(ieof);
			  end;
	    flush:;   { NO_OP }
	    clearunit:    begin
			    bubdoreset(card,info);
			    xlate_errors(info^.errorcode);
			    if ioresult=ord(inoerror)
			    then umaxbytes := maxbytes      { set device size }
			    else umaxbytes := 0;
			  end;
	    unitstatus:   begin
			    fbusy := runstate<>b_idle;
			    if not fbusy then xlate_errors(errorcode);
			  end;
	    otherwise  ioresult := ord(ibadrequest);
	  end;  { case }
	end;    { if nounit }
      end;      { with }
    end; { bub_tm }
$DEBUG OFF$
    procedure bub_isr(isrib : pisrib);
    var
      temps : pio_tmp_ptr;
      info  : infoptr;
    begin
      temps := addr(isrib^);
      info  := addr(temps^.drv_misc);
      bubdoisr(temps^.card_addr,info);
    end; { bub_isr }

    procedure bub_init;
    const
      intreg = 3;       { interupt reg offset }
    type
      cardrec = packed record
		  pad : byte;
		  id  : byte;
		end;
    var
      sc        : integer;
      isrinfo   : pisrib;
      info      : infoptr;
      card      : ^cardrec;
    begin
      { scan selectcode table for bubble devices }
      for sc:= iominisc to iomaxisc do
      with isc_table[sc] do
      begin
	{ fix isc_table to work for system 2.0, 2.1 or 2.2 }
	if ((card_type=1) and (card_id=0)) or
	   ((card_type=8) and (card_id=30)) then
	begin
	  card    := card_ptr;
	  if card^.id=30 then
	  begin
	    card_type := 8; { bubble memory card }
	    card_id   := 30;
	    isrinfo := addr(io_tmp_ptr^);
	    info    := addr(io_tmp_ptr^.drv_misc);
	    bubgetinfo(card,info);
	    if info^.errorcode=bnoerror then
	    begin
	      permisrlink(bub_isr,        { ISR PROC }
		      addr(card^,intreg), { INTERUPT REG ADDRESS }
		      hex('C0'),hex('C0'),{ MASK and VALUE }
		      info^.priority,     { INTERUPT PRIORITY }
		      isrinfo);           { ISR INFO POINTER  }
	    end;
	  end;
	end;
      end;
    end; {bub_init}

end; { bub_ops }
{       bubbles installation program    }
import bubble,loader;

begin
  bub_init;
  markuser;
end.
@


56.2
log
@
pws2rcs automatic delta on Wed Jan 27 11:57:27 MST 1993
@
text
@d1 185
@


56.1
log
@Automatic bump of revision number for PWS version 3.25
@
text
@a0 185
					      (*

 (c) Copyright Hewlett-Packard Company, 1983.
All rights are reserved.  Copying or other
reproduction of this program except for archival
purposes is prohibited without the prior
written consent of Hewlett-Packard Company.


	    RESTRICTED RIGHTS LEGEND

Use, duplication, or disclosure by the Government
is subject to restrictions as set forth in
paragraph (b) (3) (B) of the Rights in Technical
Data and Computer Software clause in
DAR 7-104.9(a).

HEWLETT-PACKARD COMPANY
Fort Collins, Colorado                         *)

$SYSPROG$
$DEBUG OFF$$RANGE OFF$
$ALLOW_PACKED ON$   {JWS 3/31/87}
program bubbles;
  module bubble;
  $SEARCH 'BUB_DVR'$
  import bub_dvr,sysglobals,iodeclarations,isr;
  export

    procedure bub_tm(fp:fibp; request:amrequesttype;
		     anyvar buffer : window; bufsize, position : integer);

    procedure bub_isr(isrib : pisrib);

    procedure bub_init;

  IMPLEMENT
    procedure xlate_errors(error : berrortype);
    begin
      case error of
	bnoerror :   ioresult := ord(inoerror);
	btimeout :   ioresult := ord(zbadhardware);
	bopfailed :  ioresult := ord(zbadhardware);
	bbadinterupt:ioresult := ord(zstrangei);
	bbadsector : ioresult := ord(znosuchblk);
	bbadcount :  ioresult := ord(zbadmode);
	bnotbubble : ioresult := ord(znodevice);
	bbaddata :   ioresult := ord(zbadblock);
	biofail :    ioresult := ord(ztimeout);
      otherwise   ioresult := ord(zcatchall);
      end;
    end;

    procedure bub_tm(fp:fibp; request:amrequesttype;
		     anyvar buffer : window; bufsize, position : integer);
    var
      card : anyptr;
      info : infoptr;

    begin
      ioresult := ord(inoerror);
      with fp^ , unitable^[funit] do
      begin
	card := isc_table[sc].card_ptr;
	if isc_table[sc].io_tmp_ptr=NIL then ioresult := ord(znodevice)
	else
	begin
	  info := addr(isc_table[sc].io_tmp_ptr^.drv_misc);
	  with info^ do
	  case request of
	    startread,
	    readbytes:    if runstate<>b_idle then ioresult := ord(znotready)
			  else
			  begin
			    if (position+bufsize)<=fpeof then
			    begin         { is inside the file }
			      bbuffer.brec := addr(buffer);
			      bstart := fileid + byteoffset + position;
			      bcount := bufsize;
			      bretry := 3;
			      if bcount<>0 then bubdoread(card,info);
			      if request=readbytes then
				 while runstate<>b_idle do; { wait for idle }
			      if runstate=b_idle then xlate_errors(errorcode);
			    end
			    else ioresult := ord(ieof);
			  end;
	    startwrite,
	    writebytes:   if runstate<>b_idle then ioresult := ord(znotready)
			  else
			  begin
			    if (position+bufsize)<=fpeof then
			    begin
			      bbuffer.brec := addr(buffer);
			      bstart := fileid + byteoffset + position;
			      if bufsize>0
			      then bcount := (bufsize + 255) DIV 256 * 256
			      else bcount := bufsize;
			      bretry := 3;
			      if bcount<>0 then bubdowrite(card,info);
			      if request=writebytes then
				 while runstate<>b_idle do;   { wait for idle }
			      if runstate=b_idle then xlate_errors(errorcode);
			    end
			    else ioresult := ord(ieof);
			  end;
	    flush:;   { NO_OP }
	    clearunit:    begin
			    bubdoreset(card,info);
			    xlate_errors(info^.errorcode);
			    if ioresult=ord(inoerror)
			    then umaxbytes := maxbytes      { set device size }
			    else umaxbytes := 0;
			  end;
	    unitstatus:   begin
			    fbusy := runstate<>b_idle;
			    if not fbusy then xlate_errors(errorcode);
			  end;
	    otherwise  ioresult := ord(ibadrequest);
	  end;  { case }
	end;    { if nounit }
      end;      { with }
    end; { bub_tm }
$DEBUG OFF$
    procedure bub_isr(isrib : pisrib);
    var
      temps : pio_tmp_ptr;
      info  : infoptr;
    begin
      temps := addr(isrib^);
      info  := addr(temps^.drv_misc);
      bubdoisr(temps^.card_addr,info);
    end; { bub_isr }

    procedure bub_init;
    const
      intreg = 3;       { interupt reg offset }
    type
      cardrec = packed record
		  pad : byte;
		  id  : byte;
		end;
    var
      sc        : integer;
      isrinfo   : pisrib;
      info      : infoptr;
      card      : ^cardrec;
    begin
      { scan selectcode table for bubble devices }
      for sc:= iominisc to iomaxisc do
      with isc_table[sc] do
      begin
	{ fix isc_table to work for system 2.0, 2.1 or 2.2 }
	if ((card_type=1) and (card_id=0)) or
	   ((card_type=8) and (card_id=30)) then
	begin
	  card    := card_ptr;
	  if card^.id=30 then
	  begin
	    card_type := 8; { bubble memory card }
	    card_id   := 30;
	    isrinfo := addr(io_tmp_ptr^);
	    info    := addr(io_tmp_ptr^.drv_misc);
	    bubgetinfo(card,info);
	    if info^.errorcode=bnoerror then
	    begin
	      permisrlink(bub_isr,        { ISR PROC }
		      addr(card^,intreg), { INTERUPT REG ADDRESS }
		      hex('C0'),hex('C0'),{ MASK and VALUE }
		      info^.priority,     { INTERUPT PRIORITY }
		      isrinfo);           { ISR INFO POINTER  }
	    end;
	  end;
	end;
      end;
    end; {bub_init}

end; { bub_ops }
{       bubbles installation program    }
import bubble,loader;

begin
  bub_init;
  markuser;
end.
@


55.1
log
@Automatic bump of revision number for PWS version 3.25A
@
text
@@


54.3
log
@
pws2rcs automatic delta on Wed Aug 21 12:27:56 MDT 1991
@
text
@@


54.2
log
@
pws2rcs automatic delta on Wed Aug 21 09:35:48 MDT 1991
@
text
@d1 185
@


54.1
log
@Automatic bump of revision number for PWS version 3.24
@
text
@a0 185
					      (*

 (c) Copyright Hewlett-Packard Company, 1983.
All rights are reserved.  Copying or other
reproduction of this program except for archival
purposes is prohibited without the prior
written consent of Hewlett-Packard Company.


	    RESTRICTED RIGHTS LEGEND

Use, duplication, or disclosure by the Government
is subject to restrictions as set forth in
paragraph (b) (3) (B) of the Rights in Technical
Data and Computer Software clause in
DAR 7-104.9(a).

HEWLETT-PACKARD COMPANY
Fort Collins, Colorado                         *)

$SYSPROG$
$DEBUG OFF$$RANGE OFF$
$ALLOW_PACKED ON$   {JWS 3/31/87}
program bubbles;
  module bubble;
  $SEARCH 'BUB_DVR'$
  import bub_dvr,sysglobals,iodeclarations,isr;
  export

    procedure bub_tm(fp:fibp; request:amrequesttype;
		     anyvar buffer : window; bufsize, position : integer);

    procedure bub_isr(isrib : pisrib);

    procedure bub_init;

  IMPLEMENT
    procedure xlate_errors(error : berrortype);
    begin
      case error of
	bnoerror :   ioresult := ord(inoerror);
	btimeout :   ioresult := ord(zbadhardware);
	bopfailed :  ioresult := ord(zbadhardware);
	bbadinterupt:ioresult := ord(zstrangei);
	bbadsector : ioresult := ord(znosuchblk);
	bbadcount :  ioresult := ord(zbadmode);
	bnotbubble : ioresult := ord(znodevice);
	bbaddata :   ioresult := ord(zbadblock);
	biofail :    ioresult := ord(ztimeout);
      otherwise   ioresult := ord(zcatchall);
      end;
    end;

    procedure bub_tm(fp:fibp; request:amrequesttype;
		     anyvar buffer : window; bufsize, position : integer);
    var
      card : anyptr;
      info : infoptr;

    begin
      ioresult := ord(inoerror);
      with fp^ , unitable^[funit] do
      begin
	card := isc_table[sc].card_ptr;
	if isc_table[sc].io_tmp_ptr=NIL then ioresult := ord(znodevice)
	else
	begin
	  info := addr(isc_table[sc].io_tmp_ptr^.drv_misc);
	  with info^ do
	  case request of
	    startread,
	    readbytes:    if runstate<>b_idle then ioresult := ord(znotready)
			  else
			  begin
			    if (position+bufsize)<=fpeof then
			    begin         { is inside the file }
			      bbuffer.brec := addr(buffer);
			      bstart := fileid + byteoffset + position;
			      bcount := bufsize;
			      bretry := 3;
			      if bcount<>0 then bubdoread(card,info);
			      if request=readbytes then
				 while runstate<>b_idle do; { wait for idle }
			      if runstate=b_idle then xlate_errors(errorcode);
			    end
			    else ioresult := ord(ieof);
			  end;
	    startwrite,
	    writebytes:   if runstate<>b_idle then ioresult := ord(znotready)
			  else
			  begin
			    if (position+bufsize)<=fpeof then
			    begin
			      bbuffer.brec := addr(buffer);
			      bstart := fileid + byteoffset + position;
			      if bufsize>0
			      then bcount := (bufsize + 255) DIV 256 * 256
			      else bcount := bufsize;
			      bretry := 3;
			      if bcount<>0 then bubdowrite(card,info);
			      if request=writebytes then
				 while runstate<>b_idle do;   { wait for idle }
			      if runstate=b_idle then xlate_errors(errorcode);
			    end
			    else ioresult := ord(ieof);
			  end;
	    flush:;   { NO_OP }
	    clearunit:    begin
			    bubdoreset(card,info);
			    xlate_errors(info^.errorcode);
			    if ioresult=ord(inoerror)
			    then umaxbytes := maxbytes      { set device size }
			    else umaxbytes := 0;
			  end;
	    unitstatus:   begin
			    fbusy := runstate<>b_idle;
			    if not fbusy then xlate_errors(errorcode);
			  end;
	    otherwise  ioresult := ord(ibadrequest);
	  end;  { case }
	end;    { if nounit }
      end;      { with }
    end; { bub_tm }
$DEBUG OFF$
    procedure bub_isr(isrib : pisrib);
    var
      temps : pio_tmp_ptr;
      info  : infoptr;
    begin
      temps := addr(isrib^);
      info  := addr(temps^.drv_misc);
      bubdoisr(temps^.card_addr,info);
    end; { bub_isr }

    procedure bub_init;
    const
      intreg = 3;       { interupt reg offset }
    type
      cardrec = packed record
		  pad : byte;
		  id  : byte;
		end;
    var
      sc        : integer;
      isrinfo   : pisrib;
      info      : infoptr;
      card      : ^cardrec;
    begin
      { scan selectcode table for bubble devices }
      for sc:= iominisc to iomaxisc do
      with isc_table[sc] do
      begin
	{ fix isc_table to work for system 2.0, 2.1 or 2.2 }
	if ((card_type=1) and (card_id=0)) or
	   ((card_type=8) and (card_id=30)) then
	begin
	  card    := card_ptr;
	  if card^.id=30 then
	  begin
	    card_type := 8; { bubble memory card }
	    card_id   := 30;
	    isrinfo := addr(io_tmp_ptr^);
	    info    := addr(io_tmp_ptr^.drv_misc);
	    bubgetinfo(card,info);
	    if info^.errorcode=bnoerror then
	    begin
	      permisrlink(bub_isr,        { ISR PROC }
		      addr(card^,intreg), { INTERUPT REG ADDRESS }
		      hex('C0'),hex('C0'),{ MASK and VALUE }
		      info^.priority,     { INTERUPT PRIORITY }
		      isrinfo);           { ISR INFO POINTER  }
	    end;
	  end;
	end;
      end;
    end; {bub_init}

end; { bub_ops }
{       bubbles installation program    }
import bubble,loader;

begin
  bub_init;
  markuser;
end.
@


53.1
log
@Automatic bump of revision number for PWS version 3.24B
@
text
@@


52.1
log
@Automatic bump of revision number for PWS version 3.24A
@
text
@@


51.1
log
@Automatic bump of revision number for PWS version 3.24d
@
text
@@


50.1
log
@Automatic bump of revision number for PWS version 3.23c
@
text
@@


49.1
log
@Automatic bump of revision number for PWS version 3.24b
@
text
@@


48.1
log
@Automatic bump of revision number for PWS version 3.24a
@
text
@@


47.1
log
@Automatic bump of revision number for PWS version 3.23
@
text
@@


46.1
log
@Automatic bump of revision number for PWS version 3.23
@
text
@@


45.1
log
@Automatic bump of revision number for PWS version 3.23C
@
text
@@


44.1
log
@Automatic bump of revision number for PWS version 3.23B
@
text
@@


43.1
log
@Automatic bump of revision number for PWS version 3.23aA
@
text
@@


42.1
log
@Automatic bump of revision number for PWS version 3.23e
@
text
@@


41.1
log
@Automatic bump of revision number for PWS version 3.23d
@
text
@@


40.1
log
@Automatic bump of revision number for PWS version 3.23c
@
text
@@


39.1
log
@Automatic bump of revision number for PWS version 3.23b
@
text
@@


38.1
log
@Automatic bump of revision number for PWS version 3.23a
@
text
@@


37.1
log
@Automatic bump of revision number for PWS version 3.3a
@
text
@@


36.1
log
@Automatic bump of revision number for PWS version 3.22
@
text
@@


35.1
log
@Automatic bump of revision number for PWS version 3.22
@
text
@@


34.1
log
@Automatic bump of revision number for PWS version 3.22
@
text
@@


33.1
log
@Automatic bump of revision number for PWS version 3.22D
@
text
@@


32.1
log
@Automatic bump of revision number for PWS version 3.22C
@
text
@@


31.1
log
@Automatic bump of revision number for PWS version 3.22B
@
text
@@


30.1
log
@Automatic bump of revision number for PWS version 3.22A
@
text
@@


29.1
log
@Automatic bump of revision number for PWS version 3.22b
@
text
@@


28.1
log
@Automatic bump of revision number for PWS version 3.3b
@
text
@@


27.1
log
@Automatic bump of revision number for PWS version 3.3a
@
text
@@


26.1
log
@Automatic bump of revision number for PWS version 3.3 Synch
@
text
@@


25.1
log
@Automatic bump of revision number for PWS version 3.2Y
@
text
@@


24.1
log
@Automatic bump of revision number for PWS version 3.2
@
text
@@


23.1
log
@Automatic bump of revision number for PWS version 3.2P
@
text
@@


22.1
log
@Automatic bump of revision number for PWS version 3.2N
@
text
@@


21.1
log
@Automatic bump of revision number for PWS version 3.2M
@
text
@@


20.1
log
@Automatic bump of revision number for PWS version 3.2L
@
text
@@


19.1
log
@Automatic bump of revision number for PWS version 3.2K
@
text
@@


18.1
log
@Automatic bump of revision number for PWS version 3.2J
@
text
@@


17.1
log
@Automatic bump of revision number for PWS version 3.2I+
@
text
@@


16.1
log
@Automatic bump of revision number for PWS version 3.2I
@
text
@@


15.1
log
@Automatic bump of revision number for PWS version 3.2H
@
text
@@


14.1
log
@Automatic bump of revision number for PWS version 3.2G
@
text
@@


13.2
log
@Pws2unix automatic delta on Wed Apr  1 08:30:27 MST 1987
@
text
@@


13.1
log
@Automatic bump of revision number for PWS version 3.2F
@
text
@d23 1
@


12.1
log
@Automatic bump of revision number for PWS version 3.2E
@
text
@@


11.1
log
@Automatic bump of revision number for PWS version 3.2D
@
text
@@


10.1
log
@Automatic bump of revision number for PWS version 3.2C
@
text
@@


9.1
log
@Automatic bump of revision number for PWS version 3.2B
@
text
@@


8.1
log
@Automatic bump of revision number for PWS version 3.2A
@
text
@@


7.1
log
@Automatic bump of revision number for PWS version 3.2l
@
text
@@


6.1
log
@Automatic bump of revision number for PWS version 3.2k
@
text
@@


5.1
log
@Automatic bump of revision number for PWS version 3.2j
@
text
@@


4.1
log
@Automatic bump of revision number for PWS version 3.2i
@
text
@@


3.1
log
@Automatic bump of revision number for PWS version 3.2h
@
text
@@


2.1
log
@Auto bump rev number to 2.1 for sys 3.2e.
@
text
@@


1.1
log
@Initial revision
@
text
@@
