hyung-hwan/qse
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

cleaned up code

Browse Source
This commit is contained in:
hyung-hwan 2009-02-24 08:03:28 +00:00
parent 8af127910b
commit a0e3b67946
2 changed files with 45 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

50
qse/include/qse/awk/awk.h
View File

@ -1,5 +1,5 @@
/* /*
* $Id: awk.h 75 2009-02-22 14:10:34Z hyunghwan.chung $ * $Id: awk.h 78 2009-02-23 14:03:28Z hyunghwan.chung $
* *
Copyright 2006-2009 Chung, Hyung-Hwan. Copyright 2006-2009 Chung, Hyung-Hwan.
@ -583,9 +583,6 @@ typedef struct qse_awk_valtostr_out_t qse_awk_valtostr_out_t;
#endif #endif
typedef struct qse_awk_val_nil_t qse_awk_val_nil_t; typedef struct qse_awk_val_nil_t qse_awk_val_nil_t;
typedef struct qse_awk_val_int_t qse_awk_val_int_t;
typedef struct qse_awk_val_real_t qse_awk_val_real_t;
typedef struct qse_awk_val_str_t qse_awk_val_str_t;
typedef struct qse_awk_val_rex_t qse_awk_val_rex_t; typedef struct qse_awk_val_rex_t qse_awk_val_rex_t;
typedef struct qse_awk_val_map_t qse_awk_val_map_t; typedef struct qse_awk_val_map_t qse_awk_val_map_t;
typedef struct qse_awk_val_ref_t qse_awk_val_ref_t; typedef struct qse_awk_val_ref_t qse_awk_val_ref_t;
@ -605,40 +602,77 @@ typedef struct qse_awk_val_chunk_t qse_awk_val_chunk_t;
#define QSE_AWK_VAL_TYPE(x) ((x)->type) #define QSE_AWK_VAL_TYPE(x) ((x)->type)
/****s* AWK/qse_awk_val_t
* NAME
* qse_awk_val_t - define an abstract value type
* SYNOPSIS
*/
struct qse_awk_val_t struct qse_awk_val_t
{ {
QSE_AWK_VAL_HDR; QSE_AWK_VAL_HDR;
}; };
/******/
/* QSE_AWK_VAL_NIL */ /****s* AWK/qse_awk_val_nil_t
* NAME
* qse_awk_val_nil_t - define a nil value type
* DESCRIPTION
* The type field is QSE_AWK_VAL_NIL.
* SYNOPSIS
*/
struct qse_awk_val_nil_t struct qse_awk_val_nil_t
{ {
QSE_AWK_VAL_HDR; QSE_AWK_VAL_HDR;
}; };
/******/
/* QSE_AWK_VAL_INT */ /****s* AWK/qse_awk_val_int_t
* NAME
* qse_awk_val_int_t - define an integer number type
* DESCRIPTION
* The type field is QSE_AWK_VAL_INT.
* SYNOPSIS
*/
struct qse_awk_val_int_t struct qse_awk_val_int_t
{ {
QSE_AWK_VAL_HDR; QSE_AWK_VAL_HDR;
qse_long_t val; qse_long_t val;
void* nde; void* nde;
}; };
typedef struct qse_awk_val_int_t qse_awk_val_int_t;
/******/
/* QSE_AWK_VAL_REAL */ /****s* AWK/qse_awk_val_real_t
* NAME
* qse_awk_val_real_t - define a floating-point number type
* DESCRIPTION
* The type field is QSE_AWK_VAL_REAL.
* SYNOPSIS
*/
struct qse_awk_val_real_t struct qse_awk_val_real_t
{ {
QSE_AWK_VAL_HDR; QSE_AWK_VAL_HDR;
qse_real_t val; qse_real_t val;
void* nde; void* nde;
}; };
typedef struct qse_awk_val_real_t qse_awk_val_real_t;
/******/
/* QSE_AWK_VAL_STR */ /****s* AWK/qse_awk_val_str_t
* NAME
* qse_awk_val_str_t - define a string type
* DESCRIPTION
* The type field is QSE_AWK_VAL_STR.
* SYNOPSIS
*/
struct qse_awk_val_str_t struct qse_awk_val_str_t
{ {
QSE_AWK_VAL_HDR; QSE_AWK_VAL_HDR;
qse_char_t* ptr; qse_char_t* ptr;
qse_size_t len; qse_size_t len;
}; };
typedef struct qse_awk_val_str_t qse_awk_val_str_t;
/******/
/* QSE_AWK_VAL_REX */ /* QSE_AWK_VAL_REX */
struct qse_awk_val_rex_t struct qse_awk_val_rex_t

5
qse/lib/awk/val.c
View File

@ -1,5 +1,5 @@
/* /*
* $Id: val.c 75 2009-02-22 14:10:34Z hyunghwan.chung $ * $Id: val.c 78 2009-02-23 14:03:28Z hyunghwan.chung $
* *
Copyright 2006-2009 Chung, Hyung-Hwan. Copyright 2006-2009 Chung, Hyung-Hwan.
@ -250,7 +250,8 @@ qse_awk_val_t* qse_awk_rtx_makerealval (qse_awk_rtx_t* run, qse_real_t v)
return (qse_awk_val_t*)val; return (qse_awk_val_t*)val;
} }
qse_awk_val_t* qse_awk_rtx_makestrval0 (qse_awk_rtx_t* run, const qse_char_t* str) qse_awk_val_t* qse_awk_rtx_makestrval0 (
qse_awk_rtx_t* run, const qse_char_t* str)
{ {
return qse_awk_rtx_makestrval (run, str, qse_strlen(str)); return qse_awk_rtx_makestrval (run, str, qse_strlen(str));
} }