Parent Directory | Revision Log | Patch
revision 1.2 by simon_mld, Thu Nov 20 16:43:14 2003 UTC | revision 1.3 by spiralvoice, Tue Sep 6 11:24:59 2005 UTC | |
---|---|---|
# | Line 9 | Line 9 |
9 | let buf = Buffer.create 100 | let buf = Buffer.create 100 |
10 | ||
11 | let init_string () = | let init_string () = |
12 | Buffer.clear buf | Buffer.reset buf |
13 | let add_char c = | let add_char c = |
14 | Buffer.add_char buf c | Buffer.add_char buf c |
15 |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |