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

SCM Repository

[smlnj] Diff of /sml/trunk/src/eXene/examples/add/splash.sml
ViewVC logotype

Diff of /sml/trunk/src/eXene/examples/add/splash.sml

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1501, Mon May 31 20:21:41 2004 UTC revision 1502, Mon May 31 23:10:42 2004 UTC
# Line 8  Line 8 
8      local      local
9        open Geometry EXeneBase Drawing Widget        open Geometry EXeneBase Drawing Widget
10    
11          val min = Int.min
12          val max = Int.max
13    
14        fun bbox [] = RECT{x=0,y=0,wid=0,ht=0}        fun bbox [] = RECT{x=0,y=0,wid=0,ht=0}
15          | bbox (PT{x,y}::pts) = let          | bbox (PT{x,y}::pts) = let
16          fun bb (minx,miny,maxx,maxy,[]) =          fun bb (minx,miny,maxx,maxy,[]) =

Legend:
Removed from v.1501  
changed lines
  Added in v.1502

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