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 1910, Thu Mar 2 23:45:19 2006 UTC revision 1911, Fri Mar 3 03:33:16 2006 UTC
# Line 8  Line 8 
8      local      local
9        open Geometry EXeneBase Drawing Widget        open Geometry EXeneBase Drawing Widget
10    
       val min = Int.min  
       val max = Int.max  
   
11        fun bbox [] = RECT{x=0,y=0,wid=0,ht=0}        fun bbox [] = RECT{x=0,y=0,wid=0,ht=0}
12          | bbox (PT{x,y}::pts) = let          | bbox (PT{x,y}::pts) = let
13          fun bb (minx,miny,maxx,maxy,[]) =          fun bb (minx,miny,maxx,maxy,[]) =

Legend:
Removed from v.1910  
changed lines
  Added in v.1911

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