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 /tests/trunk/bugs/tests.obsolete/bug1553.1.sml
ViewVC logotype

View of /tests/trunk/bugs/tests.obsolete/bug1553.1.sml

Parent Directory Parent Directory | Revision Log Revision Log


Revision 2460 - (download) (annotate)
Sat Apr 28 20:18:10 2007 UTC (12 years, 2 months ago) by gkuan
File size: 632 byte(s)
(* bug1553.1.sml *)

signature S =
sig
  type flags
  val toWord : flags -> Word32.word
  val fromWord : Word32.word -> flags
  val flags : flags list -> flags
  val allSet : flags * flags -> bool
  val anySet : flags * flags -> bool
  type mode = flags
  val irwxu : mode
  val irusr : mode
  val iwusr : mode
  val ixusr : mode
  val irwxg : mode
  val irgrp : mode
  val iwgrp : mode
  val ixgrp : mode
  val irwxo : mode
  val iroth : mode
  val iwoth : mode
  val ixoth : mode
  val isuid : mode
  val isgid : mode
  (**** Comment out the following line to obtain a compilation.  bug BUG ****)
  sharing type flags = mode
end;

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