From 9b936bfc394f6ae383128008202dcb82851085d4 Mon Sep 17 00:00:00 2001 From: xchaos Date: Thu, 17 Jan 2008 16:31:30 +0000 Subject: [PATCH] development work, won't compile git-svn-id: https://dev.arachne.cz/repos/cll1h/trunk@17 4bb87942-c103-4e5a-b51c-0ebff58f8515 --- cll1.h | 1 + tools/cake.c | 36 ++++++++++++++++++++++++++++++++---- 2 files changed, 33 insertions(+), 4 deletions(-) diff --git a/cll1.h b/cll1.h index 7a3f315..8d680b3 100644 --- a/cll1.h +++ b/cll1.h @@ -48,6 +48,7 @@ /* ------------------------------------------------------------------- */ /* 2. C<<1 basic data types - updated 2008-01-07 by xCh. */ /* ------------------------------------------------------------------- */ + #define Create_str(ID,STRATOM) char *ID=get_str(STRATOM); #define Create_mem() /* ------------------------------------------------------------------- */ diff --git a/tools/cake.c b/tools/cake.c index 78059fe..3563b1f 100644 --- a/tools/cake.c +++ b/tools/cake.c @@ -2,11 +2,39 @@ program { - for_arguments + int state = 0; + string filename = NULL,line = NULL; + file f = NULL; + + + try { + f = file_write("_cake.c"); + for_directory_filenames(filename,"./") + { + for_file_lines(line,filename) + { + for_chars(znak,line) + { + switch(znak) + { + case '<': state + case '>': + case '?': + case 'C': + case '%': + case '{': + case '}': + default: + } + } + } + } + } - + if_exception_switch + { + case ERROR_FILE: + } - - } -- 2.30.2