<Lob-Sogular>
can I nest try/with blocks that catch the same exception type? e.g.: try let n = String.index_from buf offset ' ' in; (* ... *) try x := !x lor (Hashtbl.find tbl wrd in); with Not_found -> ""; (* ... *) with Not_found -> "";;
<Smerdyakov>
Yup
<Lob-Sogular>
is there any syntactical sugar that is preferred (other than indentation) in such a situation?
<Smerdyakov>
I don't know. I've never seen it before.
<Lob-Sogular>
okay
<Lob-Sogular>
g99d enough for me
<Lob-Sogular>
y/9/o/
<dylan>
well
<dylan>
You need to use parens to distinguish in most cases.
<Lob-Sogular>
like: try ( ... try ( ) with Not_found -> ""; ) with Not_found -> "";
<Lob-Sogular>
?
<dylan>
more likre (try ... with Pattern -> (try ... with ... ))
<Lob-Sogular>
ok
<dylan>
err, only the inner parenthesis are required.
<Lob-Sogular>
that makes sense
<dylan>
I tend to find begin ... end pretty for this.
<dylan>
(and it's the only thing I use begin ... end for!)
<Lob-Sogular>
hehe
<dylan>
begin match ... with ... end
<Lob-Sogular>
that does look better than the parens (imo)
<Lob-Sogular>
(and by looks better, I mean easier to parse visually)
<dylan>
begin ... end looks bad with if ... else, though
<dylan>
usually, the "begin match ... with" is on one line, then all the patterns, and then 'end' on a line by itself, for me.
bzzbzz has joined #ocaml
<dylan>
humm. I found an elegant for use ocaml's OO.
shawn has joined #ocaml
khaladan has quit [Read error: 104 (Connection reset by peer)]
revision17_ has quit ["Ex-Chat"]
finelemo1 has joined #ocaml
chessguy has joined #ocaml
finelemon has quit [Read error: 110 (Connection timed out)]
prototype has joined #ocaml
Revision17 has joined #ocaml
<Lob-Sogular>
http://pastebin.com/699356 <-- I read in a 4751490 byte file, String.length buf says it's that size... it seems that String.index_from (line 12) won't report back any offset > 2^14 and throws a Not_found exception... am I doing something wrong?
khaladan has joined #ocaml
Submarine has joined #ocaml
prototype has quit [Read error: 110 (Connection timed out)]
sieni has quit [Read error: 110 (Connection timed out)]
Skal has joined #ocaml
love-pingoo has quit ["Connection reset by by pear"]
Snark has joined #ocaml
Submarine has quit ["Leaving"]
andreas_1 has quit []
khaladan_ has joined #ocaml
pango is now known as pangoafk
finelemo1 has quit [Remote closed the connection]
finelemon has joined #ocaml
pangoafk is now known as pango
khaladan has quit [Connection timed out]
khaladan_ is now known as khaladan
Amorphous has quit [Connection timed out]
andreas_1 has joined #ocaml
Amorphous has joined #ocaml
ski has quit [Read error: 104 (Connection reset by peer)]
ski_ has joined #ocaml
ski_ is now known as ski
love-pingoo has joined #ocaml
Amorphous has quit [Connection timed out]
Morphous has joined #ocaml
ski_ has joined #ocaml
andreas_1 has quit []
ski has quit [Nick collision from services.]
ski_ is now known as ski
revision17_ has joined #ocaml
slipstream-- has joined #ocaml
Revision17 has quit [Read error: 110 (Connection timed out)]
slipstream has quit [Read error: 110 (Connection timed out)]
slipstream has joined #ocaml
Morphous has quit [Connection timed out]
slipstream-- has quit [Connection timed out]
slipstream has quit [Read error: 110 (Connection timed out)]
Skal has quit [Remote closed the connection]
slipstream has joined #ocaml
Olathe has left #ocaml []
berke has quit ["Leaving"]
Amorphous has joined #ocaml
__DL__ has joined #ocaml
Boojum has joined #ocaml
Snark has quit [Read error: 110 (Connection timed out)]
Boojum is now known as Snark
Schmurtz has joined #ocaml
Schmurtz has quit [Read error: 110 (Connection timed out)]
Purice has joined #ocaml
Smerdyakov has joined #ocaml
Skal has joined #ocaml
prototype has joined #ocaml
love-pingoo has quit ["Leaving"]
prototype has quit [Read error: 110 (Connection timed out)]
khaladan has quit [Connection timed out]
khaladan has joined #ocaml
Schmurtz has joined #ocaml
Lycurgus_ is now known as JKnecht
bluestorm has joined #ocaml
pango is now known as pangoafk
chessguy has joined #ocaml
pangoafk is now known as pango
<dylan>
Kartoffeln!
<dylan>
err, wrong window.
ski has quit [Read error: 104 (Connection reset by peer)]
_JusSx_ has joined #ocaml
<Smerdyakov>
Now what was that code to get caml-mode to use non-minimal color syntax highlighting?
<Lob-Sogular>
http://pastebin.com/699356 <-- I read in a 4751490 byte file, String.length buf says it's that size... it seems that String.index_from (line 12) won't report back any offset > 2^14 and throws a Not_found exception... am I doing something wrong?
<bluestorm>
Smerdyakov,
<bluestorm>
(global-font-lock-mode t) ?
<flux__>
lob-sogular, windows?
<Lob-Sogular>
flux__: linux
<Smerdyakov>
bluestorm, no, caml-mode needs some additional prompting to get fancy.
<flux__>
ocaml strings are limited to 16 megabytes, I'm not aware of other limitations
<flux__>
hmm
<flux__>
ah
<flux__>
use Unix.read_really or something
<flux__>
normally you would be expected to call Unix.read multiple times
<Lob-Sogular>
oh ok
<flux__>
it won't read you very large blocks
<flux__>
(per normal unix semantics)
<bluestorm>
hum
<bluestorm>
sorry, i use tuareg so...
<Lob-Sogular>
flux__: thanks!
<flux__>
makes me wish I had bothered to look at the url earlier.. ;)
<flux__>
but maybe you could've found the problem yourself, too, but examining the return value of Unix.rea
<flux__>
d
<Lob-Sogular>
yeah. I was just thinking that.
<Lob-Sogular>
I think I checked everything else
<Lob-Sogular>
It just never occured to me that it might not actually read in as many bytes as I asked it to read
Purice has quit [Read error: 110 (Connection timed out)]
ski has joined #ocaml
Purice has joined #ocaml
ppsmimou has quit ["Leaving"]
ppsmimou has joined #ocaml
<pango>
Lob-Sogular: the semantics are the same as read (2)
<pango>
(even if internally ocaml converts everything to 16kB I/O :/ )
prototype has joined #ocaml
Schmurtz has quit ["Plouf !"]
<dylan>
hmm, anyone know of an example using OptParse from extlib?
<Lob-Sogular>
pango: any reason why ocaml uses 16kB I/O?
<pango>
I've read it's to give some chances for the GC to progress in the meanwhile...
<Lob-Sogular>
ah
<flux__>
how much larger blocks can you really read(2) in unix anyway?
<flux__>
well, I suppose it depends on the device.. do filesystem drivers usually support large blocks?
<flux__>
well, atleast my nfs gives atleast 14 megabyte blocks, so I guess that's not really an issue..
Snark has quit [Read error: 110 (Connection timed out)]
Snark has joined #ocaml
Submarine has joined #ocaml
smimou has joined #ocaml
shawn has quit ["This computer has gone to sleep"]
Snark has quit ["Leaving"]
ulfdoz has quit ["elendes gefrickel!"]
ulfdoz has joined #ocaml
_JusSx_ has quit ["leaving"]
Purice has quit [Read error: 104 (Connection reset by peer)]
ulfdoz has quit [Client Quit]
shawn has joined #ocaml
ulfdoz has joined #ocaml
chessguy has quit [Connection timed out]
prototype has quit [Read error: 110 (Connection timed out)]
ulfdoz has quit ["Reconnecting"]
ulfdoz has joined #ocaml
bluestorm has quit [Remote closed the connection]
Skal has quit [Remote closed the connection]
Schmurtz has joined #ocaml
chessguy has joined #ocaml
exa has joined #ocaml
<ulfdoz>
So'n Dinx wollte ich mir eigentlich auch zulegen.