iporsut

Git คืออะไร

Git คือ โปรแกรมระบบจัดการโค้ดโปรแกรม (Source Code Management System - SCM) ซึ่งระบบ SCM ส่วนใหญ่แล้วมีหน้าทีคือ

• จัดเก็บโค้ด
• สามารถจัดเก็บโค้ดได้เป็น commit ย่อยๆ
• เมื่อมีข้อผิดพลาด สามารถถอยกลับไป commit ก่อนหน้าได้
• เมื่อทำงานร่วมกันหลายคน จะเก็บข้อมูลการแก้ไขเอาไว้ ว่าใครแก้อะไรตรงไหนไปบ้างแล้ว
• เมื่อทำงานหลายคน สามารถซิ้งค์โค้ดร่วมกันได้ โดยไม่ตรงกังวลว่าจะมีการเขียนไฟล์ทับกันแล้วข้อมูลหาย

ข้อดีของ Git ที่ต่างจากโปรแกรมอื่น

iporsut

module Main where

score xs = score' xs 0 0

score' _ acc 10 = acc
score' (10:b1:b2:xs) acc frame = score' (b1:b2:xs) (acc+10+b1+b2) (frame+1)
score' (r1:r2:b1:xs) acc frame | r1 + r2 == 10 = score' (b1:xs) (acc+10+b1) (frame+1)
score' (r1:r2:xs) acc frame = score' xs (acc+r1+r2) (frame+1)

main :: IO ()

iporsut

package main

import (
	"fmt"
)

func sum(nums []int) int {
	s := 0
	for _, n := range nums {
		s += n

iporsut

#!/usr/bin/env stack
-- stack --resolver lts-9.12 script --package http-conduit,stm,bytestring
{-# LANGUAGE OverloadedStrings #-}
module Main where

import qualified Data.ByteString.Lazy.Char8 as L8
import           Control.Concurrent
import           Control.Monad
import           Control.Concurrent.STM
import           Network.HTTP.Simple

iporsut

#!/usr/bin/env ruby

# WARNING! Everything described in this file was checked against
# Net::SSH v3.2.0, https://github.com/net-ssh/net-ssh/tree/v3.2.0
# (commit e279c5e). Other versions may be apropriately different.
# Some of the things here appear to dig into the Net::SSH internals a
# little more than may be comfortable for some.
#
require 'net/ssh'

iporsut

#!/usr/bin/env stack
-- stack script --resolver lts-8.20 --package time,haskeline
module Main where

import Control.Monad.IO.Class
import Control.Monad
import Control.Exception
import System.Console.Haskeline
import Data.Time
import Data.Maybe

iporsut

iporsut

package main

import (
	"fmt"
	"log"
	"os"
	"time"
)

func export(i int) {

iporsut

#!/usr/bin/env bash
go get -u github.com/alecthomas/gometalinter
go get -u github.com/haya14busa/go-typeconv/cmd/gotypeconv
go get -u github.com/haya14busa/gosum/cmd/gosumcheck
go get -u github.com/haya14busa/goverage
go get -u github.com/motemen/gofind/cmd/gofind
go get -u github.com/nsf/gocode
go get -u github.com/rogpeppe/godef
go get -u github.com/sqs/goreturns
go get -u github.com/zmb3/gogetdoc

iporsut

(defn map-flatten
  ([params]
   (into {} (map-flatten params nil)))
  ([params prefix]
   (mapcat (fn [[k v]]
             (let [prefix (if (nil? prefix) (name k) (str prefix "[" (name k) "]"))]
               (if (map? v)
                 (map-flatten v prefix)
                 [{prefix v}])))
           params)))