text0003
をテンプレートにして作成
[
トップ
] [
新規
|
一覧
|
単語検索
|
最終更新
|
ヘルプ
]
開始行:
* 川合のプログラミング言語自作のためのテキスト#0003
-(by [[K]], 2019.02.25)
** (7) TL-3
-TL-2に少し命令を追加して、while命令を使えるようにしよう...
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <time.h>
typedef unsigned char *String; // こう書くと String は u...
void loadText(int argc, const char **argv, String t, int...
int isNumber(unsigned char c) → TL-2と同じなので省略
int isAlphabet(unsigned char c) → TL-2と同じなので省略
int isSymbol(unsigned char c) → TL-2と同じなので省略
int isSymbol1(unsigned char c) → TL-2と同じなので省略
int lexer(String s, String b, String t[]) → TL-2と同じな...
int var[256]; // 変数.
String varName[256]; // 変数名.
unsigned char txt[10000]; // ソースコード.
int pc = 0; // プログラムカウンタ.
int varNumber(String t) → TL-2と同じなので省略
int getNumber(String t) → TL-2と同じなので省略
int main(int argc, const char **argv)
{
int i, pc0, wpc;
unsigned char buf[10000];
String t[1000]; // トークン.
loadText(argc, argv, txt, 10000);
i = lexer(txt, buf, t);
t[i + 0] = t[i + 1] = t[i + 2] = t[i + 3] = ""; // ...
for (;;) {
pc0 = pc;
if (strcmp(t[pc], "") == 0) // ファイル終端.
exit(0);
if (strcmp(t[pc + 1], "=") == 0) { → TL-2と同じ...
} else if (strcmp(t[pc], "while") == 0 && strcmp...
wpc = pc;
if (getNumber(t[pc + 2]) < getNumber(t[pc + ...
pc += 7;
} else { // 条件不成立なので } の次まで読み...
while (strcmp(t[pc], "}") != 0 && strcmp...
pc++;
if (strcmp(t[pc], "}") == 0)
pc++;
}
continue;
} else if (strcmp(t[pc], "}") == 0) {
pc = wpc;
continue;
} else if (strcmp(t[pc], "time") == 0 && strcmp(...
printf("time=%.3f[sec]\n", clock() / (double...
} else if (strcmp(t[pc], "print") == 0 && strcmp...
printf("%d\n", getNumber(t[pc + 1]));
} else
goto err;
while (strcmp(t[pc], ";") != 0)
pc++;
pc++;
}
err:
printf("syntax error : %s %s %s %s\n", t[pc0], t[pc0...
exit(1);
}
-追加したのは、while命令のほかにtime命令もあります。
-このTL-3は以下のプログラムを実行することができます。1億...
i = 0;
while (i < 100000000) {
i = i + 1;
}
print i;
time;
** (8) TL-3の簡単な説明
-main()の中に変数wpcを追加しています。これはwhile文があっ...
-while文では条件式を評価しますが、もし評価結果が成立して...
-このプログラムはwpcが一つしかないので、入れ子になったwhi...
-いきなりたくさんの問題を解決するというのはいい方法だとは...
-また（入れ子を許す方法は分からないにしても）if文をどうす...
** 次回に続く
-次回: [[text0004]]
*こめんと欄
#comment
終了行:
* 川合のプログラミング言語自作のためのテキスト#0003
-(by [[K]], 2019.02.25)
** (7) TL-3
-TL-2に少し命令を追加して、while命令を使えるようにしよう...
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <time.h>
typedef unsigned char *String; // こう書くと String は u...
void loadText(int argc, const char **argv, String t, int...
int isNumber(unsigned char c) → TL-2と同じなので省略
int isAlphabet(unsigned char c) → TL-2と同じなので省略
int isSymbol(unsigned char c) → TL-2と同じなので省略
int isSymbol1(unsigned char c) → TL-2と同じなので省略
int lexer(String s, String b, String t[]) → TL-2と同じな...
int var[256]; // 変数.
String varName[256]; // 変数名.
unsigned char txt[10000]; // ソースコード.
int pc = 0; // プログラムカウンタ.
int varNumber(String t) → TL-2と同じなので省略
int getNumber(String t) → TL-2と同じなので省略
int main(int argc, const char **argv)
{
int i, pc0, wpc;
unsigned char buf[10000];
String t[1000]; // トークン.
loadText(argc, argv, txt, 10000);
i = lexer(txt, buf, t);
t[i + 0] = t[i + 1] = t[i + 2] = t[i + 3] = ""; // ...
for (;;) {
pc0 = pc;
if (strcmp(t[pc], "") == 0) // ファイル終端.
exit(0);
if (strcmp(t[pc + 1], "=") == 0) { → TL-2と同じ...
} else if (strcmp(t[pc], "while") == 0 && strcmp...
wpc = pc;
if (getNumber(t[pc + 2]) < getNumber(t[pc + ...
pc += 7;
} else { // 条件不成立なので } の次まで読み...
while (strcmp(t[pc], "}") != 0 && strcmp...
pc++;
if (strcmp(t[pc], "}") == 0)
pc++;
}
continue;
} else if (strcmp(t[pc], "}") == 0) {
pc = wpc;
continue;
} else if (strcmp(t[pc], "time") == 0 && strcmp(...
printf("time=%.3f[sec]\n", clock() / (double...
} else if (strcmp(t[pc], "print") == 0 && strcmp...
printf("%d\n", getNumber(t[pc + 1]));
} else
goto err;
while (strcmp(t[pc], ";") != 0)
pc++;
pc++;
}
err:
printf("syntax error : %s %s %s %s\n", t[pc0], t[pc0...
exit(1);
}
-追加したのは、while命令のほかにtime命令もあります。
-このTL-3は以下のプログラムを実行することができます。1億...
i = 0;
while (i < 100000000) {
i = i + 1;
}
print i;
time;
** (8) TL-3の簡単な説明
-main()の中に変数wpcを追加しています。これはwhile文があっ...
-while文では条件式を評価しますが、もし評価結果が成立して...
-このプログラムはwpcが一つしかないので、入れ子になったwhi...
-いきなりたくさんの問題を解決するというのはいい方法だとは...
-また（入れ子を許す方法は分からないにしても）if文をどうす...
** 次回に続く
-次回: [[text0004]]
*こめんと欄
#comment
ページ名:
![[PukiWiki]](image/pukiwiki.png "[PukiWiki]")
