DROP
Assembler |
Description
The DROP command releases addressability from a DSECT that was established with the Code Debug TSO USING command. See USING for a description of the USING command.
A record of the DROP command is written to the session log.
Input
The following are the parameter descriptions for the DROP command:
address
The 24- or 31-bit address of a DSECT.
dsect-name
The name of a DSECT.
Rn
The general-purpose register that contains the address used to establish addressability to the specified DSECT. The permissible values are R0 through R15.
Examples
Examples of valid forms of the DROP command are listed as follows:
- With dsect-name, enter:
DROP MYDSECT R11 - With address, enter:
DROP B77418
The following figure shows an example of entering a DROP command after reassigning the DSECT address with the USING command.
Entering the DROP and MEMORY Commands
COMMAND ===> drop tstrec r6; mem r2% SCROLL ===> CSR
PROGRAM: TRITSTA MODULE: TRIMAINA COMP DATE: 07/20/1995 COMP TIME: 14:41:00
000000 K TSTREC DSECT > 0
000000 K TYPE DS ZL1 > 0 ZONED
000001 K DS 0CL3 > 555
000001 K SIDEA DS ZL1 > 5 ZONED
000002 ANB DS PL2 > +3 PACKED
------ --------------------------------------- Before TRITSTA:67670/AMODE 24 <>
06766C START EQU *
06766C L R2,0(R1) POINT R2 TO PARAMETER
------ USING TSTREC,R2 SET ADDRESS FOR DSECT
=====> ZEROIT ZAP ANB,=P’0’
067676 ZAP ANC,=P’0’
06767C ZAP BNC,=P’0’
067682 PACKIT PACK TSTA,SIDEA PACK TRIANGLE SIDE
067688 PACK TSTB,SIDEB "
GPREGS R0 ==> 00000001 R1 ==> 000671C8 R2 ==> 00067301 R3 ==> 0006CC30
R4 ==> 02944B10 R5 ==> 00057850 R6 ==> 00067309 R7 ==> 80090E56
R8 ==> 0009F144 R9 ==> 00000000 R10 ==> 00090FBC R11 ==> 00067750
R12 ==> 00067658 R13 ==> 00067750 R14 ==> 00097AC4 R15 ==> 00067658
The Keep window shows 0555 in DSECT TSTREC being read from address 00067309 in register 6. By dropping this DSECT address, TSTREC uses the original address, R2, established by the source code USING TSTREC,R2.
The following figure shows the memory display for register 2 at location 67301 as a result of the MEMORY command entered in Entering the DROP and MEMORY Commands.
Memory Display at Established Address
COMMAND ===> end SCROLL ===> CSR
PROGRAM: TRITSTA MODULE: TRIMAINA COMP DATE: 07/20/1995 COMP TIME: 14:41:00
------------------------------------------------ Before TRITSTA:67670/AMODE 24 --
0 - 2 - 4 - 6 - 8 - A - C - E - = 0-2-4-6-8-A-C-E-
******************************************************************************
067301 ===> F0F3F4F5 40404040 F0F5F5F5 40404040 = 0345 0555
067311 ===> 40404040 40404040 40404040 40404040 =
067321 ===> 40404040 40404040 40404040 40404040 =
067331 ===> 40404040 40404040 40404040 40404040 =
067341 ===> 40404040 40404040 40F0F0F0 F1F0F0F0 = 0001000
067351 ===> F0000000 0000000C 1C000000 00000090 = 0...............
067361 ===> ECD00C18 CF41B0C0 D850DB00 0450BD00 = ........0.......
067371 ===> 0818DB58 21000018 624130C1 F1415000 = ...........A1...
067381 ===> 04070045 10C02C8F 0674800A 134110C1 = ...............A
067391 ===> 204100C1 8058F010 3005EF41 10C12041 = ...A..0......A..
0673A1 ===> 00C1A158 F0103005 EFD203C2 C2C2E8DE = .A..0....K.BBBY.
0673B1 ===> 03C2C220 00D220C2 A1300041 10C12041 = .BB..K.B.....A..
0673C1 ===> 00C29658 F0103005 EF412020 02413030 = .B..0...........
0673D1 ===> 21D203C2 C2C2F046 50C04A41 10C12041 = .K.BBB0......A..
GPREGS R0 ==> 00000001 R1 ==> 000671C8 R2 ==> 00067301 R3 ==> 0006CC30
R4 ==> 02944B10 R5 ==> 00057850 R6 ==> 00067309 R7 ==> 80090E56
R8 ==> 0009F144 R9 ==> 00000000 R10 ==> 00090FBC R11 ==> 00067750
R12 ==> 00067658 R13 ==> 00067750 R14 ==> 00097AC4 R15 ==> 00067658
The Memory screen shows 0345 at address 00067301 contained in register 2 and 0555 at address 00067309 contained in register 6.
The following figure shows the result of entering the DROP TSTREC R6 in Entering the DROP and MEMORY Commands. The original starting address for DSECT TSTREC is restored.
Restoring the Original DSECT Address
COMMAND ===> end SCROLL ===> CSR
PROGRAM: TRITSTA MODULE: TRIMAINA COMP DATE: 07/20/1995 COMP TIME: 14:41:00
------------------------------------------------ Before TRITSTA:67670/AMODE 24 --
0 - 2 - 4 - 6 - 8 - A - C - E - = 0-2-4-6-8-A-C-E-
******************************************************************************
067301 ===> F0F3F4F5 40404040 F0F5F5F5 40404040 = 0345 0555
067311 ===> 40404040 40404040 40404040 40404040 =
067321 ===> 40404040 40404040 40404040 40404040 =
067331 ===> 40404040 40404040 40404040 40404040 =
067341 ===> 40404040 40404040 40F0F0F0 F1F0F0F0 = 0001000
067351 ===> F0000000 0000000C 1C000000 00000090 = 0...............
067361 ===> ECD00C18 CF41B0C0 D850DB00 0450BD00 = ........0.......
067371 ===> 0818DB58 21000018 624130C1 F1415000 = ...........A1...
067381 ===> 04070045 10C02C8F 0674800A 134110C1 = ...............A
067391 ===> 204100C1 8058F010 3005EF41 10C12041 = ...A..0......A..
0673A1 ===> 00C1A158 F0103005 EFD203C2 C2C2E8DE = .A..0....K.BBBY.
0673B1 ===> 03C2C220 00D220C2 A1300041 10C12041 = .BB..K.B.....A..
0673C1 ===> 00C29658 F0103005 EF412020 02413030 = .B..0...........
0673D1 ===> 21D203C2 C2C2F046 50C04A41 10C12041 = .K.BBB0......A..
GPREGS R0 ==> 00000001 R1 ==> 000671C8 R2 ==> 00067301 R3 ==> 0006CC30
R4 ==> 02944B10 R5 ==> 00057850 R6 ==> 00067309 R7 ==> 80090E56
R8 ==> 0009F144 R9 ==> 00000000 R10 ==> 00090FBC R11 ==> 00067750
R12 ==> 00067658 R13 ==> 00067750 R14 ==> 00097AC4 R15 ==> 00067658