Extending a GTK+ Application with Guile

Hello Guilers.

I'm currently writing some prototype code before starting a project and
have a few questions that I hope some of you may be able to answer.

My intent is to add guile as a method of [optionally, at build time]
extending a GTK+ application. With the addition of being able to run
guile scripts I hope to provide a guile-shell to give real-time
interactive power. First a question of program architecture;

As the guile extensions are optional I run GTK on a main thread and the
shell on a second pthread. I connect the shell through a PTY to the
virtual terminal widget.

I apologise to those with mail clients not using monospace fonts.

  THREAD1            THREAD2
 ---------           -------
| GTK     |   pty   | guile |
|     VTE |<------->| shell |
|  -----  |          -------
| guile   |
|  scripts|
 ---------

0) Is there anything wrong with this architecture?

   a) Is it valid to use both scm_shell and other guile code at the same
   time or is scm_shell designed to run in isolation?

letter occurence in a text

hello my problem is to count occurence of letter in a text and come out with
an assoc-list like
'((a.16) (b.10) ... (z.5))
i started a fee function but they don't work so please help me

;; an alist
(define lettre '((""."") ) )
(define lettre2 '(("a". 1) ("b". 1) ("c". 1) ) )

;; this function take a key and an alist
;; add the key to the alist if it is not a space,a newline,and does not
already exist
;; update the value of the given key
(define (lettre-test x alist)
	(cond ((and 
          	( and (not (char=?  x #\space))(not (char=?  x #\newline)))   
          			(eq? (assoc (make-string 1 x) alist) #f))  
          	(set! alist
          		(assoc-set! alist (make-string 1 x) 0 )))
          	((char=?  x #\space) '())
          	((char=?  x #\newline) '())		 
           	(else
           	(set! alist   
       			(assoc-set! alist (make-string 1 x) (+ (assoc-ref alist
(make-string 1 x)) 1))))))
	
;; this function open a file
;; read the caracter and count the occurence of each character	
(define (compte-char source alist)	

guile-lib test failed

With guile 2.0.5 installing guile-lib 0.2.1 ./configure and make
run without problems. But "make check" say one test failed. See
attached file. There are some spanish messages. I don't know how
configure it to display all in english. Regards.

Making check in src
make[1]: se ingresa al directorio `/home/german/Instalados/desde-codigo/guile-lib-0.2.1/src'
make[1]: No se hace nada para `check'.
make[1]: se sale del directorio `/home/german/Instalados/desde-codigo/guile-lib-0.2.1/src'
Making check in doc
make[1]: se ingresa al directorio `/home/german/Instalados/desde-codigo/guile-lib-0.2.1/doc'
make[1]: No se hace nada para `check'.
make[1]: se sale del directorio `/home/german/Instalados/desde-codigo/guile-lib-0.2.1/doc'
Making check in examples
make[1]: se ingresa al directorio `/home/german/Instalados/desde-codigo/guile-lib-0.2.1/examples'
make[1]: No se hace nada para `check'.
make[1]: se sale del directorio `/home/german/Instalados/desde-codigo/guile-lib-0.2.1/examples'
Making check in unit-tests
make[1]: se ingresa al directorio `/home/german/Instalados/desde-codigo/guile-lib-0.2.1/unit-tests'
make  check-TESTS
make[2]: se ingresa al directorio `/home/german/Instalados/desde-codigo/guile-lib-0.2.1/unit-tests'

Running test suite: main-suite ----------------------------------------

Running test suite: <test-api>-suite ----------------------------------
Running test case: test-api

;;; WARNING (New API, update your API form ((<test-api>)))

1 run, 0 failed

dynamic ffi and C struct

Hello,

Is it possible to use the current dynamic ffi to call a C function
whose parameter is a C struct (not a pointer to a C struct) ?

I cannot find much about it in the documentation.  After a brief look
at the source of foreign.c of guile, I found guile actually does some
parsing of nested argument list for `pointer->procedure' and generates
compound ffi types.  But I don't know the right data structure to give
when actually calling the foreign function.

For example, what should I do for the following function?

typedef struct {
  int dat[2];
} foo_t;

int func ( foo_t arg );

--

-- 
Cong Gu

RE: guile-gnome-platform 2.16.2 released

[ANN] Guile-Reader 0.6

Version 0.6 of Guile-Reader for Guile 2.0.x and 1.8.x is now available.
This release adds new features, most notably Guile 2.0 and Unicode support.

  http://dl.sv.nongnu.org/releases/guile-reader/guile-reader-0.6.tar.gz
  http://dl.sv.nongnu.org/releases/guile-reader/guile-reader-0.6.tar.gz.sig

SHA1 sums:

  aaedfe0c656775ba895b02293481a7d7c36b1f7e  guile-reader-0.6.tar.gz
  284404e6403d396819ff4e060d4a496f66727d8f  guile-reader-0.6.tar.gz.sig

Documentation is available from:

  http://www.nongnu.org/guile-reader/

Guile-Reader is a reader creation framework for Guile.  It can be
thought of as an alternative to Guile's built-in reader.  The purpose of
Guile-Reader is to allow for the creation of readers for different
variants of the Scheme/Lisp syntax.  Its design allows the re-use and
composition of various parts of a lexer called “token readers”.  It
comes with a library of re-usable token readers that can be used to
build a Scheme reader with various extensions.  For instance, syntax
extensions for DSSSL keywords, SRFI-30 block comments, SRFI-62 S-exp
comments, square-bracket S-exps, and brace S-exps are provided and
readily usable through the ‘make-alternate-guile-reader’ procedure.

Additionally, Guile-Reader aims to improve on Guile's reader sub-system
by allowing for the coexistence of several, potentially incompatible,
readers within a single Guile program.  In particular, it provides a
“confinement” mechanism that confines changes made via ‘read-set!’ and
‘read-hash-extend’ to the calling module.

New in Guile-Reader 0.6

  * Guile-Reader is now distributed under GPLv3 or later (instead of
    GPLv2 or later).

  * New token reader for R6RS-style syntax quotes: #', #`, and #,.

  * `make-guile-reader' returns a reader that understands SRFI-62
    s-exp comments, R6RS-style syntax quotes, and s-exps introduced by
    square brackets.  All these are supported by default by `read' in
    Guile 2.0.

  * On Guile 2.0, non-ASCII Unicode symbols, strings, characters, and
    Skribe-expressions are correctly read.

  * On Guile 2.0, Scheme source files are compiled and installed.

  * Bugs fixed

    * Add support for rationals in the number token reader.

    * Provide replacement for some `scm_i_' functions and other
      internals no longer accessible in Guile 1.9+.

    * Adjust packaging so that it works with Guile 1.9+.

Ludovic.

http-read with cookie

Unbound variable: cond-expand-provide

Working http-get example and still unsolved problem

Problem with guile on Dragora

Hi, I'm testing guile 2.0.5 in a new system (www.dragora.org). The
compilation seems OK. But when I run guile I get:

bash-4.2$ guile
Backtrace:
In ice-9/boot-9.scm:
 149: 2 [catch #t #<catch-closure 830e510> ...]
 157: 1 [#<procedure 82dd8c0 ()>]
In unknown file:
   ?: 0 [catch-closure]

ERROR: In procedure catch-closure:
ERROR: Throw to key `decoding-error' with args `("scm_from_stringn"
"input locale conversion error" 22 #vu8(103 117 105 108 101))'.
bash-4.2$ 

Attached the config.log. Thanks in advance.

I'm looking for a method of converting a string's character encoding