adam@2050: fun api_1 (pb:postBody) (nm:string) : transaction page =
adam@2050: return Processing the request
adam@2050:
adam@2050: fun api (pb:postBody) (v:int) (nm:string) : transaction page =
adam@2050: case v of
adam@2050: 1 => api_1 pb nm
adam@2050: | _ => error Version {[v]} is not supported