Re: [Bug-apl] A couple of bugs, and a question on the power operator

[Juergen Sauermann]

Hi Louis,

I am getting this:

      ⎕IO←1
      (g d)←'ATCTGAT' 'TGCATA'
      {((1↓X)Y((⊃X),Z)),[¯.5]X(1↓Y)((⊃Y),Z)⊣(X Y Z)←⍵}g d ⍬
 TCTGAT  TGCATA ATCTGAT
 ATCTGAT GCATA  TGCATA 
      {((1↓X)Y((⊃X),Z)),[.5]X(1↓Y)((⊃Y),Z)⊣(X Y Z)←⍵}g d ⍬
 TCTGAT  TGCATA ATCTGAT
 ATCTGAT GCATA  TGCATA 
     
      ⎕IO←0
      (g d)←'ATCTGAT' 'TGCATA'
      {((1↓X)Y((⊃X),Z)),[¯.5]X(1↓Y)((⊃Y),Z)⊣(X Y Z)←⍵}g d ⍬
 TCTGAT  ATCTGAT
 TGCATA  GCATA  
 ATCTGAT TGCATA 
      {((1↓X)Y((⊃X),Z)),[.5]X(1↓Y)((⊃Y),Z)⊣(X Y Z)←⍵}g d ⍬
 TCTGAT  ATCTGAT
 TGCATA  GCATA  
 ATCTGAT TGCATA 


It might be that something else went wrong beforehand, but then I would need more
information on how to reproduce the problem. Sometimes )history helps to see what
happened before the fault.

/// Jürgen

On 08/13/2016 08:24 AM, Louis de Forcrand wrote:

...

Now on to the bugs:

      (g d)←'ATCTGAT' 'TGCATA'

      {((1↓X)Y((⊃X),Z)),[¯.5]X(1↓Y)((⊃Y),Z)⊣(X Y Z)←⍵}g d ⍬

 TCTGAT  ATCTGAT 

 TGCATA  GCATA   

 ATCTGAT TGCATA  

      {((1↓X)Y((⊃X),Z)),[.5]X(1↓Y)((⊃Y),Z)⊣(X Y Z)←⍵}g d ⍬

 TCTGAT  ATCTGAT 

 TGCATA  GCATA   

 ATCTGAT TGCATA

These should be transposed. ⎕IO ←→ 0, so ,[¯.5] should give a two row,

three column matrix.

←———————            -            -            -            ———————→ 

      )SI

⋆⋆  

==============================================================================

Assertion failed: idx < items_valid

in Function:      operator[]

in file:          ./Simple_string.hh:140

Call stack:

----------------------------------------

-- Stack trace at ./Simple_string.hh:140

----------------------------------------

0xa @@@@

0xa  @@@@

0xa   @@@@

0xa    @@@@

0xa     @@@@

0xa      @@@@

0xa       @@@@

0xa        @@@@

0xa         @@@@

========================================

SI stack:

Depth:      9

Exec:       0x7f98db4177b0

Safe exec:  0

Pmode:    ⍎  (1↓R)((=/0⌷¨V)↓⍵⊃⍨~⍺)((2⊃⍵),1↑R←⍺⊃V)

PC:       27 /

Stat:     (1↓R)((=/0⌷¨V)↓⍵⊃⍨~⍺)((2⊃⍵),1↑R←⍺⊃V)

err_code: 0x50005

thrown:   at Value.cc:1051

e_msg_1:  'INDEX ERROR+'

e_msg_2:  '      (1↓R)((=/0⌷¨V)↓⍵⊃⍨∼⍺)((2⊃⍵),1↑R←⍺⊃V)'

e_msg_3:  '               ^           ^'

Depth:      8

Exec:       0x7f98db41b9f0

Safe exec:  0

Pmode:    ∇ 

==============================================================================

Assertion failed: idx < items_valid

in Function:      operator[]

in file:          ./Simple_string.hh:140

Call stack:

*** do_Assert() called recursively ***

==============================================================================

*** immediate_execution() caught other exception ***

I’m sorry I couldn’t include the input preceding that )SI, it's long and very

hard to reproduce. I hope this is enough to help :-⌈

~———~

I’d like to thank you for your very hard work. I don’t know of any other APL

which adheres to the standard while being as bug free as yours, and is a

one-man project. Let alone all three!

Keep in mind everything I suggest is the personal opinion of someone with very

little experience with C++ish languages. I’m sure you know better than I do how

to shape your APL. After all, you’re the one writing it!

Best of luck,

Louis