- fix PHP4 build in http_error_ex()
[m6w6/ext-http] / missing.c
1 /*
2 +----------------------------------------------------------------------+
3 | PECL :: http |
4 +----------------------------------------------------------------------+
5 | This source file is subject to version 3.0 of the PHP license, that |
6 | is bundled with this package in the file LICENSE, and is available |
7 | through the world-wide-web at http://www.php.net/license/3_0.txt. |
8 | If you did not receive a copy of the PHP license and are unable to |
9 | obtain it through the world-wide-web, please send a note to |
10 | license@php.net so we can mail you a copy immediately. |
11 +----------------------------------------------------------------------+
12 | Copyright (c) 2004-2005 Michael Wallner <mike@php.net> |
13 +----------------------------------------------------------------------+
14 */
15
16 /* $Id$ */
17
18 #include "php.h"
19 #include "missing.h"
20
21 #ifdef WONKY
22 int zend_declare_property_double(zend_class_entry *ce, char *name, int name_length, double value, int access_type TSRMLS_DC)
23 {
24 zval *property = pemalloc(sizeof(zval), ce->type & ZEND_INTERNAL_CLASS);
25 INIT_PZVAL(property);
26 ZVAL_DOUBLE(property, value);
27 return zend_declare_property(ce, name, name_length, property, access_type TSRMLS_CC);
28 }
29
30 void zend_update_property_double(zend_class_entry *scope, zval *object, char *name, int name_length, double value TSRMLS_DC)
31 {
32 zval *tmp = ecalloc(1, sizeof(zval));
33 ZVAL_DOUBLE(tmp, value);
34 zend_update_property(scope, object, name, name_length, tmp TSRMLS_CC);
35 }
36
37 int zend_declare_property_bool(zend_class_entry *ce, char *name, int name_length, long value, int access_type TSRMLS_DC)
38 {
39 zval *property = pemalloc(sizeof(zval), ce->type & ZEND_INTERNAL_CLASS);
40 INIT_PZVAL(property);
41 ZVAL_BOOL(property, value);
42 return zend_declare_property(ce, name, name_length, property, access_type TSRMLS_CC);
43 }
44
45 void zend_update_property_bool(zend_class_entry *scope, zval *object, char *name, int name_length, long value TSRMLS_DC)
46 { zval *tmp = ecalloc(1, sizeof(zval));
47 ZVAL_BOOL(tmp, value);
48 zend_update_property(scope, object, name, name_length, tmp TSRMLS_CC);
49 }
50 #endif
51
52 /*
53 * Local variables:
54 * tab-width: 4
55 * c-basic-offset: 4
56 * End:
57 * vim600: noet sw=4 ts=4 fdm=marker
58 * vim<600: noet sw=4 ts=4
59 */
60