Merge pull request #4 from co-dan/master
Fix the `ocamlwiring_pull_up_dn_control` stub
This commit is contained in:
commit
fb03eeee58
|
@ -45,7 +45,7 @@ value ocamlwiring_pin_mode(value pin, value mode)
|
||||||
value ocamlwiring_pull_up_dn_control(value pin, value pud)
|
value ocamlwiring_pull_up_dn_control(value pin, value pud)
|
||||||
{
|
{
|
||||||
CAMLparam2(pin, pud);
|
CAMLparam2(pin, pud);
|
||||||
pullUpDnControl(Int_val(pin), Int_val(pin));
|
pullUpDnControl(Int_val(pin), Int_val(pud));
|
||||||
CAMLreturn(Val_unit);
|
CAMLreturn(Val_unit);
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue