F # 코드 인용구의 파일 및 줄 번호

Question

인용 부호에서 파일 이름과 줄 번호를 추출하여 인용 부호의 변형에 대한 디버그 정보를 추가 할 수있는 방법이 있습니까? 다른 방법으로? 이 같은

Answer 1

시도 뭔가 :이 지금 F 번호에 내장되어

let sourceInfo (e:Quotations.Expr) = 
    let (|Val|_|) e : 't option = 
     match e with 
     | Quotations.Patterns.Value(:? 't as v,_) -> Some v 
     | _ -> None 
    let (|Tup|_|) = Quotations.Patterns.(|NewTuple|_|) 

    e.CustomAttributes 
    |> List.tryPick (function | Tup [Val("DebugRange") 
            Tup [Val(file:string) 
              Val(startLine:int) 
              Val(startCol:int) 
              Val(endLine:int) 
              Val(endCol:int)]] 
            -> Some(file,startLine,startCol,endLine,endCol) 
           | _ -> None) 

sourceInfo <@ "test" @> 

Answer 2

https://msdn.microsoft.com/en-us/library/dd233234.aspx

__LINE__ 
__SOURCE_DIRECTORY__ 
__SOURCE_FILE__