Précédent Suivant

Broker

;; dans un processus SML, définir une fonction comme d’habitude
? (defun calc:add (x y) (+ x y))
;; l’exporter et s’enregister sur le bus
? (load "smlb")	;charger le broker
? (smlb:export 'calc:add)	;la fonction est maintenant publique
? (smlb:start "Calculator")	;enregistrement sur le bus

;; dans un autre processus SML
? (load "smlb")	;charger le broker
;; importer la fonction et l’exécuter tout simplement
? (smlb:import "Calculator" 'calc:add)
? (calc:add 1 2)	;appel distant avec connexion automatique
 = 3
? (calc:add 1)	;une erreur est déclenchée localement
Error: Bad number of arguments: 1
  
Précédent Suivant