masatoi

<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE plist PUBLIC "-//Apple//DTD PLIST 1.0//EN"
"https://www.apple.com/DTDs/PropertyList-1.0.dtd">
<plist version="1.0">
  <dict>
    <key>Label</key>
    <string>com.user.yaskkserv2</string>

    <key>ProgramArguments</key>
    <array>

masatoi

プログラミング言語Hyのモードを作る話

プログラミング言語Hyのモードを作る話

自己紹介、モチベーション

• ハンドル: masatoi
• Emacs歴は20年くらい？

masatoi

/*
sudo apt install libsdl2-dev
gcc keyevent.c -o keyevent -lSDL2
*/

#include <SDL2/SDL.h>
#include <stdbool.h>

int main(int argc, char* argv[]) {
    SDL_Init(SDL_INIT_VIDEO);

masatoi

;;; テキストコンソール時の表示崩れ対策
;;; 東アジア文字の幅が曖昧なものを全て `?` 表記にする
(unless (display-graphic-p)
  (setq east-asian-ambiguous
        '(#x00A1 ; Po         INVERTED EXCLAMATION MARK
          #x00A4 ; Sc         CURRENCY SIGN
          #x00A7 ; Po         SECTION SIGN
          #x00A8 ; Sk         DIAERESIS
          #x00AA ; Lo         FEMININE ORDINAL INDICATOR
          #x00AD ; Cf         SOFT HYPHEN

masatoi

;;; Install
;; requestが必要なので M-x package-install request などでインストールしておく
;; init.elなどでロードする
;; (load-file "/path/to/textra.el")
;; キーバインドを設定しておく
;; (global-set-key (kbd "C-c t") 'textra-translate)

;;; Usage
;; 翻訳したい部分をリージョン選択して設定したキーバインド、または M-x textra-translate
;; 翻訳結果がミニバッファに出る。また、同じ内容がクリップボードにコピーされている

masatoi

;;; -*- Coding: utf-8; Mode: Lisp; -*-

;; ltkのドキュメント
;; http://www.peter-herth.de/ltk/ltkdoc/

;; 逆引きCommon Lisp: Ltk
;; https://lisphub.jp/common-lisp/cookbook/index.cgi?Ltk

;; ライブラリ読み込み
(ql:quickload :ltk)

masatoi

;;; 1.2 手続きとそれが生成するプロセス
;;; 1.2.1 線形再帰と反復
(defun factorial (n)
  (if (= n 1)
      1
      (* n (factorial (- n 1)))))

(disassemble 'factorial)

; disassembly for FACTORIAL

masatoi

;;; Install
;; requestが必要なので M-x package-install request などでインストールしておく
;; init.elなどでロードする
;; (load-file "/path/to/deepl.el")
;; キーバインドを設定しておく
;; (global-set-key (kbd "C-c t") 'deepl-translate)

;;; Usage
;; 翻訳したい部分をリージョン選択して設定したキーバインド、または M-x deepl-translate
;; 翻訳結果がミニバッファに出る。また、同じ内容がクリップボードにコピーされている

masatoi

チャージQRコード

店舗ユーザが発行し、エンドユーザがポケペイアプリから読み取ることでチャージ取引が発生するQRコードです。

チャージQRコードを解析すると次のようなURLになります(URLは環境によって異なります)。

https://www-sandbox.pokepay.jp/checks/xxxxxxxx-xxxx-xxxxxxxxx-xxxxxxxxxxxx

QRコードを読み取る方法以外にも、このURLリンクを直接スマートフォン(iOS/Android)上で開くことによりアプリが起動して取引が行われます。(注意: 上記URLはsandbox環境であるため、アプリもsandbox環境のものである必要があります) 上記URL中の xxxxxxxx-xxxx-xxxxxxxxx-xxxxxxxxxxxx の部分がチャージQRコードのIDです。

masatoi

(defclass parent () ())
(defclass child (parent) ())
(defparameter p1 (make-instance 'parent))
(defparameter c1 (make-instance 'child))

(defgeneric say (self word))

(defmethod say ((self parent) word)
  (format t "~A says ~A~%" self word))