Trailing-Edge
-
PDP-10 Archives
-
decuslib10-10
-
43,50516/bashis.doc
There are no other files named bashis.doc in the archive.
Digital Equipment Corporation 02-Jan-80
No SPR #
[Validity] 1
[Date cured] 02-Jan-80
[Routines] BASEDT.MAC - RESER
[Key words] RESEQUENCE MARGIN ALL
[Source before Edit] 1
[Source after Edit] 1(1)
[SYMPTOM]
RESEQUENCE attempts to resequence the argument of a MARGIN ALL
statement.
[DIAGNOSIS]
The test for the LL function detects the MARGIN ALL and looks for a
line number to resequence.
[CURE]
Introduce a special test for the LL function, including its (, at
SEQ57+9, remove SIXBIT /LL/ from SEQTBL+3, and place it at SEQTND+1.
[FILCOM]
File 1) DSKC:BASEDT.000[11,3] created: 1021 17-Jul-1979
File 2) DSKC:BASEDT.MAC[11,3] created: 1452 03-Jan-1980
SEQ57+9:
**************
1)4 SQLAB3: CAMN A,SEQTBL(B)
****
2)4 CAMN A,SEQLL ;[1] SPECIAL TEST FOR LL FUNCTION
2) CAIE C,"(" ;[1] MUST BE FOLLOWED BY (
2) SQLAB3: CAMN A,SEQTBL(B)
**************
.... continued over
SEQTBL+3:
**************
1)4 SIXBIT /LL/
1) SEQORG: SIXBIT /ORGOTO/
****
2)4 ; Delete [1] SIXBIT /LL/
2) SEQORG: SIXBIT /ORGOTO/
**************
SEQTND+1:
**************
1)4
****
2)4 SEQLL: SIXBIT /LL/ ;[1] FOR TEST FOR LL FUNCTION
2)
**************
Digital Equipment Corporation 02-Jan-80
No SPR #
[Validity] 1
[Date cured] 02-Jan-80
[Routines] BASCRF.CMD
[Key words] CREF
[Source before Edit] 1(1)
[Source after Edit] 1(2)
[SYMPTOM]
? System error ... etc. at the end of BASCRF execution.
[DIAGNOSIS]
BASCRF does not know the address of QUEUER in BASICL.
[CURE]
Change BASCRF.CMD to load a complete, as opposed to vestigial,
BASICL.
[FILCOM]
File 1) DSKC:BASCRF.001[11,3] created: 1317 02-May-1978
File 2) DSKC:BASCRF.CMD[11,3] created: 1051 02-Jan-1980
**************
1)1 BSYICL
1) BASCRF,EDTLIB
****
2)1 BASICL
2) BASCRF,EDTLIB
**************
Digital Equipment Corporation 03-Jan-80
No SPR #
[Validity] 1
[Date cured] 03-Jan-80
[Routines] BASXCT.MAC - STRETT
[Key words] RIGHT$ Concatenation
[Source before Edit] 1(2)
[Source after Edit] 1(3)
[SYMPTOM]
When the string argument of RIGHT$ is an expression requiring concatenation
and core expansion occurs during the evaluation of the function, the
? System error ...etc. message is encountered.
[DIAGNOSIS]
The append key for the concatenation is stored in accumulator X1 in
STRETT while space is allocated for the resultant string. If this requires
core expansion and therefore shifting of strings, the append key will
no longer point to the right place.
[CURE]
Put the append key in the master append list, so that it will be updated
correctly to reflect the new string locations.
[FILCOM]
File 1) DSKC:BASICL.002[11,3] created: 1259 27-Jul-1979
File 2) DSKC:BASICL.MAC[11,3] created: 1451 03-Jan-1980
**************
1)1 LSGVER: SIXBIT /BASX12/ ;MUST BE CHANGED FOR EACH NEW HI-SEG
1) ;VERSION, TO AGREE WITH HSGVER
****
2)1 LSGVER: SIXBIT /BASX13/ ;[3] MUST BE CHANGED FOR EACH NEW HI-SEG
2) ;VERSION, TO AGREE WITH HSGVER
**************
.... continued over
File 1) DSKC:BASXCT.002[11,3] created: 1123 16-Jul-1979
File 2) DSKC:BASXCT.MAC[11,3] created: 1450 03-Jan-1980
**************
1)1 HSGVER: SIXBIT /BASX12/ ;SEGMENT VERSION
1)
****
2)1 HSGVER: SIXBIT /BASX13/ ;[3] SEGMENT VERSION
2)
**************
STRETR+6:
**************
1)9 MOVE X1,N ;SAVE APP KEY.
1) PUSHJ P,LENAPB
****
2)9 ; Delete [3] MOVE X1,N ;SAVE APP KEY.
2) PUSHJ P,MASTST ;[3] CHECK FOR SPACE
2) AOS X1,MASAPP ;[3] AND PROTECT THE KEY
2) MOVEM N,(X1) ;[3] ON THE MASTER APP. LIST
2) PUSHJ P,LENAPB
**************
STRETR+17:
**************
1)9 HLRZ E,X1
****
2)9 MOVE X1,(X1) ;[3] GET BACK THE KEY
2) SOS MASAPP ;[3] ADJUST MASTER APP. LIST
2) HLRZ E,X1
**************
Digital Equipment Corporation 31-Jan-80
No SPR#
[Validity] 1
[Date cured] 31-Jan-80
[Routines] BASCOM.MAC - XFILE
[Key words] FILES Random access Ppn
[Source before Edit] 1(3)
[Source after Edit] 1(4)
[SYMPTOM]
If the FILES statement is used in an attempt to access a random access file
belonging to another project-programmer number, the specified project-
programmer number is ignored and the user's own disk area is used.
[DIAGNOSIS]
During compilation of the FILES statement, the project-programmer number is
stored in the wrong place.
[CURE]
Store it in the right place !
[FILCOM]
File 1) DS01:BASCOM.003[11,3] created: 1016 17-Jul-1979
File 2) DS01:BASCOM.MAC[11,3] created: 1320 31-Jan-1980
XFIL35+3:
**************
1)5 MOVEM X2,FPPN(A)
1) MOVE X2,L ;SAVE SOURCE LINE
****
2)5 ; Delete [4] MOVEM X2,FPPN(A)
2) MOVEM X2,FPPN-1(A) ;[4] SAVE NAME, EXT AND PPN.
2) MOVE X2,L ;SAVE SOURCE LINE
**************