From: arne@vajhoej.dk   
      
   On 9/20/2025 4:13 PM, John Dallman wrote:   
   > The VAX instruction set is quite nice in some ways and quite horrible in   
   > others. Some of those made it hard to make run very fast.   
   >   
   > The extremely variable-length instructions are a prime example.   
      
   CASEx is probably the worst.   
      
   Example of >100 bytes long:   
      
            .title  longinst   
            .psect  $CODE quad,pic,con,lcl,shr,exe,nowrt   
            .entry  letter,^m<>   
            casel   @4(ap), #1, #<26 - 1>   
   100$:   .word   201$ - 100$   
            .word   202$ - 100$   
            .word   203$ - 100$   
            .word   204$ - 100$   
            .word   205$ - 100$   
            .word   206$ - 100$   
            .word   207$ - 100$   
            .word   208$ - 100$   
            .word   209$ - 100$   
            .word   210$ - 100$   
            .word   211$ - 100$   
            .word   212$ - 100$   
            .word   213$ - 100$   
            .word   214$ - 100$   
            .word   215$ - 100$   
            .word   216$ - 100$   
            .word   217$ - 100$   
            .word   218$ - 100$   
            .word   219$ - 100$   
            .word   220$ - 100$   
            .word   221$ - 100$   
            .word   222$ - 100$   
            .word   223$ - 100$   
            .word   224$ - 100$   
            .word   225$ - 100$   
            .word   226$ - 100$   
   201$:   movl    #<64+1>, r0   
            brb     300$   
   202$:   movl    #<64+2>, r0   
            brb     300$   
   203$:   movl    #<64+3>, r0   
            brb     300$   
   204$:   movl    #<64+4>, r0   
            brb     300$   
   205$:   movl    #<64+5>, r0   
            brb     300$   
   206$:   movl    #<64+6>, r0   
            brb     300$   
   207$:   movl    #<64+7>, r0   
            brb     300$   
   208$:   movl    #<64+8>, r0   
            brb     300$   
   209$:   movl    #<64+9>, r0   
            brb     300$   
   210$:   movl    #<64+10>, r0   
            brb     300$   
   211$:   movl    #<64+11>, r0   
            brb     300$   
   212$:   movl    #<64+12>, r0   
            brb     300$   
   213$:   movl    #<64+13>, r0   
            brb     300$   
   214$:   movl    #<64+14>, r0   
            brb     300$   
   215$:   movl    #<64+15>, r0   
            brb     300$   
   216$:   movl    #<64+16>, r0   
            brb     300$   
   217$:   movl    #<64+17>, r0   
            brb     300$   
   218$:   movl    #<64+18>, r0   
            brb     300$   
   219$:   movl    #<64+19>, r0   
            brb     300$   
   220$:   movl    #<64+20>, r0   
            brb     300$   
   221$:   movl    #<64+21>, r0   
            brb     300$   
   222$:   movl    #<64+22>, r0   
            brb     300$   
   223$:   movl    #<64+23>, r0   
            brb     300$   
   224$:   movl    #<64+24>, r0   
            brb     300$   
   225$:   movl    #<64+25>, r0   
            brb     300$   
   226$:   movl    #<64+26>, r0   
   300$:   ret   
            .end   
      
   Arne   
      
   --- SoupGate-Win32 v1.05   
    * Origin: you cannot sedate... all the things you hate (1:229/2)