小编Joh*_*tin的帖子

我开始学习标准ML与编程语言课程.

在第一个作业中,我尝试编写一个函数is_older,它接受两个日期并评估为true或false.它计算true第一个参数是否是第二个参数之前的日期(如果两个日期相同,则结果为false.).

所以我写下面的代码:

fun is_older(first: int * int * int, second: int * int * int) =
  if(#1 first = #1 second andalso #2 first = #2 second andalso #3 first = #3 second) then false
  else if (#1 first < #1 second) then true
  else if (#1 first = #1 second andalso #2 first < #2 second) then true
  else if (#1 first = #1 second andalso …

我正在尝试学习ocaml,我想从网络摄像头获取图像.我在OCaml中阅读Unix系统编程

如何在linux操作系统上从我的网络摄像头获取图片？

我有一个远程 Erlang 节点和本地开发人员的 PC。我想启动本地节点debug@127.0.0.1，启动观察者，调用c:nl/1和其他调试操作。我写了这个：

   #!/bin/sh
   export ERL_EPMD_PORT=43690
   PORT=`ssh -l user target -p 5022 "/usr/bin/epmd -names" | awk '$2 == "target-node" {print $5}'`
   pkill -f ssh.*-fxN.*target
   ssh -fxNL 43690:`hostname`:4369 target -p 5022 -l user
   ssh -fxNL $PORT:`hostname`:$PORT target -p 5022 -l user
   ssh -fxNR 9001:`hostname`:9001 target -p 5022 -l user
   erl -name dev@127.0.0.1 -setcookie ABCDEFFJKGSK \
   -kernel inet_dist_listen_min 9001 inet_dist_listen_max 9001 \
   -eval "net_adm:ping('nodename@target')."
   pkill -f ssh.*-fxN.*target

但是当我运行这个脚本时，我收到如下消息：

绑定：地址已在使用中 错误的本地转发规范 ':debian:' Erlang/OTP 17 [erts-6.1] [源] [64 位] …

我开始学习Erlang了.我想编写简单的基于牛仔的HTTP服务器,它可以接收通过HTTP POST发送的文件.所以我创建简单的处理程序

-module(handler).
-behaviour(cowboy_http_handler).
-export([init/3,handle/2,terminate/3]).

init({tcp, http}, Req, _Opts) ->
  {ok, Req, undefined_state}.

handle(Req, State) ->
  Body = <<"<h1>Test</h1>">>,
  {ok, Req2} = cowboy_req:reply(200, [], Body, Req),
  {ok, Req2, State}.

terminate(_Reason, _Req, _State) ->
  ok.

此代码可以处理GET请求.但是我如何处理HTTP POST请求？

I'm trying to compile simple example:

open Microsoft.FSharp.Data

type Simple = JsonProvider<""" { "name":"John", "age":94 } """>
let simple = Simple.Parse(""" { "name":"Tomas", "age":4 } """)
simple.Age
simple.Name

I use MSVS 2010, .Net Framework 4.5.1 and FSharp.Data via nuget. But when I try to compile this example, I get error:

This token (<""", """>, (""") and """)) is reserved for future use.

How can I use F# Json Type Provider?