Ben what else qu'il est over pourri, lent et lourd (j'ai édité la partie asm de ce code)

move.l #'syst',x(sp)
move.l #'em\a',x+4(sp)
move.w #'s\0',x+8(sp)

Bon ok, une chaine constante, j'aurais dû la déclarer en global pour éviter la recopie sur la pile. Mais bordel, le const devrait lui faire savoir que c'est pas la peine de recopier...