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/benchmarks/programs/nucleic/main.sml
ViewVC logotype

View of /sml/trunk/benchmarks/programs/nucleic/main.sml

Parent Directory Parent Directory | Revision Log Revision Log


Revision 193 - (download) (annotate)
Fri Nov 20 17:43:59 1998 UTC (22 years, 8 months ago) by monnier
File size: 286 byte(s)
Initial revision
(* main.sml
 *
 * COPYRIGHT (c) 1996 AT&T Research.
 *)

structure Main : BMARK =
  struct
    val name = "Nucleic"
    fun doit () = (Nucleic.anticodon_length (); ())
    fun testit strm = TextIO.output(strm, concat[
	    Int.toString (Nucleic.anticodon_length ()), "\n"
	  ])
  end;


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