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/eXene/widgets/util/3d-sig.sml
ViewVC logotype

View of /sml/trunk/src/eXene/widgets/util/3d-sig.sml

Parent Directory Parent Directory | Revision Log Revision Log


Revision 2 - (download) (annotate)
Sat Oct 4 23:33:09 1997 UTC (23 years, 10 months ago) by monnier
File size: 1524 byte(s)
Initial revision
(* 3d-sig.sml
 *
 * COPYRIGHT (c) 1994 AT&T Bell Laboratories.
 *)

signature THREE_D =
  sig
    structure G : GEOMETRY
    structure D : DRAWING

    datatype relief = Flat | Raised | Sunken | Groove | Ridge
        
    val drawRect : D.drawable ->
          {rect : G.rect, width : int, relief : relief} ->
          WidgetBase.shades -> unit

    val drawFilledRect : D.drawable ->
          {rect : G.rect, width : int, relief : relief} ->
          WidgetBase.shades -> unit

    val drawRoundRect : D.drawable ->
          {rect : G.rect, width : int, c_wid : int, c_ht : int, relief : relief} ->
          WidgetBase.shades  -> unit

    val drawPoly : D.drawable ->
          {pts : G.point list, width : int, relief : relief} ->
          WidgetBase.shades  -> unit

    val draw3DRect : D.drawable -> (G.rect * int) -> 
          {top : D.pen, bottom : D.pen} -> unit

    val draw3DRect2 : D.drawable -> (G.rect * int) -> 
          {top : D.pen, bottom : D.pen} -> unit

    val draw3DPoly : D.drawable -> (G.point list * int) -> 
          {top : D.pen, bottom : D.pen} -> unit

    val draw3DPoly2 : D.drawable -> (G.point list * int) -> 
          {top : D.pen, bottom : D.pen} -> unit

    val draw3DRoundRect : D.drawable ->
          {rect : G.rect, width : int, c_wid : int, c_ht : int} ->
          {top : D.pen, bottom : D.pen} -> unit

    val draw3DRoundRect2 : D.drawable ->
          {rect : G.rect, width : int, c_wid : int, c_ht : int} ->
          {top : D.pen, bottom : D.pen} -> unit

  end


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