_zack has quit ["Leaving."]
Amorphous has quit [Read error: 110 (Connection timed out)]
sramsay has quit ["Leaving"]
Amorphous has joined #ocaml
bluestorm has quit [Remote closed the connection]
verte has joined #ocaml
ulfdoz_ has joined #ocaml
ulfdoz has quit [Read error: 60 (Operation timed out)]
ulfdoz_ is now known as ulfdoz
seafood has joined #ocaml
crawshaw has joined #ocaml
crawshaw has quit []
Alpounet has quit [hubbard.freenode.net irc.freenode.net]
maskd has quit [hubbard.freenode.net irc.freenode.net]
poucet has quit [hubbard.freenode.net irc.freenode.net]
deavid has quit [hubbard.freenode.net irc.freenode.net]
lanaer has quit [hubbard.freenode.net irc.freenode.net]
anders^^ has quit [hubbard.freenode.net irc.freenode.net]
nimred has quit [hubbard.freenode.net irc.freenode.net]
holmak has joined #ocaml
holmak_ has joined #ocaml
holmak__ has joined #ocaml
holmak has quit [Read error: 60 (Operation timed out)]
holmak__ is now known as holmak
holmak_ has quit [Read error: 60 (Operation timed out)]
Associat0r has quit []
Alpounet has joined #ocaml
deavid has joined #ocaml
lanaer has joined #ocaml
maskd has joined #ocaml
poucet has joined #ocaml
nimred has joined #ocaml
anders^^ has joined #ocaml
holmak has quit ["Leaving"]
seafood has quit []
seafood has joined #ocaml
Lomono has joined #ocaml
bluestorm has joined #ocaml
marteo has joined #ocaml
Lomono has quit ["Don't even think about saying Candlejack or else you wi"]
angerman has joined #ocaml
nego has joined #ocaml
holgr_ has joined #ocaml
holgr has quit [Read error: 110 (Connection timed out)]
sramsay has joined #ocaml
DeGT has joined #ocaml
<
DeGT>
I have a problem with a function returning itself partially applied.
<
DeGT>
I want to do something like let rec bar state word = let _ = print_endline (word^(string_of_int state)) in bar
<
DeGT>
I already found out that I seem to need a recursive type for it.
<
DeGT>
Now I have: type foo = Foo of (string -> foo);;
crawshaw has joined #ocaml
<
DeGT>
let rec bar state word = let _ = print_endline (word^(string_of_int state)) in Foo(bar (1+state));;
<
bluestorm>
let rec bar state = Foo (fun word -> let _ = print_endline (word^(string_of_int state)) in bar (1+state));;
<
bluestorm>
let rec bar state = Foo (fun word -> print_endline (word ^ string_of_int state); bar (1+state));;
malc_ has joined #ocaml
bluestorm has quit ["Leaving"]
<
DeGT>
bluestorm: I'm fairly new to ocaml, if I understand that code correct, I get a Foo out of it.
<
DeGT>
It seems like the function is inside a Foo and I want to get that function.
crawshaw has quit []
hkBst has joined #ocaml
<
DeGT>
This works: let Foo(fun1) = bar 4 "hello" in fun1 "test";;
<
DeGT>
But the way to get fun1 seems to be a bit clumsy.
<
flx_>
you can write a function to do that
<
flx_>
for example resulting in apply (bar 4 "hello") "test" ?
<
DeGT>
I think I can live with it.
malc__ has joined #ocaml
malc_ has quit [Read error: 110 (Connection timed out)]
_zack has joined #ocaml
malc__ has quit [Read error: 60 (Operation timed out)]
verte_ has joined #ocaml
verte has quit [Nick collision from services.]
verte_ is now known as verte
ulfdoz has quit [Read error: 110 (Connection timed out)]
bluestorm has joined #ocaml
malc_ has joined #ocaml
M| has quit [Read error: 104 (Connection reset by peer)]
sramsay has quit [Remote closed the connection]
M| has joined #ocaml
bluestorm has quit ["Leaving"]
DeGT has quit [Read error: 110 (Connection timed out)]
seafood has quit []
oriba has joined #ocaml
oriba has left #ocaml []
malc_ has quit [Read error: 110 (Connection timed out)]
malc_ has joined #ocaml
verte has quit ["~~~ Crash in JIT!"]
Ched has joined #ocaml
malc__ has joined #ocaml
Ched has quit [Read error: 60 (Operation timed out)]
M| has quit [Remote closed the connection]
malc_ has quit [Read error: 110 (Connection timed out)]
Associat0r has joined #ocaml
ccasin has joined #ocaml
Associat0r has quit [Client Quit]
bluestorm has joined #ocaml
M| has joined #ocaml
bluestorm has quit [Remote closed the connection]
Yoric[DT] has joined #ocaml
slash_ has joined #ocaml
<
yziquel>
Camarade_Tux: This is why I hate swig sometimes...
<
yziquel>
Camarade_Tux: going through this just to wrap std::list<int> to int list is just crazy...
<
Camarade_Tux>
yziquel: definitely
* Camarade_Tux
's head aches
<
Camarade_Tux>
on the other hand, you have a nice template there so it actually generates more code than you see
marteo has quit [Read error: 110 (Connection timed out)]
marteo has joined #ocaml
oriba has joined #ocaml
Ched has joined #ocaml
Ched has quit [Read error: 110 (Connection timed out)]
oriba has quit ["Verlassend"]
malc_ has joined #ocaml
tomaw has quit [Remote closed the connection]
tomaw has joined #ocaml
malc__ has quit [Read error: 110 (Connection timed out)]
_zack has quit ["Leaving."]
malc_ has quit [Read error: 110 (Connection timed out)]
_zack has joined #ocaml
Smerdyakov has joined #ocaml
smimou has joined #ocaml
_zack has quit [Read error: 113 (No route to host)]
ulfdoz has joined #ocaml
Smerdyakov has quit ["Leaving"]
Yoric[DT] has quit ["Ex-Chat"]
_zack has joined #ocaml
_zack has quit [Client Quit]
ccasin has quit ["Leaving"]
Alpounet has quit [Remote closed the connection]
smimou has quit ["bli"]
caoliver has joined #ocaml
caoliver has left #ocaml []
Associat0r has joined #ocaml
marteo has quit ["Debian GNU/Hurd is Good."]
erickt1 has joined #ocaml
hkBst has quit [Read error: 104 (Connection reset by peer)]
Associat0r has quit []
slash_ has quit [Client Quit]
angerman has quit []