Page 1 sur 1
[v4 beta1] Macro et condition!
Publié : sam. 04/févr./2006 11:23
par nico
J'ai un problème avec ce code, je pense que PB ne devrait pas me renvoyer d'erreur!
Là, ça ne marche pas, j'ai une erreur malgré le test de condition:
Code : Tout sélectionner
variable.l=%0110101
Macro Bit(valeur,Numero_du_bit)
masque=1
If Numero_du_bit
test=valeur & (masque << Numero_du_bit) ;(1 à 7)
Else
test=valeur & masque
EndIf
EndMacro
bit(variable,0)
Debug test
alors que logiquement si je fais le travail de la macro; ça devrait me donner ça:
Code : Tout sélectionner
Numero_du_bit=0
variable.l=%0110101
valeur= variable
masque=1
If Numero_du_bit
test=valeur & (masque << Numero_du_bit) ;(1 à 7)
Else
test=valeur & masque
EndIf
Debug test
Publié : sam. 04/févr./2006 12:43
par lionel_om
Oué c'est bizard...
Publié : sam. 04/févr./2006 16:27
par Dräc
Ce n’est pas vraiment une erreur, c’est a cause de l’optimisation du code par Pure.
Dans ton exemple, PB peut substituer directement le pseudo variable Numero_du_bit par la constante 0 avant compilation ce qui lui pose problème par la suite avec l’opérateur <<.
Le code suivant, par contre, fonctionne correctement.
Code : Tout sélectionner
variable.l=%0110101
Macro Bit(valeur, Numero_du_bit=1)
masque=1
If Numero_du_bit
test=valeur & (masque << Numero_du_bit) ;(1 à 7)
Else
test=valeur & masque
EndIf
EndMacro
a = 0
bit(variable,a)
Debug test
Publié : sam. 04/févr./2006 16:32
par Fred
Y'a quand meme un truc bizarre, je vais regarder.
Publié : sam. 04/févr./2006 16:50
par nico
Même si y a un truc qui va pas, c'est drolement bien vu Dräc!
Publié : dim. 05/févr./2006 1:18
par LeCyb
Il est vachement prudent le compilateur, au cas où un "If 0" arriverait à passer en force il te prévient que tu peux pas faire le décalage
Publié : dim. 05/févr./2006 11:17
par nico
C'est pas si évident de faire une macro, question d'habitude sans doute, mais le problème c'est que le compilateur ne t'indique pas la ligne qui pose problème dans la macro, il reste sur la ligne d'appel de la macro; alors je patoge pas mal.
T'as bien un message d'erreur mais ce n'est pas très clair, du moins pour moi!
genre: "cette commande ne peut pas porté ce même nom car cette une commande de pure :if "
évidemment le if que j'ai mis n'est pas une commande mais bien un if..!!!