nakamura-to

import org.seasar.doma.Entity;
import org.seasar.doma.Id;

@Entity
public class Dept {

    @Id
    private Integer id;

    private String name;

nakamura-to

  var xhr = new Xhr({ 
    baseUrl: 'http://localhost:8080/api', 
    user: "",
    password: "",
    type: 'json', 
    preHandler: function () {}, 
    postHandler: function () {},
    errorHandler, function () {}
    headers: {},
    data: {},

nakamura-to

    public static class WebApiConfig
    {
        public static void Register(HttpConfiguration config)
        {
            config.Routes.MapHttpRoute(
                name: "DefaultApi",
                routeTemplate: "api/{controller}/{id}",
                defaults: new { id = RouteParameter.Optional }
            );

nakamura-to

using System.Diagnostics;
using System.IO;
using System.Text;
using Newtonsoft.Json;
using System;
using System.Collections.Generic;
using System.Net.Http;
using System.Threading.Tasks;

// see http://msdn.microsoft.com/library/windows/apps/hh761488.aspx

nakamura-to

  member this.SetupCommand (ps:PreparedStatement) (command:DbCommand) =
    command.CommandText <- ps.Text
    let dbParams =
      ps.Parameters
      |> List.map (fun param ->
        let dbParam = command.CreateParameter()
        dialect.SetupDbParameter(param, dbParam)
        dbParam )
      |> List.toArray
    command.Parameters.AddRange(dbParams)

nakamura-to

open System
open System.Collections.Generic
open System.Net
open System.Net.Http
open System.Web.Http
open System.Web.Http.Dispatcher
open System.Web.Http.SelfHost
open Microsoft.VisualStudio.TestTools.UnitTesting
open Newtonsoft.Json.Linq
open Newtonsoft.Json.Serialization

nakamura-to

  var _View = Backbone.View;
  Backbone.View = function () {
    logger.info('before');
    var init = this.initialize;
    if (init) {
      this.initialize = function () {
        logger.info('before initialize');
        init.call(this);
        logger.info('after initialize');
      }.bind(this);

nakamura-to

package tutorial.dao;

import java.lang.reflect.Field;
import java.lang.reflect.Method;

import org.seasar.doma.jdbc.Config;

public class DeleteDelegate {

    protected final Config config;

nakamura-to

// .01010101...

type Symbol =
  | None
  | Str of string
  | Num of int

type Op =
  | P of Symbol
  | R

nakamura-to

// .01000000...

type Symbol =
  | None
  | Str of string
  | Num of int
 
type Op =
  | P of Symbol
  | R