Parent Directory | Revision Log | Patch
revision 1.5 by spiralvoice, Sun Oct 16 20:42:51 2005 UTC | revision 1.6 by spiralvoice, Tue Oct 18 20:52:08 2005 UTC | |
---|---|---|
# | Line 26 module G = Gui_global | Line 26 module G = Gui_global |
26 | open GuiProto | open GuiProto |
27 | ||
28 | let ko = 1024L | let ko = 1024L |
29 | let mo = ko ** ko | let mo = Int64.mul ko ko |
30 | ||
31 | let unit_of_string s = | let unit_of_string s = |
32 | match String.lowercase s with | match String.lowercase s with |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |