tape_t.h

  #pragma once
#include <stdlib.h>
#include <stdio.h>
enum Bool
{
FALSE,
TRUE
};
char getch(char *Tape, int current_ptr)
{
return Tape[current_ptr];
}
char getchIncr(char *Tape, int current_ptr)
{
return Tape[current_ptr++];
}

int tapeIncr(int current_ptr, int i)
{
current_ptr += i;
return current_ptr;
}

void necessary_expect(char *Tape, int current_ptr, char expected_symbol)
{
if (getch(Tape, current_ptr) != expected_symbol)
{
printf("Missing char is %c but input char is (%c)%d\n", expected_symbol, getch(Tape, current_ptr), getch(Tape, current_ptr));
exit(0);
}
current_ptr++;
}
Bool optional_expect(char *Tape, int current_ptr, char expected_symbol)
{
if (getch(Tape, current_ptr) != expected_symbol)
{
return FALSE;
}
current_ptr++;
return TRUE;
}

void jumpline(char *Tape, int current_ptr)
{
if (getch(Tape, current_ptr) == '\n')
{
current_ptr++;
return;
}

while (getch(Tape, current_ptr) != '\n')
current_ptr++;

current_ptr++; // for reading '\n'
}

void tape_read(char *cwd, char **Tape)
{
FILE *sys_hdr;
errno_t error_code;
error_code = fopen_s(&sys_hdr, cwd, "r+");
char ch;
int file_size = 0;
if (sys_hdr == NULL)
{
printf("error: Header file doesn't exist!\n");
exit(0);
}
while ((ch = fgetc(sys_hdr)) != EOF)
{
*(*Tape+file_size++) = ch;
*Tape = (char *)realloc(*Tape, file_size+1);
}
*(*Tape+file_size) = EOF;
//printf("tape_read() %s", *Tape);
}

/*void tape_readline(char *cwd, char *Tape)
{
FILE *sys_hdr;
errno_t error_code;
error_code = fopen_s(&sys_hdr, cwd, "r+");
char ch;
int file_size = 0;
if (sys_hdr == NULL)
{
printf("error: Header file doesn't exist!\n");
exit(0);
}

//Tape[file_size] = EOF;
//printf("%s", Tape);
}*/

Comments

Post a Comment

Popular posts from this blog

VECPP.c

 /* Written for Embedded C++ */ /* Follow TR.18015 Standard Specs */ /* VECPP version 1.0 */ /* Designed by Daipayan Bhowal */ #include <iostream>  #include "datastructure.h" #include <fstream> #include <string> #include <unistd.h> #include <stdio.h> #include <cstdlib> #include <bits/stdc++.h>  #define UTX 0 #define FWK 0 #define DEBUG 0 #define PARSE 0 #define LEVEL_INC 1 #define NO_OF_MAX_FILES 5 using namespace std; #undef stack bool is_id(string token,string term,const int term_char_option); /**************  Defination ****************/ enum MacroType {     define_t,     include_t,     line_t,     undef_t,     error_tt,     pragma_t,     defined_t,     if_t,     ifdef_t,     ifndef_t,     elif_t,     else_t,     endif_t, UNDEFINED,     MAX_TYPE }; MacroType getIndexFromStr(string_t ...
Read more

VECPP Windows.c

#include "tape_t.h" #include "string_t.h" #include "tuple_t.h" #include "bool_t.h" #include <direct.h> #if _MSC_VER #include "io.h" #else #include <cunistd> #endif typedef bool_t _bool; /**** first design #include, #define VAR, #define FUNC() and #ifdef, #elif and #endif *****/ enum MacroType { define_t, include_t, line_t, undef_t, error_tt, pragma_t, defined_t, if_t, ifdef_t, ifndef_t, elif_t, else_t, endif_t, COMPILER_DATA, UNDEFINED, MAX_TYPE }; /*MacroType getIndexFromStr(string_t s) { string_t tmp; char* arr[13] = { "define","include","line","undef","error","pragma","defined","if","ifdef","ifndef","elif","else","endif" }; for (int i = 0; i < 13; i++) { tmp = string(arr[i]); if ((compare(tmp, s)) == 0) return (MacroType)i; } return UNDEF...
Read more

tuple_t Windows.h

#pragma once /******************************************************************************   New Era Datastructure  Designed by Daipayan Bhowal *******************************************************************************/ #include <stdio.h> #include <stdlib.h> #include <stdarg.h> #include <string.h> typedef enum Type {     CHAR,     INT,     FLOAT,     DOUBLE,     SHORT,     LONG,     LONG_LONG,     STRING }type_t; typedef struct Tables {     int index;     int type[64];     void* args[64];     char max_index; } tables; typedef tables* table_t; table_t itable(int num, ...) // init_table {     va_list valist;     va_start(valist, num);     static int counter = 0;     table_t t = (table_t)malloc(sizeof(tables));     t->index = ++counter;     for (int j = 0; j < num; j...
Read more