Sonarman has joined #ocaml
CosmicRay has joined #ocaml
Smerdyakov has joined #ocaml
CosmicRay has quit ["Leaving"]
CosmicRay has joined #ocaml
cjohnson has quit [""We live like penguins in the desert...""]
monochrom has quit ["me!"]
CosmicRay has quit ["Leaving"]
ulfdoz has joined #ocaml
Snark has joined #ocaml
ulfdoz_ has quit [Read error: 110 (Connection timed out)]
Snark has quit ["Leaving"]
__DL__ has joined #ocaml
mayhem has joined #ocaml
eyda|mon has joined #ocaml
<
eyda|mon>
I want to make a string of ints into a list of ints... strint = "123" -> [1;2;3]
<
eyda|mon>
this is what I've come up with
<
eyda|mon>
let rec makelist lst str pos =
<
eyda|mon>
let len = String.length str in
<
eyda|mon>
let chr = String.get str pos in
<
eyda|mon>
match pos with
<
eyda|mon>
len -> lst
<
eyda|mon>
| _ -> makelist ((int_of_char chr) :: lst) str (pos+1);;
<
eyda|mon>
which doesn't work
<
eyda|mon>
Warning: this match case is unused. is a warning I get
<
eyda|mon>
any hints? help?
<
Smerdyakov>
Any variable used in a pattern is a
_new_ variable and shadows any old variable of the same name.
<
Smerdyakov>
It does
_not_ express an equality constraint.
<
Sonarman>
Smerdyakov: someone in haskell just asked about TAL. thought you might want to know
<
Sonarman>
#haskell, even
<
eyda|mon>
Smerdyakov: so the thing really to do is to count down and match with 0 instead?
<
eyda|mon>
or what woudl you advise a beginner to do logically
<
Smerdyakov>
eyda|mon, you can use boolean tests, you know.
Sonarman has quit ["leaving"]
<
eyda|mon>
trying that now
<
eyda|mon>
let rec makelist lst str pos =
<
eyda|mon>
let len = String.length str in
<
eyda|mon>
let chr = String.get str pos in
<
eyda|mon>
if pos = (len - 1)
<
eyda|mon>
then lst
<
eyda|mon>
else makelist ((int_of_char chr) :: lst) str (pos+1);;
<
eyda|mon>
still something wrong tho :)
<
eyda|mon>
hm, got it, but it gives the list backwards :/
<
eyda|mon>
hould have seen that coming
eyda|mon has quit [Connection reset by peer]
pango_ has quit [Remote closed the connection]
Submarine has quit ["Leaving"]
solarwind has joined #ocaml
Amorphous has quit [Read error: 145 (Connection timed out)]
Amorphous has joined #ocaml
Herrchen has joined #ocaml
mayhem has quit ["My damn controlling terminal disappeared!"]
Submarine has joined #ocaml
ianxek has joined #ocaml
tintin has quit [Read error: 54 (Connection reset by peer)]
tintin has joined #ocaml
mlh has quit [Client Quit]
inka has joined #ocaml
inka has quit [Client Quit]
tintin has quit [Read error: 113 (No route to host)]
<
slashvar[lri]>
Hi there
tintin has joined #ocaml
derfvc has quit [Read error: 110 (Connection timed out)]
tintin has quit [Read error: 113 (No route to host)]
tintin` has joined #ocaml
tintin` is now known as tintin
tintin has quit [Read error: 104 (Connection reset by peer)]
tintin` has joined #ocaml
tintin` has quit [Client Quit]
tintin has joined #ocaml
kinners has joined #ocaml
vezenchio has joined #ocaml
gl` has quit [Read error: 60 (Operation timed out)]
kinners has quit ["leaving"]
gl` has joined #ocaml
vdrab has joined #ocaml
Snark has joined #ocaml
Submarine has quit [Remote closed the connection]
mlh has joined #ocaml
CosmicRay has joined #ocaml
er has joined #ocaml
vdrab has quit ["Leaving"]
mlh has quit [Client Quit]
Submarine has joined #ocaml
smimou has joined #ocaml
<
vodka-goo>
somebody knows how to hide the module Mutex (and Thread) with ocamldoc
<
vodka-goo>
-hide Mutex doesn't work ...
<
vodka-goo>
actually I rather need something like -thread to be given to ocamldoc, so that he knows what values exist
Submarine has quit ["Leaving"]
<
vodka-goo>
-I (ocamlc -where)/threads
<
vodka-goo>
that's it
<
er>
The virtual method bla cannot be hidden
<
er>
what does this error mean? i have a mutable val bla in a base class
<
er>
that i'm using from an inherited one.
Submarine has joined #ocaml
<
vodka-goo>
a val is not a method
<
vodka-goo>
you probably called sth#val
<
vodka-goo>
so ocaml thinks there should be a method val
<
vodka-goo>
since there isn't, it considers the class virtual
<
vodka-goo>
create an access method method val = val
<
vodka-goo>
that looks stupid, but that's it
<
vodka-goo>
instance variables are private
Snark has quit ["Leaving"]
Submarine has quit ["Leaving"]
pango has joined #ocaml
Submarine has joined #ocaml
Zaius has joined #ocaml
buggs has joined #ocaml
<
buggs>
how do i use gtk text tag events?
Smerdyakov has quit [Client Quit]
Smerdyakov has joined #ocaml
er has quit ["Leaving"]
pango has quit ["Leaving"]
slashvar[lri] has quit [sterling.freenode.net irc.freenode.net]
slashvar[lri] has joined #ocaml
ejt has joined #ocaml
mfurr has joined #ocaml
vicki has joined #ocaml
TeXitoi has joined #ocaml
<
buggs>
This expression has type 'a -> GdkEvent.any -> Gtk.text_iter -> bool
<
buggs>
but is here used with type
<
buggs>
origin:unit Gobject.obj -> GdkEvent.any -> Gtk.text_iter -> bool
<
buggs>
what does "origin:unit Gobject.obj" mean ?
<
Smerdyakov>
Labeled argument
<
mfurr>
ie: let f ~x () = x in f ~x:5
<
buggs>
ok now clicking on links in my browser works :)
<
buggs>
it is as far as fetching urls, and displaying them in half decent way (tables etc.)
<
buggs>
if anyone is interested
TeXitoi has quit ["leaving"]
mfurr has quit ["Client Exiting"]
maml has joined #ocaml
monochrom has joined #ocaml
TeXitoi has joined #ocaml
_JusSx_ has joined #ocaml
cjohnson has joined #ocaml
tintin has quit [Connection timed out]
Gueben has joined #ocaml
ejt has quit ["leaving"]
vicki has quit ["leaving"]
Submarine has quit ["Leaving"]
mfurr has joined #ocaml
TeXitoi has quit [Read error: 54 (Connection reset by peer)]
TeXitoi has joined #ocaml
CosmicRay has left #ocaml []
TeXitoi has quit [Read error: 104 (Connection reset by peer)]
__DL__ has quit [Read error: 54 (Connection reset by peer)]
TeXitoi has joined #ocaml
Hadaka has quit [Read error: 60 (Operation timed out)]
cjohnson has quit [""We live like penguins in the desert...""]
_JusSx_ has quit ["leaving"]
vezenchio has quit [""Under democracy one party always devotes its chief energies to trying to prove that the other party is unfit to rule—and both"]
Banana has quit [Read error: 60 (Operation timed out)]
Gueben has quit ["Leaving"]
cognominal has quit [Read error: 54 (Connection reset by peer)]
Banana has joined #ocaml
cognominal has joined #ocaml
smimou has quit ["?"]
ianxek has quit ["Leaving"]
cmeme has quit [Remote closed the connection]
cmeme has joined #ocaml
cmeme has quit [Remote closed the connection]
cmeme has joined #ocaml
bzzbzz has joined #ocaml
natv has joined #ocaml
mfurr has quit ["Client exiting"]
Naked has joined #ocaml
Naked is now known as Hadaka
monochrom has quit ["me!"]
mikeX has joined #ocaml
mlh has joined #ocaml
mikeX has quit ["Leaving"]
vodka-goo has quit []