Αναθεώρηση 26 Έκδοση 9.9

Διορθώθηκε ένα πρόβλημα που μπήκε από την αναθεώρηση 21. Επηρέαζε τα αντικείμενα ομάδα όταν είχαν λειτουργία για τελεστή αντικατάστασης προγραμματιζόμενο και σε αυτόν είχαμε εκτός από την τιμή εισαγωγή και τιμές σαν index.

Το παρακάτω το εκτελεί και η 25

Ομάδα Αλφα {
Ιδιωτικό:
      Χ=10
Δημόσιο:
      Αξία {
            =.Χ
      }
      Θέσε (α$, ν) {
            .Χ<=τιμη(α$)*αριθμός+ν
      }
}
αλφα("5",2)=10
Τύπωσε αλφα=52
Βήτα=Ομάδα(αλφα)
Τύπωσε Βήτα=52

Όμως αυτό δεν το εκτελεί η 25 αλλά το εκτελεί η 26 (και οι πριν την 21). Όταν η Αξία είχε και αυτή δείκτες, τότε λόγω αφαίρεσης ενός ελέγχου αντί να εκτελούσε την Θέσε εκτελούσε την Αξία και έβγαζε μήνυμα ότι δεν βρήκε την κλειστή παρένθεση!

Ομάδα Αλφα {
Ιδιωτικό:
      Χ=10
Δημόσιο:
      Αξία (α$, ν){
            =.Χ
      }
      Θέσε (α$, ν) {
            .Χ<=τιμη(α$)*αριθμός+ν
      }
}
αλφα("5",2)=10
Τύπωσε αλφα("10",10)=52