diff options
| author | Hugo Hörnquist <hugo@hornquist.se> | 2019-05-02 23:44:20 +0200 |
|---|---|---|
| committer | Hugo Hörnquist <hugo@hornquist.se> | 2019-05-02 23:44:20 +0200 |
| commit | 4ec130209bcd88ffde56b9b44e2de2c043519ffc (patch) | |
| tree | 06fef07fac9fda6461e4e28b5eb2724bece52c92 /module/vcomponent/primitive.scm | |
| parent | work on porting most internal datastructures to scheme equivalents. (diff) | |
| download | calp-4ec130209bcd88ffde56b9b44e2de2c043519ffc.tar.gz calp-4ec130209bcd88ffde56b9b44e2de2c043519ffc.tar.xz | |
Think it's only reintroducing of set! left.
Diffstat (limited to 'module/vcomponent/primitive.scm')
| -rw-r--r-- | module/vcomponent/primitive.scm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/module/vcomponent/primitive.scm b/module/vcomponent/primitive.scm index 06b6fd83..53d73652 100644 --- a/module/vcomponent/primitive.scm +++ b/module/vcomponent/primitive.scm @@ -20,3 +20,6 @@ (string-append (dirname (dirname (dirname (current-filename)))) "/lib")) (load-extension "libguile-calendar" "init_lib") + +(define (%vcomponent-attribute-list comp) + (map car (hash-map->list cons (%vcomponent-get-hash-table comp)))) |