Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Bindings for GridBox constructor |
|---|---|
| Downloads: | Tarball | ZIP archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: |
ef300926a4c118e3fb36f5b3e4bfdc3d |
| User & Date: | murphy 2015-07-25 14:29:44.749 |
Context
|
2015-07-26
| ||
| 23:57 | Use external callback registry - prevents attribute lookup chaining problems - creates fewer garbage collection roots check-in: 8f6bdb17f4 user: murphy tags: trunk | |
|
2015-07-25
| ||
| 14:29 | Bindings for GridBox constructor check-in: ef300926a4 user: murphy tags: trunk | |
|
2015-05-03
| ||
| 22:43 | Updated CHICKEN release information file check-in: 6cbe5a56c8 user: murphy tags: trunk | |
Changes
Changes to api/base.wiki.
| ︙ | ︙ | |||
282 283 284 285 286 287 288 289 290 291 292 293 294 295 | <h3><a id="dialog"><code><nowiki>(dialog [child (or/c ihandle? #f)] #:<name> <value> ...) → ihandle?</nowiki></code></a></h3> Creates a new dialog with the given child. <h3><a id="fill"><code><nowiki>(fill #:<name> <value> ...) → ihandle?</nowiki></code></a></h3> Creates a new fill element. <h3><a id="hbox"><code><nowiki>(hbox [child ihandle?] ... #:<name> <value> ...) → ihandle?</nowiki></code></a></h3> Creates a new horizontal box with the given children. <h3><a id="vbox"><code><nowiki>(vbox [child ihandle?] ... #:<name> <value> ...) → ihandle?</nowiki></code></a></h3> | > > > > | 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299 | <h3><a id="dialog"><code><nowiki>(dialog [child (or/c ihandle? #f)] #:<name> <value> ...) → ihandle?</nowiki></code></a></h3> Creates a new dialog with the given child. <h3><a id="fill"><code><nowiki>(fill #:<name> <value> ...) → ihandle?</nowiki></code></a></h3> Creates a new fill element. <h3><a id="gridbox"><code><nowiki>(gridbox [child ihandle?] ... #:<name> <value> ...) → ihandle?</nowiki></code></a></h3> Creates a new grid box with the given children. <h3><a id="hbox"><code><nowiki>(hbox [child ihandle?] ... #:<name> <value> ...) → ihandle?</nowiki></code></a></h3> Creates a new horizontal box with the given children. <h3><a id="vbox"><code><nowiki>(vbox [child ihandle?] ... #:<name> <value> ...) → ihandle?</nowiki></code></a></h3> |
| ︙ | ︙ |
Changes to chicken/iup-base.scm.
| ︙ | ︙ | |||
510 511 512 513 514 515 516 517 518 519 520 521 522 523 | (make-constructor-procedure (foreign-lambda nonnull-ihandle "IupDialog" ihandle))) (define fill (make-constructor-procedure (foreign-lambda nonnull-ihandle "IupFill"))) (define hbox (make-constructor-procedure (foreign-lambda* nonnull-ihandle ([ihandle-list handles]) "C_return(IupHboxv((Ihandle **)handles));") #:apply-args list)) (define vbox (make-constructor-procedure | > > > > > | 510 511 512 513 514 515 516 517 518 519 520 521 522 523 524 525 526 527 528 | (make-constructor-procedure (foreign-lambda nonnull-ihandle "IupDialog" ihandle))) (define fill (make-constructor-procedure (foreign-lambda nonnull-ihandle "IupFill"))) (define gridbox (make-constructor-procedure (foreign-lambda* nonnull-ihandle ([ihandle-list handles]) "C_return(IupGridBoxv((Ihandle **)handles));") #:apply-args list)) (define hbox (make-constructor-procedure (foreign-lambda* nonnull-ihandle ([ihandle-list handles]) "C_return(IupHboxv((Ihandle **)handles));") #:apply-args list)) (define vbox (make-constructor-procedure |
| ︙ | ︙ |
Changes to chicken/iup.scm.
| ︙ | ︙ | |||
19 20 21 22 23 24 25 | child-add! child-remove! child-move! child-ref child-pos child-count :children children refresh redraw child-x/y->pos show hide dialog | | | 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 | child-add! child-remove! child-move! child-ref child-pos child-count :children children refresh redraw child-x/y->pos show hide dialog fill gridbox hbox vbox zbox cbox sbox radio normalizer split image/palette image/rgb image/rgba image/file image-save current-focus focus-next focus-previous menu menu-item menu-separator clipboard timer send-url) (import scheme chicken foreign |
| ︙ | ︙ |
Changes to racket/base.rkt.
| ︙ | ︙ | |||
532 533 534 535 536 537 538 539 540 541 542 543 544 545 |
(define fill
(make-constructor-procedure
(get-ffi-obj
"IupFill" libiup
(_fun -> [handle : _ihandle]))))
(define hbox
(make-constructor-procedure
(get-ffi-obj
"IupHboxv" libiup
(_fun children :: [children : (_list i _ihandle/null) = (append children '(#f))]
-> [handle : _ihandle]))))
| > > > > > > > | 532 533 534 535 536 537 538 539 540 541 542 543 544 545 546 547 548 549 550 551 552 |
(define fill
(make-constructor-procedure
(get-ffi-obj
"IupFill" libiup
(_fun -> [handle : _ihandle]))))
(define gridbox
(make-constructor-procedure
(get-ffi-obj
"IupGridBoxv" libiup
(_fun children :: [children : (_list i _ihandle/null) = (append children '(#f))]
-> [handle : _ihandle]))))
(define hbox
(make-constructor-procedure
(get-ffi-obj
"IupHboxv" libiup
(_fun children :: [children : (_list i _ihandle/null) = (append children '(#f))]
-> [handle : _ihandle]))))
|
| ︙ | ︙ | |||
758 759 760 761 762 763 764 | child-add! child-remove! child-move! child-ref child-pos child-count in-children children refresh redraw child-x/y->pos show hide dialog | | | 765 766 767 768 769 770 771 772 773 774 775 776 777 | child-add! child-remove! child-move! child-ref child-pos child-count in-children children refresh redraw child-x/y->pos show hide dialog fill gridbox hbox vbox zbox cbox sbox radio normalizer split image/palette image/rgb image/rgba image/file image-save current-focus focus-next focus-previous menu menu-item menu-separator clipboard timer send-url) |