10

In Haskell it is easy to make an algebraic type/discriminated union "displayable" as a string by simply adding deriving Show to the type definition.

In F# I end up writing things like:

type Pos = 
    | Pos of int * int
    override this.ToString() = 
        match this with
        Pos(startp, endp) -> sprintf "Pos(%d, %d)" startp endp

and obviously it gets much worse with more complicated types.

Any way to get something like deriving Show in F#?

Keith Pinson
  • 7,162
  • 5
  • 54
  • 97
Miron Brezuleanu
  • 2,824
  • 2
  • 19
  • 31
  • Err, F# already does this for you automatically so you don't have to write `deriving Show`. – J D Dec 23 '10 at 17:52

1 Answers1

20

F# printing functions such as printf are able to format reasonably any data type if you use the %A format specifier (they use ToString if you specify %O). You can implement ToString using sprintf which returns the formatted string:

type Pos =  
    | Pos of int * int 
    override x.ToString() = sprintf "%A" x 

This prints for example "Pos (1, 2)" and it works for most of the F# types (lists, unions, records, tuples). It's a bit longer than just adding deriving Show but at least you don't have to implement the printing yourself.

Tomas Petricek
  • 225,798
  • 19
  • 345
  • 516