537 |
rest= malloc(inlength); |
rest= malloc(inlength); |
538 |
|
|
539 |
do { |
do { |
540 |
|
/* If comment */ |
541 |
|
if((convert= sscanf(in_line, "#%[^\n\r]", rest))) { |
542 |
|
free(temp); free(rest); |
543 |
|
return; |
544 |
|
} |
545 |
|
|
546 |
/* If string */ |
/* If string */ |
547 |
if((convert= sscanf(in_line, "\"%[^\"\n\r]\" %[^\n\r]", temp, rest))) { |
if((convert= sscanf(in_line, "\"%[^\"\n\r]\" %[^\n\r]", temp, rest))) { |
548 |
push_cstring(&(env->head), temp); |
push_cstring(&(env->head), temp); |
621 |
return; |
return; |
622 |
} |
} |
623 |
|
|
624 |
|
rev(env); |
625 |
|
|
626 |
|
if(env->err) |
627 |
|
return; |
628 |
|
|
629 |
/* The first list element is the new stack head */ |
/* The first list element is the new stack head */ |
630 |
new_head= temp= env->head->item->content.ptr; |
new_head= temp= env->head->item->content.ptr; |
631 |
|
|