From 71e7b5fc4f28bcccd5fd9e27617b0ca2d13fc179 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@hornquist.se>
Date: Sun, 6 Oct 2019 13:35:14 +0200
Subject: Remove old C code.

---
 src/vcal.h.old | 120 ---------------------------------------------------------
 1 file changed, 120 deletions(-)
 delete mode 100644 src/vcal.h.old

(limited to 'src/vcal.h.old')

diff --git a/src/vcal.h.old b/src/vcal.h.old
deleted file mode 100644
index 2a3ad294..00000000
--- a/src/vcal.h.old
+++ /dev/null
@@ -1,120 +0,0 @@
-#ifndef VCAL_H
-#define VCAL_H
-
-#include <stdlib.h>
-
-#include <libguile.h>
-
-#include "strbuf.h"
-
-#define TYPE strbuf
-#include "linked_list.h"
-// #include "trie.h"
-#undef TYPE
-
-/*
- * content_line:
- *     (a mapping) between a top level key, and everything it contains.
- * content_set:
- *     A top level value, along with a list of kv pairs for all its
- *     possible parameters.
- * param_set:
- *     A parameter key, along with a list of all its values.
- */
-
-#define param_set LLIST(strbuf)
-
-#define TYPE param_set
-#include "trie.h"
-#undef TYPE
-
-#define T strbuf
-	#define V TRIE(param_set)
-		#include "pair.h"
-		/* left := content | right := params */
-		#define content_set PAIR(strbuf, TRIE(param_set))
-	#undef V
-#undef T
-
-#define TYPE content_set
-#include "linked_list.h"
-#undef TYPE
-
-#define content_line LLIST(content_set)
-
-/*
- * Helper macros for accessing fields in
- * content_line, content_set, and param_set
- */
-
-/* content_set */
-#define CLINE_CUR(c)        ((c)->cval)
-
-/* strbuf */
-#define CLINE_CUR_VAL(c)    (& CLINE_CUR(c)->key)
-
-/* TRIE(param_set) */
-#define CLINE_CUR_PARAMS(c) (& CLINE_CUR(c)->val)
-
-#define TYPE content_line
-#include "trie.h"
-#undef TYPE
-
-typedef struct s_vcomponent vcomponent;
-
-#define TYPE vcomponent
-// #include "vector.h"
-#include "linked_list.h"
-#undef TYPE
-
-struct s_vcomponent {
-	/* VCALENDAR, VEVENT, ... */
-	char* type;
-	vcomponent* parent;
-	TRIE(content_line) clines;
-	LLIST(vcomponent) components;
-
-	/*
-	 * Holds a Guile representation of this object. Used to always
-	 * return the same foreign (for guile) object for the same
-	 * vcomponent.
-	 */
-	SCM scm;
-	SCM scmtype;
-};
-
-#define FCHILD(v) FIRST_V(&(v)->components)
-
-INIT_F(vcomponent);
-INIT_F(vcomponent, const char* type);
-INIT_F(vcomponent, const char* type, const char* filename);
-FREE_F(vcomponent);
-
-content_line* get_attributes (vcomponent* ev, const char* key);
-
-int add_content_line (vcomponent* ev, content_line* c);
-
-int vcomponent_push_val (vcomponent*, const char* key, const char* val);
-char* vcomponent_get_val (vcomponent*, const char* key);
-
-/*
- * Appends ev to cal. Doesn't copy ev. So make sure that it wont go
- * out of scope.
- */
-int PUSH(vcomponent)(vcomponent*, vcomponent*);
-
-/*
- * Deep copy is currently not implemented for vcomponentes.
- * The reason for this method being here is since some
- * generic methods in other places complain otherwise.
- */
-int DEEP_COPY(vcomponent)(vcomponent*, vcomponent*);
-
-/*
- * "Shallow" copy of vcomponent.
- */
-int vcomponent_copy(vcomponent*, vcomponent*);
-
-FMT_F(vcomponent);
-
-#endif /* VCAL_H */
-- 
cgit v1.2.3