70 lines
1.3 KiB
C
70 lines
1.3 KiB
C
|
#include <stdlib.h>
|
||
|
|
#include "vm-lines.h"
|
||
|
|
|
||
|
|
LINE* mkline(int size) {
|
||
|
|
LINE* ln = (LINE*)malloc(sizeof(LINE));
|
||
|
|
ln->tokens = (char**)malloc(sizeof(char*)*size);
|
||
|
|
ln->count = 0;
|
||
|
|
return ln;
|
||
|
|
}
|
||
|
|
|
||
|
|
void addtoken(LINE* ln, char* token) {
|
||
|
|
ln->tokens[ln->count] = token;
|
||
|
|
ln->count++;
|
||
|
|
}
|
||
|
|
|
||
|
|
void println(LINE* ln, FILE* stream) {
|
||
|
|
for(int i = 0; i < ln->count; i++) {
|
||
|
|
fprintf(stream, "%s", ln->tokens[i]);
|
||
|
|
if(i + 1 < ln->count)
|
||
|
|
fprintf(stream, " ");
|
||
|
|
}
|
||
|
|
fprintf(stream, "\n");
|
||
|
|
}
|
||
|
|
|
||
|
|
void printlns(LINE* lns, FILE* stream) {
|
||
|
|
while(lns != NULL) {
|
||
|
|
println(lns, stream);
|
||
|
|
lns = lns->next;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
void freeln(LINE* ln) {
|
||
|
|
for(int i = 0; i < ln->count; i++)
|
||
|
|
free(ln->tokens[i]);
|
||
|
|
free(ln);
|
||
|
|
}
|
||
|
|
|
||
|
|
void freelns(LINE* lns) {
|
||
|
|
LINE* next = lns->next;
|
||
|
|
freeln(lns);
|
||
|
|
if(next != NULL)
|
||
|
|
freelns(next);
|
||
|
|
}
|
||
|
|
|
||
|
|
LINEBLOCK* mklnblk(LINE* start) {
|
||
|
|
LINEBLOCK* blk = (LINEBLOCK*)malloc(sizeof(LINEBLOCK));
|
||
|
|
blk->head = start;
|
||
|
|
blk->tail = start;
|
||
|
|
return blk;
|
||
|
|
}
|
||
|
|
|
||
|
|
LINEBLOCK* mergelnblks(LINEBLOCK* head, LINEBLOCK* tail) {
|
||
|
|
if(head == NULL)
|
||
|
|
return tail;
|
||
|
|
head->tail->next = tail->head;
|
||
|
|
head->tail = tail->tail;
|
||
|
|
free(tail);
|
||
|
|
return head;
|
||
|
|
}
|
||
|
|
|
||
|
|
void appendln(LINEBLOCK* lnblk, LINE* ln) {
|
||
|
|
lnblk->tail->next = ln;
|
||
|
|
lnblk->tail = ln;
|
||
|
|
}
|
||
|
|
|
||
|
|
void appendlnbefore(LINEBLOCK* lnblk, LINE* ln) {
|
||
|
|
ln->next = lnblk->head;
|
||
|
|
lnblk->head = ln;
|
||
|
|
}
|