Changeset 8325447 in buchla-68k for ram/execins.s

Timestamp:

08/07/2017 02:04:35 PM (7 years ago)

Author:

Thomas Lopatic <thomas@…>

Branches:

master

Children:

27c8d40

Parents:

84c0125

Message:

Removed _ prefix.

File:

• ram/execins.s (modified) (8 diffs)

ram/execins.s

@@ -10 +10 @@
 DOUBLED         =       1                       | double output to WS table
 
-                .xdef   _execins
-
-                .xref   _clrvce
-                .xref   _execkey
-
-                .xref   _io_fpu
-                .xref   _instmod
-                .xref   _s_inst
-                .xref   _idefs
-                .xref   _vbufs
+                .xdef   execins
+
+                .xref   clrvce
+                .xref   execkey
+
+                .xref   io_fpu
+                .xref   instmod
+                .xref   s_inst
+                .xref   idefs
+                .xref   vbufs
 
 | register equates
@@ -42 +42 @@
                 .page
 
-_execins:       link    A6,#0                   | link stack frames
+execins:        link    A6,#0                   | link stack frames
                 movem.l D3-VCE/P2-IP,-(sp)      | preserve registers
                 move.w  VOICE(A6),VCE           | get voice number
@@ -50 +50 @@
                 lea     vibtabl,A0              | ...
                 movea.l 0(A0,D0.W),IP           | ...
-                add.l   #_vbufs,IP              | ...
+                add.l   #vbufs,IP               | ...
                 move.w  VCE,(sp)                | clrvce(vce)
-                jsr     _clrvce                 | ...
+                jsr     clrvce                  | ...
                 tst.w   TAG(A6)                 | if (tag) {
                 beq     L2                      | ...
@@ -62 +62 @@
                 lea     vibtabl,A0              | ...
                 movea.l 0(A0,D0.W),P2           | ...
-                add.l   #_idefs,P2              | ...
+                add.l   #idefs,P2               | ...
                 move.w  #1968,D0                | set move count
 
@@ -77 +77 @@
                 move.l  D0,P1                   | ...
                 move.l  D0,P3                   | ...
-                add.l   #_io_fpu,P1             | point P1 at FPU WS A
+                add.l   #io_fpu,P1              | point P1 at FPU WS A
                 add.l   #0x202,P1               | ...
                 lea     1778(IP),P2             | point P2 at instdef WS A
-                add.l   #_io_fpu,P3             | point P3 at FPU WS B
+                add.l   #io_fpu,P3              | point P3 at FPU WS B
                 add.l   #2,P3                   | ...
                 lea     2858(IP),P4             | point P4 at instdef WS B
@@ -129 +129 @@
                 move.w  VCE,A0                  | instmod[vce] = FALSE
                 add.l   A0,A0                   | ...
-                add.l   #_instmod,A0            | ...
+                add.l   #instmod,A0             | ...
                 clr.w   (A0)                    | ...
                 move.w  VCE,A0                  | s_inst[vce] = ins
                 add.l   A0,A0                   | ...
-                add.l   #_s_inst,A0             | ...
+                add.l   #s_inst,A0              | ...
                 move.w  INS(A6),(A0)            | ...
                 move.b  70(IP),SYNC             | get config bits
@@ -155 +155 @@
 L17:            move.w  VCE,A0                  | send sync to FPU
                 add.l   A0,A0                   | ...
-                add.l   #_io_fpu,A0             | ...
+                add.l   #io_fpu,A0              | ...
                 add.l   #0x5FE0,A0              | ...
                 move.w  SYNC,(A0)               | ...
@@ -163 +163 @@
                 clr.w   -(sp)                   | ...
                 move.w  #-1,-(sp)               | ...
-                jsr     _execkey                | ...
+                jsr     execkey                 | ...
                 addq.l  #6,sp                   | ...
                 tst.l   (sp)+                   | clean up stack