Return to bigint.sig CVS log

Up to [Research Unix] / researchv10no / cmd / sml / src / bignums

Annotation of researchv10no/cmd/sml/src/bignums/bigint.sig, revision 1.1.1.1

1.1       root        1: (* Copyright 1989 by AT&T Bell Laboratories *)
                      2: signature BIGINT =
                      3:   sig type bigint                      (* non-negative *)
                      4:       val bigint : int -> bigint
                      5:       val getbit : bigint * int -> bool  (* get the i'th bit; low-order
                      6:                                            bit is numbered 0 *)
                      7:       val size : bigint -> int (* size 0 = 0; size i = 1+floor(log2(i)) *)
                      8:       val + : bigint * bigint -> bigint
                      9:       val * : bigint * bigint -> bigint
                     10:       val >> : bigint * int -> bigint    (* shift right *)
                     11:   end

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.