diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2003-04-17 11:38:51 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2003-04-17 11:38:51 +0000 |
commit | 599c7e0ed6b95c9f77500d54fc4d06d9991adeef (patch) | |
tree | b336f8fd7355adcad43b612bc2f359ec1d999f11 /perl_checker.src/common.mli | |
parent | acbffb9049c80b31ac1c59eaadd1e7811a07b785 (diff) | |
download | perl_checker-599c7e0ed6b95c9f77500d54fc4d06d9991adeef.tar perl_checker-599c7e0ed6b95c9f77500d54fc4d06d9991adeef.tar.gz perl_checker-599c7e0ed6b95c9f77500d54fc4d06d9991adeef.tar.bz2 perl_checker-599c7e0ed6b95c9f77500d54fc4d06d9991adeef.tar.xz perl_checker-599c7e0ed6b95c9f77500d54fc4d06d9991adeef.zip |
basic "number of arguments" checking
Diffstat (limited to 'perl_checker.src/common.mli')
-rw-r--r-- | perl_checker.src/common.mli | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/perl_checker.src/common.mli b/perl_checker.src/common.mli index 33b2736..d766b86 100644 --- a/perl_checker.src/common.mli +++ b/perl_checker.src/common.mli @@ -12,6 +12,10 @@ val fstfst : ('a * 'b) * 'c -> 'a val sndfst : ('a * 'b) * 'c -> 'b val fstsnd : 'a * ('b * 'c) -> 'b val sndsnd : 'a * ('b * 'c) -> 'c +val fst3 : 'a * 'b * 'c -> 'a +val snd3 : 'a * 'b * 'c -> 'b +val ter3 : 'a * 'b * 'c -> 'c +val sndter3 : 'a * 'b * 'c -> 'b * 'c val o : ('a -> 'b) -> ('c -> 'a) -> 'c -> 'b val curry : ('a * 'b -> 'c) -> 'a -> 'b -> 'c val uncurry : ('a -> 'b -> 'c) -> 'a * 'b -> 'c |