History

Shorten some type names

malc committed 5 years ago

Commit 19794691 parent a7a294f2 files · +7 −8Browse files

Unified · Split

2 files
  1. config.ml +4 −4
  2. genconfstruct.sh +3 −4
config.ml+4−4
@@ -36,7 +36,7 @@ and uri = string · 35 unmodified lines
36and caption = string36and caption = string
37and tilex = int37and tilex = int
38and tiley = int38and tiley = int
39and tileparams = (x * y * width * height * tilex * tiley)39and tileparams = (x * y * w * h * tilex * tiley)
40and under =40and under =
41 | Unone41 | Unone
42 | Ulinkuri of string42 | Ulinkuri of string
@@ -166,14 +166,14 @@ type page = · 123 unmodified lines
166type tile = opaque * pixmapsize * elapsed166type tile = opaque * pixmapsize * elapsed
167and elapsed = float167and elapsed = float
168and pagemapkey = pageno * gen168and pagemapkey = pageno * gen
169and tilemapkey = pageno * gen * colorspace * angle * width * height * col * row169and tilemapkey = pageno * gen * colorspace * angle * w * h * col * row
170and row = int170and row = int
171and col = int171and col = int
172and currently =172and currently =
173 | Idle173 | Idle
174 | Loading of (page * gen)174 | Loading of (page * gen)
175 | Tiling175 | Tiling
176 of (page * opaque * colorspace * angle * gen * col * row * width * height)176 of (page * opaque * colorspace * angle * gen * col * row * w * h)
177 | Outlining of outline list177 | Outlining of outline list
178and mpos = int * int178and mpos = int * int
179and mstate =179and mstate =
@@ -328,7 +328,7 @@ module S = struct · 148 unmodified lines
328 let layout : page list ref = ref []328 let layout : page list ref = ref []
329 let pagemap : (pagemapkey, opaque) Hashtbl.t = Hashtbl.create 0329 let pagemap : (pagemapkey, opaque) Hashtbl.t = Hashtbl.create 0
330 let tilemap : (tilemapkey, tile) Hashtbl.t = Hashtbl.create 0330 let tilemap : (tilemapkey, tile) Hashtbl.t = Hashtbl.create 0
331 let pdims : (pageno * width * height * leftx) list ref = ref []331 let pdims : (pageno * w * h * leftx) list ref = ref []
332 let pagecount = ref max_int332 let pagecount = ref max_int
333 let currently = ref Idle333 let currently = ref Idle
334 let mstate = ref Mnone334 let mstate = ref Mnone
genconfstruct.sh+3−4
@@ -25,13 +25,12 @@ and mark = · 24 unmodified lines
25and multicolumns = (multicol * pagegeom)25and multicolumns = (multicol * pagegeom)
26and singlecolumn = pagegeom26and singlecolumn = pagegeom
27and splitcolumns = (columncount * pagegeom)27and splitcolumns = (columncount * pagegeom)
28and pagegeom = (pdimno * x * y * (pageno * width * height * leftx)) array28and pagegeom = (pdimno * x * y * (pageno * w * h * leftx)) array
29and multicol = (columncount * covercount * covercount)29and multicol = (columncount * covercount * covercount)
30and columncount = int30and columncount = int
31and pdimno = int and pageno = int31and pdimno = int and pageno = int
32and x = int and y = int and leftx = int32and x = int and y = int and leftx = int and w = int and h = int
33and covercount = int33and covercount = int
34and width = int and height = int
35and memsize = int and texcount = int34and memsize = int and texcount = int
36and sliceheight = int35and sliceheight = int
37and zoom = float36and zoom = float
@@ -86,7 +85,7 @@ g trimfuzz irect "(0,0,0,0)" · 48 unmodified lines
86g memlimit memsize "128 lsl 20"85g memlimit memsize "128 lsl 20"
87g texcount texcount 25686g texcount texcount 256
88g sliceheight sliceheight 2487g sliceheight sliceheight 24
89g thumbw width 7688g thumbw w 76
90g bgcolor rgb "(0.5, 0.5, 0.5)"89g bgcolor rgb "(0.5, 0.5, 0.5)"
91g papercolor rgba "(1.0, 1.0, 1.0, 0.0)"90g papercolor rgba "(1.0, 1.0, 1.0, 0.0)"
92g sbarcolor rgba "(0.64, 0.64, 0.64, 0.7)"91g sbarcolor rgba "(0.64, 0.64, 0.64, 0.7)"

Keyboard shortcuts

General

Show keyboard shortcuts
?
Focus the current search
/

Issues and pull requests

Open filters
f

Issues, pull requests and Inbox

Select next item
j↓
Select previous item
k↑
Open selected item
Enter
Dismiss filters or clear selection
Esc

Repository code

Go to file
t