X-Git-Url: https://git.m6w6.name/?p=m6w6%2Fext-psi;a=blobdiff_plain;f=src%2Ftypes%2Flet_vals.h;h=01b1d8445fc32f8d0da75112457d3dc6a17622cd;hp=f46345c224a638b2627e7e9366bd0336373afbe2;hb=a107dfcca2dfd0fc5a2779a8d679f778cb8f3290;hpb=e5103bb1ce17ef734e1329da9a13d9a2cbc40ad9

diff --git a/src/types/let_vals.h b/src/types/let_vals.h
index f46345c..01b1d84 100644
--- a/src/types/let_vals.h
+++ b/src/types/let_vals.h
@@ -1,42 +1,54 @@
-#ifndef _PSI_TYPES_LET_VALS_H
-#define _PSI_TYPES_LET_VALS_H
+/*******************************************************************************
+ Copyright (c) 2016, Michael Wallner <mike@php.net>.
+ All rights reserved.
 
-struct let_val;
+ Redistribution and use in source and binary forms, with or without
+ modification, are permitted provided that the following conditions are met:
+
+     * Redistributions of source code must retain the above copyright notice,
+       this list of conditions and the following disclaimer.
+     * Redistributions in binary form must reproduce the above copyright
+       notice, this list of conditions and the following disclaimer in the
+       documentation and/or other materials provided with the distribution.
+
+ THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
+ AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+ IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
+ DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE
+ FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+ DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
+ SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
+ CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
+ OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
+ OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+*******************************************************************************/
+
+#ifndef PSI_TYPES_LET_VALS_H
+#define PSI_TYPES_LET_VALS_H
+
+#include "let_val.h"
 
 typedef struct let_vals {
 	struct let_val **vals;
 	size_t count;
 } let_vals;
 
-static inline let_vals *init_let_vals(struct let_val *val) {
-	let_vals *vals = calloc(1, sizeof(*vals));
-	if (val) {
-		vals->count = 1;
-		vals->vals = calloc(1, sizeof(val));
-		vals->vals[0] = val;
-	}
-	return vals;
-}
+let_vals *init_let_vals(struct let_val *val);
+let_vals *add_let_val(let_vals *vals, struct let_val *val);
+void free_let_vals(let_vals *vals);
 
-static inline let_vals *add_let_val(let_vals *vals, struct let_val *val) {
-	if (!vals) {
-		vals = calloc(1, sizeof(*vals));
-	}
-	vals->vals = realloc(vals->vals, ++vals->count * sizeof(val));
-	vals->vals[vals->count-1] = val;
-	return vals;
-}
+static inline let_val *locate_let_vals_val(let_vals *vals, const char *name) {
+	size_t i;
 
-static inline void free_let_vals(let_vals *vals) {
-	if (vals->vals) {
-		size_t i;
+	for (i = 0; i < vals->count; ++i) {
+		let_val *val = vals->vals[i];
+		const char *var = locate_let_val_varname(val);
 
-		for (i = 0; i < vals->count; ++i) {
-			free_let_val(vals->vals[i]);
+		if (!strcmp(var, name)) {
+			return val;
 		}
-		free(vals->vals);
 	}
-	free(vals);
-}
 
+	return NULL;
+}
 #endif