annotate Slide/slide.md @ 85:1f4e174f0f1a

add slide
author Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
date Tue, 08 Jan 2019 19:32:49 +0900
parents 6c69fdd1716c
children 2c38abf2c77d
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
84
6c69fdd1716c add slide.md (template...)
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
1 title: CbCによるPerl6処理系
6c69fdd1716c add slide.md (template...)
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
2 author: Takahiro Shimizu, Shinji Kono
6c69fdd1716c add slide.md (template...)
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
3 profile: 琉球大学
6c69fdd1716c add slide.md (template...)
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
4 lang: Japanese
6c69fdd1716c add slide.md (template...)
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
5 code-engine: coderay
6c69fdd1716c add slide.md (template...)
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
6
6c69fdd1716c add slide.md (template...)
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
7
85
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
8 ## 研究目的
84
6c69fdd1716c add slide.md (template...)
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
9 - スクリプト言語であるPerl5の後継言語としてPerl6が現在開発されている.
6c69fdd1716c add slide.md (template...)
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
10 - Perl6は設計と実装が区分されており様々な処理系が開発されている.現在主流なPerl6はRakudoと言われるプロジェクトである.
6c69fdd1716c add slide.md (template...)
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
11 - RakudoではPerl6自体をNQP(NotQuitPerl)と言われるPerl6のサブセットで記述し, NQPをVMが解釈するという処理の流れになっている.
6c69fdd1716c add slide.md (template...)
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
12 - このVMは任意のVMが選択できるようになっており, 現在はMoarVM, JavaVM, JavaScriptが動作環境として選択可能である.
6c69fdd1716c add slide.md (template...)
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
13 - 主に利用されているVMにCで書かれたMoarVMが存在する.
6c69fdd1716c add slide.md (template...)
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
14 - MoarVMはJITコンパイルなどをサポートしているが, 全体的な起動時間及び処理速度がPerl5と比較し非常に低速である.
6c69fdd1716c add slide.md (template...)
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
15 - この問題を解決するためにContinuation based C (CbC)という言語を一部用いてMoarVMの書き換えを行う.
6c69fdd1716c add slide.md (template...)
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
16 - CbCを用いたMoarVMの書き換えを検討し,並列デバッグ方法などについて検討する.
6c69fdd1716c add slide.md (template...)
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
17
6c69fdd1716c add slide.md (template...)
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
18
85
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
19 ## Continuation Based C (CbC)
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
20
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
21 - Continuation Based C (CbC) はCodeGearとDataGearを単位として用いたプログラミング言語である.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
22 - CodeGearはCの通常の関数呼び出しとは異なり,スタックに値を積まず, 次のCodeGearにgoto文によって遷移する.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
23 - このgoto文による遷移を軽量継続と呼ぶ.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
24 - CbCは軽量継続を取り入れたCの下位言語であり, C言語のAPIを利用可能なCと互換性のある言語である.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
25
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
26 ## CodeGearとDetaGear
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
27
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
28 - Cの関数の代わりにCodeGearという単位をCbCでは導入している.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
29 - CodeGearはCの関数宣言の型名の代わりに`__code`と書く事で宣言出来る.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
30 - CodeGearの引数を遷移先のCodeGearと揃えることでレジスタに変数を確保した状態で軽量継続可能である.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
31 - その為CodeGearの引数は入出力としての意味があり, DataGearと呼んでいる.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
32
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
33 ```
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
34 extern int printf(const char*,...);
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
35 int main (){
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
36 int data = 0;
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
37 goto cg1(&data);
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
38 }
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
39 __code cg1(int *datap){
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
40 (*datap)++;
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
41 goto cg2(datap);
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
42 }
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
43 __code cg2(int *datap){
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
44 (*datap)++;
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
45 printf("%d\n",*datap);
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
46 }
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
47 ```
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
48
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
49 ## CbCの現在の実装
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
50
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
51 - CbCは現在2種類の実装がある.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
52 - gcc (version 9.0.0)
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
53 - llvm/clang (version 7.0.0)
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
54
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
55 ## 言語処理系の応用
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
56 - CbCではCodeGearを処理単位として利用でき, これはコンパイラの基本ブロックに相当する.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
57 - 従来のスクリプト言語などの処理系では, 主にcase文で実装していた命令コードディスパッチの箇所をCodeGearの遷移として記述する事が可能である.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
58 - CodeGearの遷移として記述する事で, 命令処理ごとに分割する事が可能となり, モジュール化が可能となる.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
59 - CodeGearとCodeGearの遷移時に入出力のインターフェイスを揃える事で, レジスタに変数が割り振られたまま軽量継続が可能となり, レジスタレベルの最適化が可能となる.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
60 - これらの検証とPerl6の高速化を行う為に, CbCを用いてPerl6処理系の書き換えを行っていく.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
61
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
62 ## Perl6の概要
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
63
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
64 - Perl6とはPerl5の後継言語として当初開発が開始された言語である.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
65 - 仕様と実装が分離しており, 仕様は公式テストスイートであるRoastそのものとなっている.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
66 - 歴史的にHaskellで実装されたPugs, Pythonとの共同基盤を目指したParrotなどの実装が存在する.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
67 - 言語仕様としては漸進的型付け言語であり, 従来のPerl5とは互換性が無い.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
68 - 現在の主要な実装はRakudoと呼ばれる実装である.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
69
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
70 ## Rakudo
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
71 - Rakudoとは現在のPerl6の主力な実装である.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
72 - 実行環境のVM, Perl6のサブセットであるNQP(NotQuitPerl), NQPで記述されたPerl6(Rakudo)という構成になっている.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
73 - VMはCで書かれたPerl6専用のVMであるMoarVM, JavaVMが選択可能である.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
74 - 現在はMoarVMがRakudoの中でも主流なVM実装となっている.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
75
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
76 ## Rakudo
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
77 - Rakudoにおけるコンパイラは2種類存在する
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
78 - Perl6やNQPのコードをVMのバイトコードに変換するコンパイラ
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
79 - NQPが出力したVMのバイトコードをネイティブコードに変換するコンパイラ
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
80 - NQPの処理系nqp及び, Perl6のインタプリタである perl6は, それぞれセルフコンパイルしたものを利用する
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
81 - Perl6は純粋なNQPではなく, Perl6自身によって拡張され記述されている箇所も存在する
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
82
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
83 ## MoarVM
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
84
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
85 - Perl6専用のVMであり, Cで記述されている
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
86 - レジスタマシンとして実装されている.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
87 - MoarVMはバイトコードインタプリタを `src/core/interp.c` で定義しており, この中の関数 `MVM_interp_run` で命令に応じた処理を実行する
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
88
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
89 ## MVM_interp_run
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
90
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
91 - MVM_interp_runでは次のオペコードをフェッチする際に `NEXT_OP` マクロを介して計算を行う.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
92 - オペコードが対応する命令を実行する際は, `MVM_CGOTO` フラグが立っている場合はCのラベルgotoを利用し, 使えない場合はswitch文を利用して遷移する.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
93
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
94
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
95 ```
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
96 #define NEXT_OP (op = *(MVMuint16 *)(cur_op), cur_op += 2, op)
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
97
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
98 #if MVM_CGOTO
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
99 #define DISPATCH(op)
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
100 #define OP(name) OP_ ## name
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
101 #define NEXT *LABELS[NEXT_OP]
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
102 #else
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
103 #define DISPATCH(op) switch (op)
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
104 #define OP(name) case MVM_OP_ ## name
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
105 #define NEXT runloop
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
106 #endif
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
107 ```
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
108
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
109 ## MVM_interp_run
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
110
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
111 - ラベル遷移を利用する場合は配列`LABELS`にアクセスし, ラベル情報を取得する
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
112
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
113 ```
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
114 static const void * const LABELS[] = {
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
115 &&OP_no_op,
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
116 &&OP_const_i8,
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
117 &&OP_const_i16,
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
118 &&OP_const_i32,
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
119 &&OP_const_i64,
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
120 &&OP_const_n32,
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
121 &&OP_const_n64,
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
122 &&OP_const_s,
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
123 &&OP_set,
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
124 &&OP_extend_u8,
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
125 &&OP_extend_u16,
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
126 &&OP_extend_u32,
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
127 &&OP_extend_i8,
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
128 &&OP_extend_i16,
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
129 ```
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
130
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
131 ## MVM_interp_run
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
132
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
133 - DISPATCHマクロは次の様に記述されており, この中の `OP` で宣言されたブロックがそれぞれオペコードに対応する処理となっている.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
134 - この中では `GET_REG` などのマクロを用いてMoarVMのレジスタにアクセスする.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
135 - `cur_op`は次のオペコードを意味し, マクロ `NEXT` で決められた方法で次のオペコードに遷移する.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
136
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
137 ```
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
138 DISPATCH(NEXT_OP) {
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
139 OP(no_op):
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
140 goto NEXT;
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
141 OP(const_i8):
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
142 OP(const_i16):
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
143 OP(const_i32):
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
144 MVM_exception_throw_adhoc(tc, "const_iX NYI");
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
145 OP(const_i64):
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
146 GET_REG(cur_op, 0).i64 = MVM_BC_get_I64(cur_op, 2);
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
147 cur_op += 10;
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
148 goto NEXT;
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
149 OP(pushcompsc): {
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
150 MVMObject * const sc = GET_REG(cur_op, 0).o;
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
151 if (REPR(sc)->ID != MVM_REPR_ID_SCRef)
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
152 MVM_exception_throw_adhoc(tc, "Can only push an SCRef with pushcompsc");
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
153 if (MVM_is_null(tc, tc->compiling_scs)) {
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
154 MVMROOT(tc, sc, {
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
155 tc->compiling_scs = MVM_repr_alloc_init(tc, tc->instance->boot_types.BOOTArray);
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
156 });
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
157 }
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
158 MVM_repr_unshift_o(tc, tc->compiling_scs, sc);
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
159 cur_op += 2;
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
160 goto NEXT;
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
161 }
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
162 }
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
163
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
164 ```
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
165
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
166 ## MVM_interp_run
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
167
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
168 - Cの実装の場合, switch文に展開される可能性がある為, 命令ディスパッチが書かれているCソース・ファイルの指定の場所にのみ処理を記述せざるを得ない
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
169 - その為, 1ファイルあたりの記述量が膨大になり, 命令のモジュール化ができない
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
170 - Threaded Codeの実装を考えた場合, この命令に対応して大幅に処理系の実装を変更する必要がある.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
171 - デバッグ時には今どの命令を実行しているか, ラベルテーブルを利用して参照せざるを得ず, 手間がかかる.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
172
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
173 ## NQP
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
174 - MoarVM, JVM上で動作する Perl6のサブセットとなっている.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
175 - NQPの基本文法はPerl6に準拠しているが, 束縛ベースで変数を利用するなどいくつか異なる点が存在する.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
176 - NQPは最終的にブートストラップを行う処理系であるが, 初回のビルド時には, すでに書かれたMoarVM, JVMのバイトコードを必要とする.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
177 - この状態をStage0といい, Stage0を利用してStage1, Stage1を利用してStage2をビルドする事で完成する.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
178 - NQPの実行可能なインタプリタである`nqp`は, MoarVMの実行バイナリ`moar` にライブラリパスなどを設定し, ビルドしたライブラリなどを引数として渡すシェルスクリプトとなっている.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
179 - `nqp` を実行する事でREPLが起動され, NQPスクリプトを `nqp` に入力として与える事で, 通常のスクリプト言語の様に実行する事が可能となる.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
180 - NQPの設計はRoastで定義されているPerl6とは異なり, 今後も変化していく事が公表されている.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
181
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
182 ```
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
183 #! nqp
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
184
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
185 sub fib($n) {
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
186 $n < 2 ?? $n !! fib($n-1) + fib($n - 2);
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
187 }
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
188
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
189 my $N := 29;
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
190
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
191 my $z := fib($N);
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
192
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
193 say("fib($N) = " ~ fib($N));
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
194 ```
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
195
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
196 ## CbCによるMoarVM
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
197
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
198 - MoarVMの中心部分はバイトコードを解釈するバイトコードインタプリタである.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
199 - その為, CbCを用いてMoarVMのバイトコードインタプリタ部分の書き換えを検討する.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
200
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
201 ## CbCMoarVMのバイトコードディスパッチ
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
202
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
203 - interp.cではマクロを利用した cur_op (現在のオペコード) の計算及び, マクロ遷移かswitch文を利用して次の命令列に遷移していた
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
204 - CbCMoarVMでは, それぞれの命令に対応するCodeGearを生成し, このCodeGearの集合であるテーブルCODESを作成した
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
205 - このテーブルは`cbc_next`というCodeGearから参照し, 以降はこのCodeGearの遷移として処理が継続される.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
206
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
207 ```
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
208 #define NEXT_OP(i) (i->op = *(MVMuint16 *)(i
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
209 ->cur_op), i->cur_op += 2, i->op)
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
210 #define DISPATCH(op) {goto (CODES[op])(i);}
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
211 #define OP(name) OP_ ## name
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
212 #define NEXT(i) CODES[NEXT_OP(i)](i)
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
213 static int tracing_enabled = 0;
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
214
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
215 _code cbc_next(INTERP i){
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
216 goto NEXT(i);
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
217 }
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
218 ```
84
6c69fdd1716c add slide.md (template...)
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
219
85
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
220 ```
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
221 __code (* CODES[])(INTERP) = {
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
222 cbc_no_op,
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
223 cbc_const_i8,
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
224 cbc_const_i16,
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
225 cbc_const_i32,
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
226 cbc_const_i64,
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
227 cbc_const_n32,
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
228 cbc_const_n64,
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
229 cbc_const_s,
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
230 cbc_set,
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
231 cbc_extend_u8,
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
232 cbc_extend_u16,
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
233 ```
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
234
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
235 ## CodeGearの入出力インターフェイス
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
236
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
237 - MoarVMではレジスタの集合や命令列などをMVM_interp_runのローカル変数として利用し, 各命令実行箇所で参照している
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
238 - CodeGearに書き換えた場合, このローカル変数にはアクセスする事が不可能となる.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
239 - その為, 入出力としてMoarVMの情報をまとめた構造体interpのポインタであるINTERPを受け渡し, これを利用してアクセスする
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
240
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
241
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
242 ```
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
243 typedef struct interp {
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
244 MVMuint16 op;
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
245 /* Points to the place in the bytecode
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
246 right after the current opcode. */
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
247 /* See the NEXT_OP macro for making sense
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
248 of this */
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
249 MVMuint8 *cur_op;
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
250 /* The current frame’s bytecode start. */
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
251 MVMuint8 *bytecode_start;
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
252 /* Points to the base of the current
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
253 register set for the frame we
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
254 * are presently in. */
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
255 MVMRegister *reg_base;
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
256 /* Points to the current compilation unit
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
257 . */
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
258 MVMCompUnit *cu;
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
259 /* The current call site we’re
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
260 constructing. */
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
261 MVMCallsite *cur_callsite;
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
262 MVMThreadContext *tc;
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
263 } INTER,*INTERP;
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
264 ```
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
265
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
266 ## DataGearへの変換
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
267
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
268 - バイトコードに対応する命令をそれぞれCodeGearに変換していく.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
269 - `OP(.*)`の`(.*)`の部分をCodeGearの名前として先頭に `cbc_` をつけた上で設定する.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
270 - cur_opなどはINTERPを経由してアクセスする様に修正する.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
271 - 末尾の `NEXT` を次のCodeGearにアクセスする為に `cbc_next` に修正する.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
272 - case文で次のcase文に流れる箇所は, 直接その下のcase文に該当するCodeGearに遷移する.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
273
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
274 - 論文執筆時はstaticに修正する必要があったが, その後CbCコンパイラの改良により不要となった.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
275
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
276 ```
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
277 __code cbc_no_op(INTERP i){
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
278 goto cbc_next(i);
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
279 }
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
280 __code cbc_const_i8(INTERP i){
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
281 goto cbc_const_i16(i);
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
282 }
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
283 __code cbc_const_i16(INTERP i){
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
284 goto cbc_const_i32(i);
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
285 }
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
286 __code cbc_const_i32(INTERP i){
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
287 MVM_exception_throw_adhoc(i->tc, "const_iX NYI");
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
288 goto cbc_const_i64(i);
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
289 }
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
290 __code cbc_const_i64(INTERP i){
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
291 GET_REG(i->cur_op, 0,i).i64 = MVM_BC_get_I64(i->cur_op, 2);
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
292 i->cur_op += 10;
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
293 goto cbc_next(i);
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
294 }
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
295 __code cbc_pushcompsc(INTERP i){
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
296 MVMObject * sc;
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
297 sc = GET_REG(i->cur_op, 0,i).o;
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
298 if (REPR(sc)->ID != MVM_REPR_ID_SCRef)
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
299 MVM_exception_throw_adhoc(i->tc, "Can only push an SCRef with pushcompsc");
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
300 if (MVM_is_null(i->tc, i->tc->compiling_scs)) {
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
301 MVMROOT(i->tc, sc, {
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
302 i->tc->compiling_scs = MVM_repr_alloc_init(i->tc, i->tc->instance->boot_types.BOOTArray);
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
303 });
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
304 }
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
305 MVM_repr_unshift_o(i->tc, i->tc->compiling_scs, sc);
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
306 i->cur_op += 2;
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
307 goto cbc_next(i);
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
308 }
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
309 ```
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
310
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
311 ## MoarVMのデバッグ手法
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
312
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
313 - MoarVMはバイトコードをランダムに生成する仕様となっている
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
314 - 一旦moarvmバイトコードとして出力したファイルを実行する場合は同じ処理内容となっている
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
315 - そのため, MoarVMのデバッグは同じバイトコードを入力として与え, オリジナルのMoarVMと並列してgdbを用いてトレースを行う.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
316 - この際, 実行するバイトコードの数が膨大となるので, scriptコマンドを用いて実行するバイトコードの番号を吐き出し, ログファイルを用いて比較する.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
317
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
318 ## MoarVMのデバッグ時のbreak point
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
319
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
320 - CbC側では次のオペコードの遷移は `cbc_next` というCodeGearで行う
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
321 - CodeGearは関数として扱える為, これに直接break pointを設定する
84
6c69fdd1716c add slide.md (template...)
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents:
diff changeset
322
85
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
323 ```
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
324 (gdb) b cbc_next
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
325 Breakpoint 2 at 0x7ffff7560288: file src/core
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
326 /cbc-interp.cbc, line 61.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
327 (gdb) command 2
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
328 Type commands for breakpoint(s) 2, one per
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
329 line.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
330 End with a line saying just "end".
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
331 >p CODES[*(MVMuint16 *)i->cur_op]
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
332 >p *(MVMuint16 *)i->cur_op
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
333 >c
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
334 >end
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
335 ```
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
336 - オリジナルの場合マクロである為, dummy関数をマクロに記述し, この関数にbreakpointを設定する
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
337
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
338 ```
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
339 dalmore gdb --args ../../MoarVM_Original/
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
340 MoarVM/moar --libpath=src/vm/moar/stage0
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
341 gen/moar/stage1/nqp
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
342 (gdb) b dummy
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
343 Function "dummy" not defined.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
344 Make breakpoint pending on future shared
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
345 library load? (y or [n]) y
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
346 Breakpoint 1 (dummy) pending.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
347 (gdb) command 1
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
348 Type commands for breakpoint(s) 1, one per
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
349 line.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
350 End with a line saying just "end".
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
351 >up
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
352 >p *(MVMuint16 *)(cur_op)
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
353 >c
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
354 >end
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
355 ```
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
356
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
357 ## MoarVMのトレース
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
358
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
359 - トレース時には次の様なデバッグ情報の表示を利用する
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
360 - デバッガに, breakpointで停止した際のcur_opの値を表示する様に設定する.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
361
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
362 ```
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
363 Breakpoint 1, dummy () at src/core/interp.c
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
364 :46
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
365 46 }
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
366 #1 0x00007ffff75608fe in MVM_interp_run (tc=0
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
367 x604a20,
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
368 initial_invoke=0x7ffff76c7168 <
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
369 toplevel_initial_invoke>, invoke_data
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
370 =0x67ff10)
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
371 at src/core/interp.c:119
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
372 119 goto NEXT;
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
373 $1 = 159
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
374 Breakpoint 1, dummy () at src/core/interp.c
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
375 :46
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
376 46 }
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
377 #1 0x00007ffff75689da in MVM_interp_run (tc=0
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
378 x604a20,
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
379 initial_invoke=0x7ffff76c7168 <
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
380 toplevel_initial_invoke>, invoke_data
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
381 =0x67ff10)
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
382 at src/core/interp.c:1169
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
383 1169 goto NEXT;
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
384 $2 = 162
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
385 ```
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
386 ## MoarVMのデバッグ
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
387
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
388 - cur_opのみをPerlスクリプトなどを用いて抜き出し, 並列にログを取得したオリジナルと差分を図る
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
389 - この際に差異が発生したオペコードを確認し, その前の状態で確認していく
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
390
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
391 ```
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
392 131 : 131
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
393 139 : 139
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
394 140 : 140
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
395 144 : 144
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
396 558 : 558
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
397 391 : 391
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
398 749 : 749
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
399 53 : 53
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
400 *54 : 8
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
401 ```
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
402 ## 現在のCbCMoarVM
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
403
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
404 - 現在はNQP, Rakudoのセルフビルドが達成でき, オリジナルと同等のテスト達成率を持っている
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
405 - moarの起動時のオプションとして `--cbc` を与えることによりCbCで動き, そうでない場合は通常のCで記述された箇所で実行される
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
406
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
407 ## CbCMoarVMの利点
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
408
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
409 - バイトコードインタプリタの箇所をモジュール化する事が可能となり, CodeGearの再利用性や記述生が高まる
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
410 - デバッグ時にラベルではなくCodeGearにbreakpointを設定可能となり,デバッグが安易となる
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
411 - ThreadedCodeを実装する場合, CodeGearを組み合わせることにより実装する事が可能となる
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
412
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
413 ## CbCMoarVMの欠点
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
414
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
415 - CbCコンパイラがバグを発生させやすく, 意図しない挙動を示す事がある
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
416 - MoarVMのオリジナルの更新頻度が高い為, 追従していく必要がある
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
417 - CodeGear側からCに戻る際に手順が複雑となる
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
418 - CodeGearを単位として用いる事で複雑なプログラミングが要求される.
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
419
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
420 ## CbCMoarVMと通常のMoarVMの比較
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
421
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
422 - CbCMoarVMと通常のMoarVMの速度比較を行った
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
423
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
424 ```
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
425 #! nqp
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
426 # Example of a while loop
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
427
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
428 my $i := 0;
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
429 while $i < 10 {
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
430 say("i={$i++}");
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
431 }
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
432 ```
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
433
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
434 ```
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
435 subset Fizz of Int where * %% 3;
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
436 subset Buzz of Int where * %% 5;
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
437 subset FizzBuzz of Int where Fizz&Buzz;
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
438 subset Number of Int where none Fizz|Buzz;
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
439
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
440 proto sub fizzbuzz ($) { * }
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
441 multi sub fizzbuzz (FizzBuzz) { "FuzzBuzz" }
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
442 multi sub fizzbuzz (Fizz) { "Fizz" }
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
443 multi sub fizzbuzz (Buzz) { "Buzz" }
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
444 multi sub fizzbuzz (Number $number) { $number }
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
445
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
446 fizzbuzz($_).say for 1..15;
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
447
1f4e174f0f1a add slide
Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
parents: 84
diff changeset
448 ```