Skip to content

Instantly share code, notes, and snippets.

View yamanetoshi's full-sized avatar

YAMANE Toshiaki yamanetoshi

View GitHub Profile
@yamanetoshi
yamanetoshi / env.scm
Created November 14, 2013 23:24
EoPL Ex.2.20
(add-load-path "../../define-datatype")
(load "define-datatype")
(define-datatype environment environment?
(empty-env-record)
(extended-env-record
(syms (list-of symbol?))
(vals (list-of scheme-value?))
(env environment?)))
@yamanetoshi
yamanetoshi / gist:7476266
Created November 14, 2013 23:25
EoPL Ex.2.20
(use gauche.test)
(add-load-path ".")
(load "env")
(test-start "env")
(test-section "environment-to-list")
(test* "example"
'(extended-env-record (d x) (6 7)
(extended-env-record (y) (8)
@yamanetoshi
yamanetoshi / env.scm
Created November 17, 2013 23:27
EoPL Ex.2.22
(add-load-path "../../define-datatype")
(load "define-datatype")
(define-datatype environment environment?
(empty-env-record)
(extended-env-record
(syms (list-of symbol?))
(vals vector?)
(env environment?)))
@yamanetoshi
yamanetoshi / test-env.scm
Created November 17, 2013 23:28
EoPL Ex.2.22
(use gauche.test)
(add-load-path ".")
(load "env")
(test-start "env")
(test-section "environment-to-list")
(test* "example"
'(extended-env-record (d x) (6 7)
(extended-env-record (y) (8)
@yamanetoshi
yamanetoshi / MainActivity.java
Last active December 28, 2015 15:49
Input and output of a numeric value with commas
package com.example.layouttest;
import java.text.DecimalFormat;
import java.text.NumberFormat;
import java.text.ParseException;
import android.os.Bundle;
import android.app.Activity;
import android.view.KeyEvent;
@yamanetoshi
yamanetoshi / deployVM.rb
Created November 19, 2013 00:01
deploy virtual resourcel (Fog - Cloudstack)
# -*- coding: euc-jp -*-
$:.unshift File.dirname(__FILE__)
require 'rubygems'
require 'fog'
require 'pp'
require 'access_key'
# create a compute connection
@yamanetoshi
yamanetoshi / gist:10235370
Last active August 29, 2015 13:58
Custom DialogFragment in Preferences
public static class MyPasswordInputDialog extends DialogFragment {
private SharedPreferences mPref;
private EditText mPasswd1;
private EditText mPasswd2;
@Override
public Dialog onCreateDialog(Bundle savedInstanceState) {
mPref = PreferenceManager.getDefaultSharedPreferences(MyPasswordInputDialog.this.getActivity());
AlertDialog.Builder builder = new AlertDialog.Builder(getActivity());
@yamanetoshi
yamanetoshi / gist:10247722
Last active August 29, 2015 13:58
Rakefile of FirstStepReVIEW
require 'fileutils'
require 'rake/clean'
def use_bundler()
if system("bundle > /dev/null 2>&1")
"bundle exec "
else
""
end
end
# Makefile - build script */
# build environment
PREFIX ?= /usr/local/cross/rpi/arm-unknown-eabi
ARMGNU ?= $(PREFIX)/bin/arm-unknown-eabi
# source files
SOURCES_ASM := $(wildcard *.S)
SOURCES_C := $(wildcard *.c)
@yamanetoshi
yamanetoshi / gist:11032608
Created April 18, 2014 08:55
Mock of Fog::Compute[:cloudstack] | extract template requests
class Mock
def extract_template(options={})
Fog.credentials[:cloudstack_zone_id] = 1105
template_id = options['id']
template_mode = options['mode']
zoneid = self.data[:zones].keys[0]
zone = self.data[:zones][zoneid]