Toujours aussi fort, le seki

Bonjour,

merci pour cette mise à disposition.
Nous avons développé un évaluateur en C++ (objet COM) et pour comparer, j'ai regardé le tien.
J'ai un message "Cannot insert a document into rich text edit when the DisplayOnly property is set to true" à l'InsertDocument() (Booléen DisplayOnly à TRUE dans l'onglet Document du RTE, en le décochant plus de message). Pour info, je suis en PB 11.5.

Geo a écrit:

Nous avons développé un évaluateur en C++ (objet COM) et pour comparer, j'ai regardé le tien.

Merci Il est possible qu'il y ait des différences dans l'évaluation des expressions sans parenthèses si vous n'avez pas les mêmes précédences d'opérateurs.

Et je n'ai quasiment pas codé de fonctions avant de publier, on pourrait en ajouter plein : min(), max(), les fonctions de trigo, ou des fonctions financières, il suffit de les mapper dans evalFunc()...

Si ça vous intéresse, je pourrais toujours publier des mises à jour.

Histoire de donner quelques nouvelles : la recherche avance et j'arrive à des résultats intéressants comme celui-ci :


Depuis la version initiale qui utilisait une machine à pile pour traiter l'expression une fois découpée en items
- je lis '2', j'empile '2'
- je lis '3', j'empile '3'
- je lis '+', je dépile '3' et '2', j'additionne et j'empile '5'

Maintenant le parcours de l'expression fabrique un arbre (arbre de syntaxe abraite) représentant complètement l'expression, puis le parcourt en évaluant chaque noeud mais en conservant la structure. Cela peut permettre d'afficher le détail du calcul et aussi de ne pas évaluer des branches non nécessaires. Par exemple la syntaxe

if(1=1, msgbox('vrai'), msgbox('faux'))

avant affichait 2 messages (car les arguments à if() étaient évalué avant le if(), comme pour toute autre fonction) et maintenant n'en affiche qu'un seul (on sait en évaluant '1=1' que seul la partie "vraie" est à évaluer)

Exemple d'expressions que je sais traiter:
- 33+42*2.5/(0.1-5)^2^3  -> 33,00031595167263415
- len(`string`) -> 6
- 2 - 1 <= 1 + 1 -> True
- +1 + --+1 -> 2
- min(len('a string')+7,-len("another"),4.2)+42 -> 35
- 'aa' + 42 -> 'aa42'
- 40 + '2' -> 42 (conversion magique si possible)
- '40' + '2' -> 402
- à cause de la conversion magique len('aa'+42) -> 4 mais len(40+'2') -> "len() can only take string argument at 1"
- 'aa'='bb' = false -> True
- 'aa'='bb' = vrai (vrai est une variable qui vaut le boolean true) -> False
- msgbox('length = ' + len("message")) -> affiche un message et retourne 1 (le n° du bouton cliqué)
- msgbox(if(true, 'true', 'false')) -> affiche 'true'
- if(true, msgbox('true'), msgbox('false')) -> affiche un seul 'true' (évaluation fénéante du if)

Edit:màj de la copie d'écran

Dernière modification par seki (19-03-2013 19:11:51)

En effet je réutilise quelques notions présentes dans tous les cours de compilation (ça doit être du niveau license mais je ne suis pas allé jusque là).

Ça me sert à faire quelques expérimentations en vue d'appliquer des trucs que je lis par-ci par-là et de peut-être refondre un "langage" d'expressions interne d'un produit au taf. Et plus si affinités (en stock j'ai une grammaire powerscript presque complète avec plein d'idées pour aller avec).

Et c'est du pur PBScript en quelques objets : un userobject pour le parseur/évaluateur (19 méthodes), un userobject pour stocker chaque élément des expressions (8 méthodes presques pas utilisées - au début c'était une structure) et un dernier userobject pour simuler une pile (à base de tableau dynamique - 7 méthodes). Le reste est brodé autour des 3 premiers, sans pbni pour le moment, ça doit être réutilisable dans n'importe quel programme PB (le proto est fait en PB9).

Bref, c'est fun