Reversing RELEASE_NOTES.md

Reversing RELEASE_NOTES.md Very ugly version hacked together in a minute

 1: 
 2: 
 3: 
 4: 
 5: 
 6: 
 7: 
 8: 
 9: 
10: 
11: 
12:

open System.IO

let temp = ResizeArray()
[ for line in File.ReadLines "RELEASE_NOTES.md"  do
    if line.StartsWith("#") then
        yield List.ofSeq temp
        temp.Clear()
    temp.Add line
  yield List.ofSeq temp ]
|> List.rev
|> List.collect id
|> fun lines -> File.WriteAllLines("RELEASE_NOTES.md", lines)

namespace System

namespace System.IO

val temp : System.Collections.Generic.List<string>

Full name: Script.temp

type ResizeArray<'T> = System.Collections.Generic.List<'T>

Full name: Microsoft.FSharp.Collections.ResizeArray<_>

val line : string

type File =
  static member AppendAllLines : path:string * contents:IEnumerable<string> -> unit + 1 overload
  static member AppendAllText : path:string * contents:string -> unit + 1 overload
  static member AppendText : path:string -> StreamWriter
  static member Copy : sourceFileName:string * destFileName:string -> unit + 1 overload
  static member Create : path:string -> FileStream + 3 overloads
  static member CreateText : path:string -> StreamWriter
  static member Decrypt : path:string -> unit
  static member Delete : path:string -> unit
  static member Encrypt : path:string -> unit
  static member Exists : path:string -> bool
  ...

Full name: System.IO.File

File.ReadLines(path: string) : System.Collections.Generic.IEnumerable<string>
File.ReadLines(path: string, encoding: System.Text.Encoding) : System.Collections.Generic.IEnumerable<string>

System.String.StartsWith(value: string) : bool
System.String.StartsWith(value: string, comparisonType: System.StringComparison) : bool
System.String.StartsWith(value: string, ignoreCase: bool, culture: System.Globalization.CultureInfo) : bool

Multiple items
module List

from Microsoft.FSharp.Collections

--------------------
type List<'T> =
  | ( [] )
  | ( :: ) of Head: 'T * Tail: 'T list
  interface IEnumerable
  interface IEnumerable<'T>
  member Head : 'T
  member IsEmpty : bool
  member Item : index:int -> 'T with get
  member Length : int
  member Tail : 'T list
  static member Cons : head:'T * tail:'T list -> 'T list
  static member Empty : 'T list

Full name: Microsoft.FSharp.Collections.List<_>

val ofSeq : source:seq<'T> -> 'T list

Full name: Microsoft.FSharp.Collections.List.ofSeq

System.Collections.Generic.List.Clear() : unit

System.Collections.Generic.List.Add(item: string) : unit

val rev : list:'T list -> 'T list

Full name: Microsoft.FSharp.Collections.List.rev

val collect : mapping:('T -> 'U list) -> list:'T list -> 'U list

Full name: Microsoft.FSharp.Collections.List.collect

val id : x:'T -> 'T

Full name: Microsoft.FSharp.Core.Operators.id

val lines : string list

File.WriteAllLines(path: string, contents: System.Collections.Generic.IEnumerable<string>) : unit
File.WriteAllLines(path: string, contents: string []) : unit
File.WriteAllLines(path: string, contents: System.Collections.Generic.IEnumerable<string>, encoding: System.Text.Encoding) : unit
File.WriteAllLines(path: string, contents: string [], encoding: System.Text.Encoding) : unit

Raw view Test code New version

More information

Link:	http://fssnip.net/oe
Posted:	9 years ago
Author:	Gustavo Guerra
Tags:	release_notes