[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Guile: What's wrong with this?
From: |
Bruce Korb |
Subject: |
Re: Guile: What's wrong with this? |
Date: |
Wed, 04 Jan 2012 14:36:47 -0800 |
User-agent: |
Mozilla/5.0 (X11; Linux x86_64; rv:9.0) Gecko/20111220 Thunderbird/9.0 |
Hi Ludo,
On 01/04/12 13:17, Ludovic Courtès wrote:
If the users files are evaluated rather than compiled/loaded, this is
not a problem:
I do *all* guile processing via the ag_scm_c_eval_string_from_file_line
function. I suck up a string from my input file, determine that it
needs guile processing and invoke that function. It has this profile:
SCM
ag_scm_c_eval_string_from_file_line(
char const * pzExpr, char const * pzFile, int line);
#define SCM_EVAL_CONST(_s) \
do { static file_line_t const fl = { __LINE__ - 1, __FILE__, _s }; \
pzLastScheme = fl.text; \
ag_scm_c_eval_string_from_file_line(fl.text, fl.file, fl.line); \
} while (0)
and I *can* redefine define because I start Guile with my own
initialization:
#define SCHEME_INIT_FILE "directive.h"
static const int schemeLine = __LINE__+2;
static char const zSchemeInit[3846] = // this is generated code...
"(use-modules (ice-9 common-list))\n\
..................................";
pzLastScheme = zSchemeInit;
ag_scm_c_eval_string_from_file_line(
zSchemeInit, SCHEME_INIT_FILE, schemeLine);
SCM_EVAL_CONST("(add-hook! before-error-hook error-source-line)\n"
"(use-modules (ice-9 stack-catch))");
Could you check whether this is the case?
So it is the case. My processing consists of slicing up the input
into a bunch of slivers based on markers. I look at each sliver to
see how to process it. Some are emitted directly, others trigger
internal mechanisms, a few are handed off to a separate server shell
process and finally, if the text starts with an open parenthesis
or a semi-colon (Guile comment marker), then Guile gets it via that call.
Thanks -Bruce
- Re: What's wrong with this?, (continued)
- Re: What's wrong with this?, Mike Gran, 2012/01/03
- Re: Guile: What's wrong with this?, Bruce Korb, 2012/01/03
- Re: Guile: What's wrong with this?, Mike Gran, 2012/01/03
- Re: Guile: What's wrong with this?, Ludovic Courtès, 2012/01/03
- Re: Guile: What's wrong with this?, Bruce Korb, 2012/01/03
- Re: Guile: What's wrong with this?, Ludovic Courtès, 2012/01/03
- Re: Guile: What's wrong with this?, Bruce Korb, 2012/01/03
- Re: Guile: What's wrong with this?, Noah Lavine, 2012/01/03
- Re: bytevector -- was: Guile: What's wrong with this?, Bruce Korb, 2012/01/04
- Re: Guile: What's wrong with this?, Ludovic Courtès, 2012/01/04
- Re: Guile: What's wrong with this?,
Bruce Korb <=
- Re: Guile: What's wrong with this?, Ludovic Courtès, 2012/01/04
- Re: non-reproduction of initial issue -- was: Guile: What's wrong with this?, Bruce Korb, 2012/01/05
- Re: non-reproduction of initial issue -- was: Guile: What's wrong with this?, Mark H Weaver, 2012/01/05
- Re: Guile: What's wrong with this?, Ian Price, 2012/01/04
- Re: Guile: What's wrong with this?, Bruce Korb, 2012/01/04
- Re: Guile: What's wrong with this?, Andy Wingo, 2012/01/04
- Re: Guile: What's wrong with this?, David Kastrup, 2012/01/04
- Re: Guile: What's wrong with this?, Ian Price, 2012/01/04
- Re: Guile: What's wrong with this?, Bruce Korb, 2012/01/04
- Re: Guile: What's wrong with this?, Mike Gran, 2012/01/04