This commit is contained in:
parent
aaa6e35787
commit
632fbfdba2
6
lang.txt
6
lang.txt
@ -26,6 +26,12 @@
|
||||
#b[ ] byte array??
|
||||
#[ ] normal array?
|
||||
|
||||
allow b'X' or 'X' in byte array in #b[] notation?
|
||||
|
||||
signal handling
|
||||
|
||||
full oop
|
||||
|
||||
make basic branded types to an object if possible.
|
||||
for example (#[10 20]:at 1)
|
||||
|
||||
|
23
lib/read.c
23
lib/read.c
@ -2172,6 +2172,29 @@ not_consumed:
|
||||
return 0;
|
||||
}
|
||||
|
||||
static int flx_hmarked_b (hcl_t* hcl, hcl_ooci_t c)
|
||||
{
|
||||
#if 0
|
||||
hcl_flx_hb_t* hb = FLX_HB(hcl);
|
||||
|
||||
if (c == '[')
|
||||
{
|
||||
}
|
||||
else
|
||||
{
|
||||
init_flx_hn (FLX_HN(hcl), HCL_TOK_RADNUMLIT, HCL_SYNERR_NUMLIT, 2);
|
||||
FEED_CONTINUE (hcl, HCL_FLX_HMARKED_NUMBER);
|
||||
goto not_consumed;
|
||||
}
|
||||
#endif
|
||||
|
||||
consumed:
|
||||
return 1;
|
||||
|
||||
not_consumed:
|
||||
return 0;
|
||||
}
|
||||
|
||||
static int flx_hmarked_number (hcl_t* hcl, hcl_ooci_t c)
|
||||
{
|
||||
hcl_flx_hn_t* rn = FLX_HN(hcl);
|
||||
|
Loading…
Reference in New Issue
Block a user