1 files changed, 0 insertions, 183 deletions

diff --git a/program.c b/program.c
deleted file mode 100644
index 5cf8cc3..0000000
--- a/program.c
+++ /dev/null
@@ -1,183 +0,0 @@
-#ifndef PROGRAM_C
-#define PROGRAM_C
-#include<program.h>
-
-struct Source* extract_source(char *src_name)
-{
-	FILE *file;
-
-	struct Source *ret;
-	
-	file=fopen(src_name,"r");
-	if(file==NULL)
-		return NULL;
-	if(fseek(file,0L,SEEK_END)!=0)
-		return NULL;
-
-	ret=malloc(sizeof(struct Source));
-	ret->src_size=ftell(file);
-	ret->where_in_src=0;
-	ret->src_name=src_name;
-	ret->src=malloc(ret->src_size);
-	ret->current_column=0;
-	ret->current_row=0;
-
-	fseek(file,0L,SEEK_SET);
-
-
-	fread(ret->src,sizeof(char),ret->src_size,file);
-
-	fclose(file);
-	return ret;
-}
-struct Options* parse_command_line(int argc,char **argv)
-{
-	struct Options *ret;
-	int i;
-
-	assert(argv!=NULL && argc>0);
-
-	ret=malloc(sizeof(struct Options));
-	ret->target=OPTION_DEFAULT;
-	ret->src_name=NULL;
-	ret->is_quiet=0;
-
-	for(i=0;i<argc;++i)
-	{
-		if(!strncmp(argv[i],"--print-tokens",sizeof("--print-tokens")))
-			ret->target=OPTION_TARGET_TOKENS;
-		else if(!strncmp(argv[i],"--print-ast",sizeof("--print-ast")))
-			ret->target=OPTION_TARGET_AST;
-		else if(!strncmp(argv[i],"-o",sizeof("-o")) || !strncmp(argv[i],"--output",sizeof("--output")))
-		{
-			if(++i<argc)
-			{
-				if(strnlen(argv[i],101)<100)
-					ret->src_name=argv[i];
-				else if(!ret->is_quiet)
-				{
-					fprintf(stderr,"Error: Output filename is too long");
-					exit(1);
-				}else
-				{
-					exit(1);
-				}
-			}
-		}else if(strnlen(argv[i],101)<100)
-		{
-			ret->src_name=argv[i];	
-		}else if(!ret->is_quiet)
-		{
-			fprintf(stderr,"Error: Input filename is too long");
-			exit(1);
-		}else
-		{
-			exit(1);
-		}
-
-	}
-
-	if(ret->target==OPTION_DEFAULT)
-		ret->target=OPTION_TARGET_AST;
-
-	return ret;
-}
-struct Translation_Data* get_translation_data()
-{
-	struct Translation_Data *ret;
-	ret=malloc(sizeof(struct Translation_Data));
-	ret->errors=malloc(sizeof(struct Queue));
-	ret->tokens=malloc(sizeof(struct Queue));
-	
-	Queue_Init(ret->errors);
-	Queue_Init(ret->tokens);
-
-	ret->hold_number_of_errors=0;
-
-	return ret;
-}
-struct Error* get_error(char *message,size_t row,size_t column)
-{
-	struct Error *ret;
-	ret=malloc(sizeof(struct Error));
-	ret->message=message;
-	ret->row=row+1;
-	ret->column=column+1;
-}
-void push_lexing_error(char *error_message,struct Source *src,struct Translation_Data *translation_data)
-{
-	Queue_Push(translation_data->errors,get_error(error_message,src->current_row,src->current_column));
-}
-void push_parsing_error(char *error_message,struct Translation_Data *translation_data)
-{
-	struct token *error_token;
-	error_token=Queue_Pop(translation_data->tokens);
-	Queue_Push(translation_data->errors,get_error(error_message,error_token->row,error_token->column));
-}
-char has_new_errors(struct Translation_Data *translation_data)
-{
-	if(translation_data->hold_number_of_errors!=translation_data->errors->size)
-	{
-		translation_data->hold_number_of_errors=translation_data->errors->size;
-		return 1;
-	}else
-	{
-		return 0;
-	}
-}
-
-void delete_translation_data(struct Translation_Data *data)
-{
-	struct Error *hold_error;
-	struct token *hold_token;
-
-	while(data->tokens->size>0)
-		delete_token(Queue_Pop(data->tokens));
-	free(data->tokens);
-	while(data->errors->size>0)
-		delete_error(Queue_Pop(data->errors));
-	free(data->errors);
-
-	free(data);
-}
-void delete_source(struct Source *src)
-{
-	free(src->src_name);
-	free(src->src);
-	free(src);
-}
-void delete_options(struct Options *options)
-{
-	free(options);
-}
-void delete_error(struct Error *error)
-{
-	free(error->message);
-	free(error);
-}
-char get_and_check(struct Translation_Data *translation_data,enum Keyword kw)
-{
-	if( ( (struct token *)translation_data->tokens->first->data)->type==kw)
-	{
-		delete_token(Queue_Pop(translation_data->tokens));
-		return 1;
-	}else
-	{
-		return 0;
-	}
-}
-enum Keyword get_kw(struct Translation_Data *translation_data)
-{
-	return ( (struct token*)translation_data->tokens->first->data)->type;
-}
-void chomp(struct Translation_Data *translation_data)
-{
-	assert(translation_data->tokens->size>0);
-	delete_token(Queue_Pop(translation_data->tokens));
-}
-void touch_errors(struct Translation_Data *translation_data)
-{
-	assert(translation_data->hold_number_of_errors>0);
-	--translation_data->hold_number_of_errors;
-}
-#endif