Home My Page Projects Code Snippets Project Openings SML/NJ
Summary Activity Forums Tracker Lists Tasks Docs Surveys News SCM Files

SCM Repository

[smlnj] View of /sml/trunk/src/compiler/MiscUtil/bignums/bigint.sig
ViewVC logotype

View of /sml/trunk/src/compiler/MiscUtil/bignums/bigint.sig

Parent Directory Parent Directory | Revision Log Revision Log


Revision 419 - (download) (as text) (annotate)
Fri Sep 3 23:51:27 1999 UTC (21 years, 1 month ago) by monnier
File size: 468 byte(s)
This commit was generated by cvs2svn to compensate for changes in r418,
which included commits to RCS files with non-trunk default branches.
(* Copyright 1989 by AT&T Bell Laboratories *)
signature BIGINT =
  sig type bigint			(* non-negative *)
      val bigint : int -> bigint
      val getbit : bigint * int -> bool  (* get the i'th bit; low-order
				            bit is numbered 0 *)
      val size : bigint -> int	(* size 0 = 0; size i = 1+floor(log2(i)) *)
      val + : bigint * bigint -> bigint
      val * : bigint * bigint -> bigint
      val >> : bigint * int -> bigint    (* shift right *)
  end


root@smlnj-gforge.cs.uchicago.edu
ViewVC Help
Powered by ViewVC 1.0.0