<Deknos>
but the hboyer function does not return a right value, and i don't get the point why.
<Deknos>
the only other thing is, that my algorithm in ocaml stops, when j got <0
<Deknos>
Has anyone a idea?
<Deknos>
or is there an explicit break-directive for the imperative part of ocaml=
<Deknos>
?
<Deknos>
oh, i forgot. the my hboyer function which does not work is the equivilant to the void BM C-function
SpookRijder has joined #ocaml
<Kinners>
Deknos: you can use exceptions as a break mechanism
<Deknos>
i thought about that too, but i want, that my function return an integer value, when a exception is thrown in the imperative part, is this still possible?
vezenchio has joined #ocaml
<Kinners>
sure, just catch outside of the while loop
<Deknos>
hm, i think, i take a look on exceptions :>
<Kinners>
you can use 'raise Exit'
Kinners has quit ["leaving"]
smklsmkl has joined #ocaml
smkl has quit [Read error: 110 (Connection timed out)]
_jpl_ has quit [Read error: 60 (Operation timed out)]
<Deknos>
hm, raise Exit? i just type this direction in the loop, and he leaves the while block?
Shammah has joined #ocaml
<Deknos>
he still does not like something about my if clause
<Deknos>
is this expression really valid? if(!j<0) then raise Exit; else dosomething();
<karryall>
fg
<karryall>
er
<karryall>
yes it's valid
<karryall>
except I would write it as
<karryall>
if !j<0 then raise Exit else dosomething ()
smklsmkl has quit [Read error: 110 (Connection timed out)]
<Deknos>
ups i got point :D
<Deknos>
but still with "then" he complains :(
vegai has quit ["Terminated with extreme prejudice - dircproxy 1.1.0"]
Pilot0541 has joined #ocaml
Pilot0541 has quit [Client Quit]
_JusSx_ has joined #ocaml
SpookRijder has quit ["Client Exiting"]
smklsmkl has joined #ocaml
<_JusSx_>
e tu a che ora sei andata a letto?
smimou has quit ["?"]
m[kel[ has quit [Read error: 110 (Connection timed out)]
<Deknos>
how have i apply raise Exit? when it's only in the whileloop, it returns pervasive.exit
<Deknos>
so, i want to say, how do i catch this raise exit outside the loop?
_JusSx_ has quit [zelazny.freenode.net irc.freenode.net]
cjohnson has quit [zelazny.freenode.net irc.freenode.net]
buggs has quit [zelazny.freenode.net irc.freenode.net]
mattam has quit [zelazny.freenode.net irc.freenode.net]
_JusSx_ has joined #ocaml
buggs has joined #ocaml
cjohnson has joined #ocaml
mattam has joined #ocaml
<Deknos>
how can i catch the raise Exit, which is in the loop, outside the loop?
Tram has quit [Remote closed the connection]
<_fab>
Deknos: try ... with ...
<_fab>
for example "try do_loop () with Exit -> somevalue"
<Deknos>
thank you, _fab
<Deknos>
does this work, too, when the whileloop ist in a begin end context?
<Deknos>
the return still is pervasives.exit =)
kosmikus is now known as kosmikus|away
m[kel[ has joined #ocaml
tea has joined #ocaml
tea has quit ["using sirc version 2.211+KSIRC/1.3.10"]
smklsmkl has quit [Read error: 110 (Connection timed out)]
<Deknos>
it works!
Deknos has quit ["Leaving"]
cjohnson has quit ["Drawn beyond the lines of reason"]
cjohnson has joined #ocaml
mads- has joined #ocaml
<mads->
hi
tea has joined #ocaml
Dybbuk has quit [Remote closed the connection]
Dybbuk has joined #ocaml
zno has joined #ocaml
zno has quit [Remote closed the connection]
<Lemmih>
Hey mads-.
<Lemmih>
Anyone had any luck installing mod_caml?
<malte>
let foo = "hej" in Printf.printf foo ;; <- why isnt this valid?
<gl>
# Printf.printf;;
<gl>
- : ('a, out_channel, unit) format -> 'a = <fun>
<malte>
# Printf.printf "hej" ;;
<malte>
hej- : unit = ()
<malte>
^-- this however works
<gl>
foo's type is 'string'
<malte>
isnt "hej"'s type 'string' too?
<gl>
well, printf is quite ... obscure
<malte>
heh
<gl>
printf is an ugly hack
<malte>
what should one use instead?
<gl>
print_string ?
<gl>
if you don't use format, printf is not adequate
<malte>
no, of course.. thx
<_fab>
Lemmih: no, i had a segfault, too
<Lemmih>
Damn /-:
<mads->
Is mod_ocaml just impossilble to get working...?
<_fab>
i tried apache 2 and apache 1.3, compiled everything from sources (including ocaml), and used the debian packages... always the same error, gdb shows it is somewhere in pcre while segfaulting
<_fab>
does anyone know if there are plans to integrate scaml into ocaml at some point?
<malte>
let's hope so. xavier doesnt seem to like contributions to the core though :(
noss has joined #ocaml
buggs has quit [zelazny.freenode.net irc.freenode.net]
mattam has quit [zelazny.freenode.net irc.freenode.net]
_JusSx_ has quit [zelazny.freenode.net irc.freenode.net]
_JusSx_ has joined #ocaml
buggs has joined #ocaml
mattam has joined #ocaml
Shammah has quit [Read error: 60 (Operation timed out)]
<bk_>
let foo = "hej" in Printf.printf "%s" foo ;;
<mellum>
Jeez, the compiler is stupid. It doesn't even optimize let f () = let a, b = 1, 2 in a + b;;
bk_ has quit ["I'll be back"]
karryall has quit ["go"]
noss has quit [Read error: 60 (Operation timed out)]
juergen has quit ["Leaving"]
mattam has quit [Connection timed out]
mads- has left #ocaml []
<malte>
hm, has anyone here succesfully compiled missinglib? i get: "Cannot find file oUnit.cmxa" when doing the make test
_JusSx_ has quit ["No windows for this server"]
kwmarc has joined #ocaml
<kwmarc>
hello
buggs^z has joined #ocaml
yella has joined #ocaml
<Lemmih>
Yay I installed mod_caml with Apache 1.3
<_fab>
Lemmih: what did you change?
<Lemmih>
Downgraded Apache from 2 to 1.3/
<_fab>
hhm, it didnt work for me
<Lemmih>
Had some problems with the configuration afterwards (it would try to download the .cmo instead of handling it with mod_caml) but I fixed that too.
<Lemmih>
You get the same error with Apache 1.3 as with Apache 2?
<_fab>
i tried it a while ago with apache 2 and apache 1.3
<_fab>
i thought it was the same error, but maybe i am wrong
<_fab>
it was a segfault, but maybe another cause
buggs has quit [Connection timed out]
Kinners has joined #ocaml
reltuk has joined #ocaml
karryall has joined #ocaml
phubuh has quit [Read error: 54 (Connection reset by peer)]
maihem has joined #ocaml
monotonom has joined #ocaml
Vekza has quit ["Leaving"]
Kinners has quit ["leaving"]
noss has joined #ocaml
key2 has quit [Read error: 104 (Connection reset by peer)]
farizeo has joined #ocaml
fariseo has quit [Read error: 110 (Connection timed out)]
maihem has quit [Remote closed the connection]
maihem has joined #ocaml
maihem has quit [Client Quit]
cjohnson has quit [Read error: 104 (Connection reset by peer)]
cjohnson has joined #ocaml
det has joined #ocaml
bk_ has joined #ocaml
cjohnson has quit [Remote closed the connection]
cjohnson has joined #ocaml
mattam has joined #ocaml
noss has quit [Client Quit]
Shammah has joined #ocaml
kwmarc has quit [Read error: 113 (No route to host)]
Nate75Sanders has joined #ocaml
monotonom has quit ["Don't talk to those who talk to themselves."]