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/lib/window/display.sml
ViewVC logotype

Diff of /sml/trunk/src/eXene/lib/window/display.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 178  Line 178 
178    
179      fun displayOfScr (SCREEN{dpy, ...}) = dpy      fun displayOfScr (SCREEN{dpy, ...}) = dpy
180    
181        (* Additions by ddeboer, May 2004.
182         * Dusty deBoer, KSU CIS 705, Spring 2004. *)
183    
184        (* return the root window of a screen.
185         * needed in obtaining strings from xrdb, as they are stored in a
186         * property of the root window.
187         *)
188        fun rootWinOfScr (SCREEN{scr=SCR{xscr=XSCR{root, ... } , ...}, ...}) = root
189    
190        (* end additions by ddeboer *)
191    
192      fun sizeOfScr (SCREEN{scr=SCR{xscr=XSCR{sz_in_pixels, ...}, ...}, ...}) =      fun sizeOfScr (SCREEN{scr=SCR{xscr=XSCR{sz_in_pixels, ...}, ...}, ...}) =
193            sz_in_pixels            sz_in_pixels
194      fun sizeMMOfScr (SCREEN{scr=SCR{xscr=XSCR{sz_in_mm, ...}, ...}, ...}) = sz_in_mm      fun sizeMMOfScr (SCREEN{scr=SCR{xscr=XSCR{sz_in_mm, ...}, ...}, ...}) = sz_in_mm

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