gtk.ffi.c (105687B)
1 /* Generated from gtk.ffi */ 2 3 #include "../pico.h" 4 5 #include "gtk/gtk.h" 6 #include "glade/glade.h" 7 8 any cfun_gtk_window_new(any ex) { 9 any x = ex, y; 10 x = cdr(x); 11 y = EVAL(car(x)); 12 NeedNum(ex, y); 13 long b1 = (long) unBox(y); 14 void* z = gtk_window_new(b1); 15 return box(z); 16 } 17 18 any cfun_gtk_window_set_title(any ex) { 19 any x = ex, y; 20 x = cdr(x); 21 y = EVAL(car(x)); 22 NeedNum(ex, y); 23 void* b1 = (void*) unBox(y); 24 x = cdr(x); 25 y = EVAL(car(x)); 26 any y2s = xSym(y); 27 char b2[bufSize(y2s)]; 28 bufString(y2s, b2); 29 gtk_window_set_title(b1, b2); 30 return Nil; 31 } 32 33 any cfun_gtk_window_get_title(any ex) { 34 any x = ex, y; 35 x = cdr(x); 36 y = EVAL(car(x)); 37 NeedNum(ex, y); 38 void* b1 = (void*) unBox(y); 39 char* z = gtk_window_get_title(b1); 40 return mkStr(z); 41 } 42 43 any cfun_gtk_window_set_default_size(any ex) { 44 any x = ex, y; 45 x = cdr(x); 46 y = EVAL(car(x)); 47 NeedNum(ex, y); 48 void* b1 = (void*) unBox(y); 49 x = cdr(x); 50 y = EVAL(car(x)); 51 NeedNum(ex, y); 52 long b2 = (long) unBox(y); 53 x = cdr(x); 54 y = EVAL(car(x)); 55 NeedNum(ex, y); 56 long b3 = (long) unBox(y); 57 gtk_window_set_default_size(b1, b2, b3); 58 return Nil; 59 } 60 61 any cfun_gtk_window_set_position(any ex) { 62 any x = ex, y; 63 x = cdr(x); 64 y = EVAL(car(x)); 65 NeedNum(ex, y); 66 void* b1 = (void*) unBox(y); 67 x = cdr(x); 68 y = EVAL(car(x)); 69 NeedNum(ex, y); 70 long b2 = (long) unBox(y); 71 gtk_window_set_position(b1, b2); 72 return Nil; 73 } 74 75 any cfun_gtk_window_set_resizable(any ex) { 76 any x = ex, y; 77 x = cdr(x); 78 y = EVAL(car(x)); 79 NeedNum(ex, y); 80 void* b1 = (void*) unBox(y); 81 x = cdr(x); 82 y = EVAL(car(x)); 83 int b2 = y == Nil ? 0 : 1; 84 gtk_window_set_resizable(b1, b2); 85 return Nil; 86 } 87 88 any cfun_gtk_window_set_transient_for(any ex) { 89 any x = ex, y; 90 x = cdr(x); 91 y = EVAL(car(x)); 92 NeedNum(ex, y); 93 void* b1 = (void*) unBox(y); 94 x = cdr(x); 95 y = EVAL(car(x)); 96 NeedNum(ex, y); 97 void* b2 = (void*) unBox(y); 98 gtk_window_set_transient_for(b1, b2); 99 return Nil; 100 } 101 102 any cfun_gtk_window_maximize(any ex) { 103 any x = ex, y; 104 x = cdr(x); 105 y = EVAL(car(x)); 106 NeedNum(ex, y); 107 void* b1 = (void*) unBox(y); 108 gtk_window_maximize(b1); 109 return Nil; 110 } 111 112 any cfun_gtk_message_dialog_new(any ex) { 113 any x = ex, y; 114 x = cdr(x); 115 y = EVAL(car(x)); 116 NeedNum(ex, y); 117 void* b1 = (void*) unBox(y); 118 x = cdr(x); 119 y = EVAL(car(x)); 120 NeedNum(ex, y); 121 long b2 = (long) unBox(y); 122 x = cdr(x); 123 y = EVAL(car(x)); 124 NeedNum(ex, y); 125 long b3 = (long) unBox(y); 126 x = cdr(x); 127 y = EVAL(car(x)); 128 NeedNum(ex, y); 129 long b4 = (long) unBox(y); 130 x = cdr(x); 131 y = EVAL(car(x)); 132 any y5s = xSym(y); 133 char b5[bufSize(y5s)]; 134 bufString(y5s, b5); 135 void* z = gtk_message_dialog_new(b1, b2, b3, b4, b5); 136 return box(z); 137 } 138 139 any cfun_gtk_window_set_icon_from_file(any ex) { 140 any x = ex, y; 141 x = cdr(x); 142 y = EVAL(car(x)); 143 NeedNum(ex, y); 144 void* b1 = (void*) unBox(y); 145 x = cdr(x); 146 y = EVAL(car(x)); 147 any y2s = xSym(y); 148 char b2[bufSize(y2s)]; 149 bufString(y2s, b2); 150 x = cdr(x); 151 y = EVAL(car(x)); 152 void* b3 = (void*) 0; 153 int z = gtk_window_set_icon_from_file(b1, b2, b3); 154 return z == 0 ? T : Nil; 155 } 156 157 any cfun_gtk_window_set_keep_above(any ex) { 158 any x = ex, y; 159 x = cdr(x); 160 y = EVAL(car(x)); 161 NeedNum(ex, y); 162 void* b1 = (void*) unBox(y); 163 x = cdr(x); 164 y = EVAL(car(x)); 165 int b2 = y == Nil ? 0 : 1; 166 gtk_window_set_keep_above(b1, b2); 167 return Nil; 168 } 169 170 any cfun_gtk_window_set_keep_below(any ex) { 171 any x = ex, y; 172 x = cdr(x); 173 y = EVAL(car(x)); 174 NeedNum(ex, y); 175 void* b1 = (void*) unBox(y); 176 x = cdr(x); 177 y = EVAL(car(x)); 178 int b2 = y == Nil ? 0 : 1; 179 gtk_window_set_keep_below(b1, b2); 180 return Nil; 181 } 182 183 any cfun_gtk_about_dialog_set_version(any ex) { 184 any x = ex, y; 185 x = cdr(x); 186 y = EVAL(car(x)); 187 NeedNum(ex, y); 188 void* b1 = (void*) unBox(y); 189 x = cdr(x); 190 y = EVAL(car(x)); 191 any y2s = xSym(y); 192 char b2[bufSize(y2s)]; 193 bufString(y2s, b2); 194 gtk_about_dialog_set_version(b1, b2); 195 return Nil; 196 } 197 198 any cfun_gtk_table_new(any ex) { 199 any x = ex, y; 200 x = cdr(x); 201 y = EVAL(car(x)); 202 NeedNum(ex, y); 203 long b1 = (long) unBox(y); 204 x = cdr(x); 205 y = EVAL(car(x)); 206 NeedNum(ex, y); 207 long b2 = (long) unBox(y); 208 x = cdr(x); 209 y = EVAL(car(x)); 210 int b3 = y == Nil ? 0 : 1; 211 void* z = gtk_table_new(b1, b2, b3); 212 return box(z); 213 } 214 215 any cfun_gtk_table_attach_defaults(any ex) { 216 any x = ex, y; 217 x = cdr(x); 218 y = EVAL(car(x)); 219 NeedNum(ex, y); 220 void* b1 = (void*) unBox(y); 221 x = cdr(x); 222 y = EVAL(car(x)); 223 NeedNum(ex, y); 224 void* b2 = (void*) unBox(y); 225 x = cdr(x); 226 y = EVAL(car(x)); 227 NeedNum(ex, y); 228 long b3 = (long) unBox(y); 229 x = cdr(x); 230 y = EVAL(car(x)); 231 NeedNum(ex, y); 232 long b4 = (long) unBox(y); 233 x = cdr(x); 234 y = EVAL(car(x)); 235 NeedNum(ex, y); 236 long b5 = (long) unBox(y); 237 x = cdr(x); 238 y = EVAL(car(x)); 239 NeedNum(ex, y); 240 long b6 = (long) unBox(y); 241 gtk_table_attach_defaults(b1, b2, b3, b4, b5, b6); 242 return Nil; 243 } 244 245 any cfun_gtk_container_add(any ex) { 246 any x = ex, y; 247 x = cdr(x); 248 y = EVAL(car(x)); 249 NeedNum(ex, y); 250 void* b1 = (void*) unBox(y); 251 x = cdr(x); 252 y = EVAL(car(x)); 253 NeedNum(ex, y); 254 void* b2 = (void*) unBox(y); 255 gtk_container_add(b1, b2); 256 return Nil; 257 } 258 259 any cfun_gtk_container_remove(any ex) { 260 any x = ex, y; 261 x = cdr(x); 262 y = EVAL(car(x)); 263 NeedNum(ex, y); 264 void* b1 = (void*) unBox(y); 265 x = cdr(x); 266 y = EVAL(car(x)); 267 NeedNum(ex, y); 268 void* b2 = (void*) unBox(y); 269 gtk_container_remove(b1, b2); 270 return Nil; 271 } 272 273 any cfun_gtk_container_set_border_width(any ex) { 274 any x = ex, y; 275 x = cdr(x); 276 y = EVAL(car(x)); 277 NeedNum(ex, y); 278 void* b1 = (void*) unBox(y); 279 x = cdr(x); 280 y = EVAL(car(x)); 281 NeedNum(ex, y); 282 long b2 = (long) unBox(y); 283 gtk_container_set_border_width(b1, b2); 284 return Nil; 285 } 286 287 any cfun_gtk_hbox_new(any ex) { 288 any x = ex, y; 289 x = cdr(x); 290 y = EVAL(car(x)); 291 int b1 = y == Nil ? 0 : 1; 292 x = cdr(x); 293 y = EVAL(car(x)); 294 NeedNum(ex, y); 295 long b2 = (long) unBox(y); 296 void* z = gtk_hbox_new(b1, b2); 297 return box(z); 298 } 299 300 any cfun_gtk_vbox_new(any ex) { 301 any x = ex, y; 302 x = cdr(x); 303 y = EVAL(car(x)); 304 int b1 = y == Nil ? 0 : 1; 305 x = cdr(x); 306 y = EVAL(car(x)); 307 NeedNum(ex, y); 308 long b2 = (long) unBox(y); 309 void* z = gtk_vbox_new(b1, b2); 310 return box(z); 311 } 312 313 any cfun_gtk_box_pack_start(any ex) { 314 any x = ex, y; 315 x = cdr(x); 316 y = EVAL(car(x)); 317 NeedNum(ex, y); 318 void* b1 = (void*) unBox(y); 319 x = cdr(x); 320 y = EVAL(car(x)); 321 NeedNum(ex, y); 322 void* b2 = (void*) unBox(y); 323 x = cdr(x); 324 y = EVAL(car(x)); 325 int b3 = y == Nil ? 0 : 1; 326 x = cdr(x); 327 y = EVAL(car(x)); 328 int b4 = y == Nil ? 0 : 1; 329 x = cdr(x); 330 y = EVAL(car(x)); 331 NeedNum(ex, y); 332 long b5 = (long) unBox(y); 333 gtk_box_pack_start(b1, b2, b3, b4, b5); 334 return Nil; 335 } 336 337 any cfun_gtk_box_pack_end(any ex) { 338 any x = ex, y; 339 x = cdr(x); 340 y = EVAL(car(x)); 341 NeedNum(ex, y); 342 void* b1 = (void*) unBox(y); 343 x = cdr(x); 344 y = EVAL(car(x)); 345 NeedNum(ex, y); 346 void* b2 = (void*) unBox(y); 347 x = cdr(x); 348 y = EVAL(car(x)); 349 int b3 = y == Nil ? 0 : 1; 350 x = cdr(x); 351 y = EVAL(car(x)); 352 int b4 = y == Nil ? 0 : 1; 353 x = cdr(x); 354 y = EVAL(car(x)); 355 NeedNum(ex, y); 356 long b5 = (long) unBox(y); 357 gtk_box_pack_end(b1, b2, b3, b4, b5); 358 return Nil; 359 } 360 361 any cfun_gtk_box_pack_start_defaults(any ex) { 362 any x = ex, y; 363 x = cdr(x); 364 y = EVAL(car(x)); 365 NeedNum(ex, y); 366 void* b1 = (void*) unBox(y); 367 x = cdr(x); 368 y = EVAL(car(x)); 369 NeedNum(ex, y); 370 void* b2 = (void*) unBox(y); 371 gtk_box_pack_start_defaults(b1, b2); 372 return Nil; 373 } 374 375 any cfun_gtk_box_pack_end_defaults(any ex) { 376 any x = ex, y; 377 x = cdr(x); 378 y = EVAL(car(x)); 379 NeedNum(ex, y); 380 void* b1 = (void*) unBox(y); 381 x = cdr(x); 382 y = EVAL(car(x)); 383 NeedNum(ex, y); 384 void* b2 = (void*) unBox(y); 385 gtk_box_pack_end_defaults(b1, b2); 386 return Nil; 387 } 388 389 any cfun_gtk_button_new(any ex __attribute__((unused))) { 390 void* z = gtk_button_new(); 391 return box(z); 392 } 393 394 any cfun_gtk_button_new_with_label(any ex) { 395 any x = ex, y; 396 x = cdr(x); 397 y = EVAL(car(x)); 398 any y1s = xSym(y); 399 char b1[bufSize(y1s)]; 400 bufString(y1s, b1); 401 void* z = gtk_button_new_with_label(b1); 402 return box(z); 403 } 404 405 any cfun_gtk_button_new_from_stock(any ex) { 406 any x = ex, y; 407 x = cdr(x); 408 y = EVAL(car(x)); 409 any y1s = xSym(y); 410 char b1[bufSize(y1s)]; 411 bufString(y1s, b1); 412 void* z = gtk_button_new_from_stock(b1); 413 return box(z); 414 } 415 416 any cfun_gtk_button_new_with_mnemonic(any ex) { 417 any x = ex, y; 418 x = cdr(x); 419 y = EVAL(car(x)); 420 any y1s = xSym(y); 421 char b1[bufSize(y1s)]; 422 bufString(y1s, b1); 423 void* z = gtk_button_new_with_mnemonic(b1); 424 return box(z); 425 } 426 427 any cfun_gtk_button_set_use_stock(any ex) { 428 any x = ex, y; 429 x = cdr(x); 430 y = EVAL(car(x)); 431 NeedNum(ex, y); 432 void* b1 = (void*) unBox(y); 433 x = cdr(x); 434 y = EVAL(car(x)); 435 int b2 = y == Nil ? 0 : 1; 436 gtk_button_set_use_stock(b1, b2); 437 return Nil; 438 } 439 440 any cfun_gtk_button_set_label(any ex) { 441 any x = ex, y; 442 x = cdr(x); 443 y = EVAL(car(x)); 444 NeedNum(ex, y); 445 void* b1 = (void*) unBox(y); 446 x = cdr(x); 447 y = EVAL(car(x)); 448 any y2s = xSym(y); 449 char b2[bufSize(y2s)]; 450 bufString(y2s, b2); 451 gtk_button_set_label(b1, b2); 452 return Nil; 453 } 454 455 any cfun_gtk_button_set_relief(any ex) { 456 any x = ex, y; 457 x = cdr(x); 458 y = EVAL(car(x)); 459 NeedNum(ex, y); 460 void* b1 = (void*) unBox(y); 461 x = cdr(x); 462 y = EVAL(car(x)); 463 NeedNum(ex, y); 464 long b2 = (long) unBox(y); 465 gtk_button_set_relief(b1, b2); 466 return Nil; 467 } 468 469 any cfun_gtk_toggle_button_new(any ex __attribute__((unused))) { 470 void* z = gtk_toggle_button_new(); 471 return box(z); 472 } 473 474 any cfun_gtk_toggle_button_new_with_label(any ex) { 475 any x = ex, y; 476 x = cdr(x); 477 y = EVAL(car(x)); 478 any y1s = xSym(y); 479 char b1[bufSize(y1s)]; 480 bufString(y1s, b1); 481 void* z = gtk_toggle_button_new_with_label(b1); 482 return box(z); 483 } 484 485 any cfun_gtk_toggle_button_get_active(any ex) { 486 any x = ex, y; 487 x = cdr(x); 488 y = EVAL(car(x)); 489 NeedNum(ex, y); 490 void* b1 = (void*) unBox(y); 491 int z = gtk_toggle_button_get_active(b1); 492 return z == 0 ? T : Nil; 493 } 494 495 any cfun_gtk_toggle_button_set_active(any ex) { 496 any x = ex, y; 497 x = cdr(x); 498 y = EVAL(car(x)); 499 NeedNum(ex, y); 500 void* b1 = (void*) unBox(y); 501 x = cdr(x); 502 y = EVAL(car(x)); 503 int b2 = y == Nil ? 0 : 1; 504 gtk_toggle_button_set_active(b1, b2); 505 return Nil; 506 } 507 508 any cfun_gtk_check_button_new_with_label(any ex) { 509 any x = ex, y; 510 x = cdr(x); 511 y = EVAL(car(x)); 512 any y1s = xSym(y); 513 char b1[bufSize(y1s)]; 514 bufString(y1s, b1); 515 void* z = gtk_check_button_new_with_label(b1); 516 return box(z); 517 } 518 519 any cfun_gtk_entry_new(any ex __attribute__((unused))) { 520 void* z = gtk_entry_new(); 521 return box(z); 522 } 523 524 any cfun_gtk_entry_get_text(any ex) { 525 any x = ex, y; 526 x = cdr(x); 527 y = EVAL(car(x)); 528 NeedNum(ex, y); 529 void* b1 = (void*) unBox(y); 530 char* z = gtk_entry_get_text(b1); 531 return mkStr(z); 532 } 533 534 any cfun_gtk_entry_set_text(any ex) { 535 any x = ex, y; 536 x = cdr(x); 537 y = EVAL(car(x)); 538 NeedNum(ex, y); 539 void* b1 = (void*) unBox(y); 540 x = cdr(x); 541 y = EVAL(car(x)); 542 any y2s = xSym(y); 543 char b2[bufSize(y2s)]; 544 bufString(y2s, b2); 545 gtk_entry_set_text(b1, b2); 546 return Nil; 547 } 548 549 any cfun_gtk_entry_set_visibility(any ex) { 550 any x = ex, y; 551 x = cdr(x); 552 y = EVAL(car(x)); 553 NeedNum(ex, y); 554 void* b1 = (void*) unBox(y); 555 x = cdr(x); 556 y = EVAL(car(x)); 557 int b2 = y == Nil ? 0 : 1; 558 gtk_entry_set_visibility(b1, b2); 559 return Nil; 560 } 561 562 any cfun_gtk_editable_delete_text(any ex) { 563 any x = ex, y; 564 x = cdr(x); 565 y = EVAL(car(x)); 566 NeedNum(ex, y); 567 void* b1 = (void*) unBox(y); 568 x = cdr(x); 569 y = EVAL(car(x)); 570 NeedNum(ex, y); 571 long b2 = (long) unBox(y); 572 x = cdr(x); 573 y = EVAL(car(x)); 574 NeedNum(ex, y); 575 long b3 = (long) unBox(y); 576 gtk_editable_delete_text(b1, b2, b3); 577 return Nil; 578 } 579 580 any cfun_gtk_editable_get_chars(any ex) { 581 any x = ex, y; 582 x = cdr(x); 583 y = EVAL(car(x)); 584 NeedNum(ex, y); 585 void* b1 = (void*) unBox(y); 586 x = cdr(x); 587 y = EVAL(car(x)); 588 NeedNum(ex, y); 589 long b2 = (long) unBox(y); 590 x = cdr(x); 591 y = EVAL(car(x)); 592 NeedNum(ex, y); 593 long b3 = (long) unBox(y); 594 char* z = gtk_editable_get_chars(b1, b2, b3); 595 return mkStr(z); 596 } 597 598 any cfun_gtk_editable_set_editable(any ex) { 599 any x = ex, y; 600 x = cdr(x); 601 y = EVAL(car(x)); 602 NeedNum(ex, y); 603 void* b1 = (void*) unBox(y); 604 x = cdr(x); 605 y = EVAL(car(x)); 606 int b2 = y == Nil ? 0 : 1; 607 gtk_editable_set_editable(b1, b2); 608 return Nil; 609 } 610 611 any cfun_gtk_editable_select_region(any ex) { 612 any x = ex, y; 613 x = cdr(x); 614 y = EVAL(car(x)); 615 NeedNum(ex, y); 616 void* b1 = (void*) unBox(y); 617 x = cdr(x); 618 y = EVAL(car(x)); 619 NeedNum(ex, y); 620 long b2 = (long) unBox(y); 621 x = cdr(x); 622 y = EVAL(car(x)); 623 NeedNum(ex, y); 624 long b3 = (long) unBox(y); 625 gtk_editable_select_region(b1, b2, b3); 626 return Nil; 627 } 628 629 any cfun_gtk_text_buffer_new(any ex) { 630 any x = ex, y; 631 x = cdr(x); 632 y = EVAL(car(x)); 633 void* b1 = (void*) 0; 634 void* z = gtk_text_buffer_new(b1); 635 return box(z); 636 } 637 638 any cfun_gtk_text_buffer_set_text(any ex) { 639 any x = ex, y; 640 x = cdr(x); 641 y = EVAL(car(x)); 642 NeedNum(ex, y); 643 void* b1 = (void*) unBox(y); 644 x = cdr(x); 645 y = EVAL(car(x)); 646 any y2s = xSym(y); 647 char b2[bufSize(y2s)]; 648 bufString(y2s, b2); 649 x = cdr(x); 650 y = EVAL(car(x)); 651 NeedNum(ex, y); 652 long b3 = (long) unBox(y); 653 gtk_text_buffer_set_text(b1, b2, b3); 654 return Nil; 655 } 656 657 any cfun_gtk_text_buffer_insert_at_cursor(any ex) { 658 any x = ex, y; 659 x = cdr(x); 660 y = EVAL(car(x)); 661 NeedNum(ex, y); 662 void* b1 = (void*) unBox(y); 663 x = cdr(x); 664 y = EVAL(car(x)); 665 any y2s = xSym(y); 666 char b2[bufSize(y2s)]; 667 bufString(y2s, b2); 668 x = cdr(x); 669 y = EVAL(car(x)); 670 NeedNum(ex, y); 671 long b3 = (long) unBox(y); 672 gtk_text_buffer_insert_at_cursor(b1, b2, b3); 673 return Nil; 674 } 675 676 any cfun_gtk_text_buffer_get_insert(any ex) { 677 any x = ex, y; 678 x = cdr(x); 679 y = EVAL(car(x)); 680 NeedNum(ex, y); 681 void* b1 = (void*) unBox(y); 682 void* z = gtk_text_buffer_get_insert(b1); 683 return box(z); 684 } 685 686 any cfun_gtk_text_buffer_get_start_iter(any ex) { 687 any x = ex, y; 688 x = cdr(x); 689 y = EVAL(car(x)); 690 NeedNum(ex, y); 691 void* b1 = (void*) unBox(y); 692 x = cdr(x); 693 y = EVAL(car(x)); 694 NeedNum(ex, y); 695 void* b2 = (void*) unBox(y); 696 gtk_text_buffer_get_start_iter(b1, b2); 697 return Nil; 698 } 699 700 any cfun_gtk_text_buffer_get_end_iter(any ex) { 701 any x = ex, y; 702 x = cdr(x); 703 y = EVAL(car(x)); 704 NeedNum(ex, y); 705 void* b1 = (void*) unBox(y); 706 x = cdr(x); 707 y = EVAL(car(x)); 708 NeedNum(ex, y); 709 void* b2 = (void*) unBox(y); 710 gtk_text_buffer_get_end_iter(b1, b2); 711 return Nil; 712 } 713 714 any cfun_gtk_text_buffer_get_bounds(any ex) { 715 any x = ex, y; 716 x = cdr(x); 717 y = EVAL(car(x)); 718 NeedNum(ex, y); 719 void* b1 = (void*) unBox(y); 720 x = cdr(x); 721 y = EVAL(car(x)); 722 NeedNum(ex, y); 723 void* b2 = (void*) unBox(y); 724 x = cdr(x); 725 y = EVAL(car(x)); 726 NeedNum(ex, y); 727 void* b3 = (void*) unBox(y); 728 gtk_text_buffer_get_bounds(b1, b2, b3); 729 return Nil; 730 } 731 732 any cfun_gtk_text_buffer_get_selection_bounds(any ex) { 733 any x = ex, y; 734 x = cdr(x); 735 y = EVAL(car(x)); 736 NeedNum(ex, y); 737 void* b1 = (void*) unBox(y); 738 x = cdr(x); 739 y = EVAL(car(x)); 740 NeedNum(ex, y); 741 void* b2 = (void*) unBox(y); 742 x = cdr(x); 743 y = EVAL(car(x)); 744 NeedNum(ex, y); 745 void* b3 = (void*) unBox(y); 746 int z = gtk_text_buffer_get_selection_bounds(b1, b2, b3); 747 return z == 0 ? T : Nil; 748 } 749 750 any cfun_gtk_text_buffer_get_iter_at_offset(any ex) { 751 any x = ex, y; 752 x = cdr(x); 753 y = EVAL(car(x)); 754 NeedNum(ex, y); 755 void* b1 = (void*) unBox(y); 756 x = cdr(x); 757 y = EVAL(car(x)); 758 NeedNum(ex, y); 759 void* b2 = (void*) unBox(y); 760 x = cdr(x); 761 y = EVAL(car(x)); 762 NeedNum(ex, y); 763 long b3 = (long) unBox(y); 764 gtk_text_buffer_get_iter_at_offset(b1, b2, b3); 765 return Nil; 766 } 767 768 any cfun_gtk_text_buffer_get_text(any ex) { 769 any x = ex, y; 770 x = cdr(x); 771 y = EVAL(car(x)); 772 NeedNum(ex, y); 773 void* b1 = (void*) unBox(y); 774 x = cdr(x); 775 y = EVAL(car(x)); 776 NeedNum(ex, y); 777 void* b2 = (void*) unBox(y); 778 x = cdr(x); 779 y = EVAL(car(x)); 780 NeedNum(ex, y); 781 void* b3 = (void*) unBox(y); 782 x = cdr(x); 783 y = EVAL(car(x)); 784 int b4 = y == Nil ? 0 : 1; 785 char* z = gtk_text_buffer_get_text(b1, b2, b3, b4); 786 return mkStr(z); 787 } 788 789 any cfun_gtk_text_buffer_insert(any ex) { 790 any x = ex, y; 791 x = cdr(x); 792 y = EVAL(car(x)); 793 NeedNum(ex, y); 794 void* b1 = (void*) unBox(y); 795 x = cdr(x); 796 y = EVAL(car(x)); 797 NeedNum(ex, y); 798 void* b2 = (void*) unBox(y); 799 x = cdr(x); 800 y = EVAL(car(x)); 801 any y3s = xSym(y); 802 char b3[bufSize(y3s)]; 803 bufString(y3s, b3); 804 x = cdr(x); 805 y = EVAL(car(x)); 806 NeedNum(ex, y); 807 long b4 = (long) unBox(y); 808 gtk_text_buffer_insert(b1, b2, b3, b4); 809 return Nil; 810 } 811 812 any cfun_gtk_text_buffer_create_tag(any ex) { 813 any x = ex, y; 814 x = cdr(x); 815 y = EVAL(car(x)); 816 NeedNum(ex, y); 817 void* b1 = (void*) unBox(y); 818 x = cdr(x); 819 y = EVAL(car(x)); 820 any y2s = xSym(y); 821 char b2[bufSize(y2s)]; 822 bufString(y2s, b2); 823 x = cdr(x); 824 y = EVAL(car(x)); 825 any y3s = xSym(y); 826 char b3[bufSize(y3s)]; 827 bufString(y3s, b3); 828 x = cdr(x); 829 y = EVAL(car(x)); 830 NeedNum(ex, y); 831 long b4 = (long) unBox(y); 832 x = cdr(x); 833 y = EVAL(car(x)); 834 void* b5 = (void*) 0; 835 void* z = gtk_text_buffer_create_tag(b1, b2, b3, b4, b5); 836 return box(z); 837 } 838 839 any cfun_gtk_text_buffer_insert_with_tags_by_name(any ex) { 840 any x = ex, y; 841 x = cdr(x); 842 y = EVAL(car(x)); 843 NeedNum(ex, y); 844 void* b1 = (void*) unBox(y); 845 x = cdr(x); 846 y = EVAL(car(x)); 847 NeedNum(ex, y); 848 void* b2 = (void*) unBox(y); 849 x = cdr(x); 850 y = EVAL(car(x)); 851 any y3s = xSym(y); 852 char b3[bufSize(y3s)]; 853 bufString(y3s, b3); 854 x = cdr(x); 855 y = EVAL(car(x)); 856 NeedNum(ex, y); 857 long b4 = (long) unBox(y); 858 x = cdr(x); 859 y = EVAL(car(x)); 860 any y5s = xSym(y); 861 char b5[bufSize(y5s)]; 862 bufString(y5s, b5); 863 x = cdr(x); 864 y = EVAL(car(x)); 865 any y6s = xSym(y); 866 char b6[bufSize(y6s)]; 867 bufString(y6s, b6); 868 x = cdr(x); 869 y = EVAL(car(x)); 870 any y7s = xSym(y); 871 char b7[bufSize(y7s)]; 872 bufString(y7s, b7); 873 x = cdr(x); 874 y = EVAL(car(x)); 875 void* b8 = (void*) 0; 876 gtk_text_buffer_insert_with_tags_by_name(b1, b2, b3, b4, b5, b6, b7, b8); 877 return Nil; 878 } 879 880 any cfun_gtk_text_buffer_apply_tag_by_name(any ex) { 881 any x = ex, y; 882 x = cdr(x); 883 y = EVAL(car(x)); 884 NeedNum(ex, y); 885 void* b1 = (void*) unBox(y); 886 x = cdr(x); 887 y = EVAL(car(x)); 888 any y2s = xSym(y); 889 char b2[bufSize(y2s)]; 890 bufString(y2s, b2); 891 x = cdr(x); 892 y = EVAL(car(x)); 893 NeedNum(ex, y); 894 void* b3 = (void*) unBox(y); 895 x = cdr(x); 896 y = EVAL(car(x)); 897 NeedNum(ex, y); 898 void* b4 = (void*) unBox(y); 899 gtk_text_buffer_apply_tag_by_name(b1, b2, b3, b4); 900 return Nil; 901 } 902 903 any cfun_gtk_text_buffer_remove_tag_by_name(any ex) { 904 any x = ex, y; 905 x = cdr(x); 906 y = EVAL(car(x)); 907 NeedNum(ex, y); 908 void* b1 = (void*) unBox(y); 909 x = cdr(x); 910 y = EVAL(car(x)); 911 any y2s = xSym(y); 912 char b2[bufSize(y2s)]; 913 bufString(y2s, b2); 914 x = cdr(x); 915 y = EVAL(car(x)); 916 NeedNum(ex, y); 917 void* b3 = (void*) unBox(y); 918 x = cdr(x); 919 y = EVAL(car(x)); 920 NeedNum(ex, y); 921 void* b4 = (void*) unBox(y); 922 gtk_text_buffer_remove_tag_by_name(b1, b2, b3, b4); 923 return Nil; 924 } 925 926 any cfun_gtk_text_buffer_remove_all_tags(any ex) { 927 any x = ex, y; 928 x = cdr(x); 929 y = EVAL(car(x)); 930 NeedNum(ex, y); 931 void* b1 = (void*) unBox(y); 932 x = cdr(x); 933 y = EVAL(car(x)); 934 NeedNum(ex, y); 935 void* b2 = (void*) unBox(y); 936 x = cdr(x); 937 y = EVAL(car(x)); 938 NeedNum(ex, y); 939 void* b3 = (void*) unBox(y); 940 gtk_text_buffer_remove_all_tags(b1, b2, b3); 941 return Nil; 942 } 943 944 any cfun_gtk_text_buffer_get_tag_table(any ex) { 945 any x = ex, y; 946 x = cdr(x); 947 y = EVAL(car(x)); 948 NeedNum(ex, y); 949 void* b1 = (void*) unBox(y); 950 void* z = gtk_text_buffer_get_tag_table(b1); 951 return box(z); 952 } 953 954 any cfun_gtk_text_buffer_select_range(any ex) { 955 any x = ex, y; 956 x = cdr(x); 957 y = EVAL(car(x)); 958 NeedNum(ex, y); 959 void* b1 = (void*) unBox(y); 960 x = cdr(x); 961 y = EVAL(car(x)); 962 NeedNum(ex, y); 963 void* b2 = (void*) unBox(y); 964 x = cdr(x); 965 y = EVAL(car(x)); 966 NeedNum(ex, y); 967 void* b3 = (void*) unBox(y); 968 gtk_text_buffer_select_range(b1, b2, b3); 969 return Nil; 970 } 971 972 any cfun_gtk_text_buffer_get_selection_bound(any ex) { 973 any x = ex, y; 974 x = cdr(x); 975 y = EVAL(car(x)); 976 NeedNum(ex, y); 977 void* b1 = (void*) unBox(y); 978 void* z = gtk_text_buffer_get_selection_bound(b1); 979 return box(z); 980 } 981 982 any cfun_gtk_text_buffer_get_line_count(any ex) { 983 any x = ex, y; 984 x = cdr(x); 985 y = EVAL(car(x)); 986 NeedNum(ex, y); 987 void* b1 = (void*) unBox(y); 988 long z = gtk_text_buffer_get_line_count(b1); 989 return box(z); 990 } 991 992 any cfun_gtk_text_buffer_create_mark(any ex) { 993 any x = ex, y; 994 x = cdr(x); 995 y = EVAL(car(x)); 996 NeedNum(ex, y); 997 void* b1 = (void*) unBox(y); 998 x = cdr(x); 999 y = EVAL(car(x)); 1000 any y2s = xSym(y); 1001 char b2[bufSize(y2s)]; 1002 bufString(y2s, b2); 1003 x = cdr(x); 1004 y = EVAL(car(x)); 1005 NeedNum(ex, y); 1006 void* b3 = (void*) unBox(y); 1007 x = cdr(x); 1008 y = EVAL(car(x)); 1009 int b4 = y == Nil ? 0 : 1; 1010 void* z = gtk_text_buffer_create_mark(b1, b2, b3, b4); 1011 return box(z); 1012 } 1013 1014 any cfun_gtk_text_buffer_get_iter_at_mark(any ex) { 1015 any x = ex, y; 1016 x = cdr(x); 1017 y = EVAL(car(x)); 1018 NeedNum(ex, y); 1019 void* b1 = (void*) unBox(y); 1020 x = cdr(x); 1021 y = EVAL(car(x)); 1022 NeedNum(ex, y); 1023 void* b2 = (void*) unBox(y); 1024 x = cdr(x); 1025 y = EVAL(car(x)); 1026 NeedNum(ex, y); 1027 void* b3 = (void*) unBox(y); 1028 gtk_text_buffer_get_iter_at_mark(b1, b2, b3); 1029 return Nil; 1030 } 1031 1032 any cfun_gtk_text_buffer_get_iter_at_line(any ex) { 1033 any x = ex, y; 1034 x = cdr(x); 1035 y = EVAL(car(x)); 1036 NeedNum(ex, y); 1037 void* b1 = (void*) unBox(y); 1038 x = cdr(x); 1039 y = EVAL(car(x)); 1040 NeedNum(ex, y); 1041 void* b2 = (void*) unBox(y); 1042 x = cdr(x); 1043 y = EVAL(car(x)); 1044 NeedNum(ex, y); 1045 long b3 = (long) unBox(y); 1046 gtk_text_buffer_get_iter_at_line(b1, b2, b3); 1047 return Nil; 1048 } 1049 1050 any cfun_gtk_text_buffer_delete(any ex) { 1051 any x = ex, y; 1052 x = cdr(x); 1053 y = EVAL(car(x)); 1054 NeedNum(ex, y); 1055 void* b1 = (void*) unBox(y); 1056 x = cdr(x); 1057 y = EVAL(car(x)); 1058 NeedNum(ex, y); 1059 void* b2 = (void*) unBox(y); 1060 x = cdr(x); 1061 y = EVAL(car(x)); 1062 NeedNum(ex, y); 1063 void* b3 = (void*) unBox(y); 1064 gtk_text_buffer_delete(b1, b2, b3); 1065 return Nil; 1066 } 1067 1068 any cfun_gtk_text_buffer_delete_mark(any ex) { 1069 any x = ex, y; 1070 x = cdr(x); 1071 y = EVAL(car(x)); 1072 NeedNum(ex, y); 1073 void* b1 = (void*) unBox(y); 1074 x = cdr(x); 1075 y = EVAL(car(x)); 1076 NeedNum(ex, y); 1077 void* b2 = (void*) unBox(y); 1078 gtk_text_buffer_delete_mark(b1, b2); 1079 return Nil; 1080 } 1081 1082 any cfun_gtk_text_buffer_delete_mark_by_name(any ex) { 1083 any x = ex, y; 1084 x = cdr(x); 1085 y = EVAL(car(x)); 1086 NeedNum(ex, y); 1087 void* b1 = (void*) unBox(y); 1088 x = cdr(x); 1089 y = EVAL(car(x)); 1090 any y2s = xSym(y); 1091 char b2[bufSize(y2s)]; 1092 bufString(y2s, b2); 1093 gtk_text_buffer_delete_mark_by_name(b1, b2); 1094 return Nil; 1095 } 1096 1097 any cfun_gtk_text_buffer_place_cursor(any ex) { 1098 any x = ex, y; 1099 x = cdr(x); 1100 y = EVAL(car(x)); 1101 NeedNum(ex, y); 1102 void* b1 = (void*) unBox(y); 1103 x = cdr(x); 1104 y = EVAL(car(x)); 1105 NeedNum(ex, y); 1106 void* b2 = (void*) unBox(y); 1107 gtk_text_buffer_place_cursor(b1, b2); 1108 return Nil; 1109 } 1110 1111 any cfun_gtk_text_buffer_copy_clipboard(any ex) { 1112 any x = ex, y; 1113 x = cdr(x); 1114 y = EVAL(car(x)); 1115 NeedNum(ex, y); 1116 void* b1 = (void*) unBox(y); 1117 x = cdr(x); 1118 y = EVAL(car(x)); 1119 NeedNum(ex, y); 1120 void* b2 = (void*) unBox(y); 1121 gtk_text_buffer_copy_clipboard(b1, b2); 1122 return Nil; 1123 } 1124 1125 any cfun_gtk_text_buffer_cut_clipboard(any ex) { 1126 any x = ex, y; 1127 x = cdr(x); 1128 y = EVAL(car(x)); 1129 NeedNum(ex, y); 1130 void* b1 = (void*) unBox(y); 1131 x = cdr(x); 1132 y = EVAL(car(x)); 1133 NeedNum(ex, y); 1134 void* b2 = (void*) unBox(y); 1135 x = cdr(x); 1136 y = EVAL(car(x)); 1137 int b3 = y == Nil ? 0 : 1; 1138 gtk_text_buffer_cut_clipboard(b1, b2, b3); 1139 return Nil; 1140 } 1141 1142 any cfun_gtk_text_buffer_paste_clipboard(any ex) { 1143 any x = ex, y; 1144 x = cdr(x); 1145 y = EVAL(car(x)); 1146 NeedNum(ex, y); 1147 void* b1 = (void*) unBox(y); 1148 x = cdr(x); 1149 y = EVAL(car(x)); 1150 NeedNum(ex, y); 1151 void* b2 = (void*) unBox(y); 1152 x = cdr(x); 1153 y = EVAL(car(x)); 1154 void* b3 = (void*) 0; 1155 x = cdr(x); 1156 y = EVAL(car(x)); 1157 int b4 = y == Nil ? 0 : 1; 1158 gtk_text_buffer_paste_clipboard(b1, b2, b3, b4); 1159 return Nil; 1160 } 1161 1162 any cfun_gtk_scrolled_window_new(any ex) { 1163 any x = ex, y; 1164 x = cdr(x); 1165 y = EVAL(car(x)); 1166 void* b1 = (void*) 0; 1167 x = cdr(x); 1168 y = EVAL(car(x)); 1169 void* b2 = (void*) 0; 1170 void* z = gtk_scrolled_window_new(b1, b2); 1171 return box(z); 1172 } 1173 1174 any cfun_gtk_scrolled_window_set_policy(any ex) { 1175 any x = ex, y; 1176 x = cdr(x); 1177 y = EVAL(car(x)); 1178 NeedNum(ex, y); 1179 void* b1 = (void*) unBox(y); 1180 x = cdr(x); 1181 y = EVAL(car(x)); 1182 NeedNum(ex, y); 1183 long b2 = (long) unBox(y); 1184 x = cdr(x); 1185 y = EVAL(car(x)); 1186 NeedNum(ex, y); 1187 long b3 = (long) unBox(y); 1188 gtk_scrolled_window_set_policy(b1, b2, b3); 1189 return Nil; 1190 } 1191 1192 any cfun_gtk_scrolled_window_set_shadow_type(any ex) { 1193 any x = ex, y; 1194 x = cdr(x); 1195 y = EVAL(car(x)); 1196 NeedNum(ex, y); 1197 void* b1 = (void*) unBox(y); 1198 x = cdr(x); 1199 y = EVAL(car(x)); 1200 NeedNum(ex, y); 1201 long b2 = (long) unBox(y); 1202 gtk_scrolled_window_set_shadow_type(b1, b2); 1203 return Nil; 1204 } 1205 1206 any cfun_gtk_scrolled_window_add_with_viewport(any ex) { 1207 any x = ex, y; 1208 x = cdr(x); 1209 y = EVAL(car(x)); 1210 NeedNum(ex, y); 1211 void* b1 = (void*) unBox(y); 1212 x = cdr(x); 1213 y = EVAL(car(x)); 1214 NeedNum(ex, y); 1215 void* b2 = (void*) unBox(y); 1216 gtk_scrolled_window_add_with_viewport(b1, b2); 1217 return Nil; 1218 } 1219 1220 any cfun_gtk_text_view_new_with_buffer(any ex) { 1221 any x = ex, y; 1222 x = cdr(x); 1223 y = EVAL(car(x)); 1224 NeedNum(ex, y); 1225 void* b1 = (void*) unBox(y); 1226 void* z = gtk_text_view_new_with_buffer(b1); 1227 return box(z); 1228 } 1229 1230 any cfun_gtk_text_view_set_wrap_mode(any ex) { 1231 any x = ex, y; 1232 x = cdr(x); 1233 y = EVAL(car(x)); 1234 NeedNum(ex, y); 1235 void* b1 = (void*) unBox(y); 1236 x = cdr(x); 1237 y = EVAL(car(x)); 1238 NeedNum(ex, y); 1239 long b2 = (long) unBox(y); 1240 gtk_text_view_set_wrap_mode(b1, b2); 1241 return Nil; 1242 } 1243 1244 any cfun_gtk_text_view_set_editable(any ex) { 1245 any x = ex, y; 1246 x = cdr(x); 1247 y = EVAL(car(x)); 1248 NeedNum(ex, y); 1249 void* b1 = (void*) unBox(y); 1250 x = cdr(x); 1251 y = EVAL(car(x)); 1252 int b2 = y == Nil ? 0 : 1; 1253 gtk_text_view_set_editable(b1, b2); 1254 return Nil; 1255 } 1256 1257 any cfun_gtk_text_view_set_border_window_size(any ex) { 1258 any x = ex, y; 1259 x = cdr(x); 1260 y = EVAL(car(x)); 1261 NeedNum(ex, y); 1262 void* b1 = (void*) unBox(y); 1263 x = cdr(x); 1264 y = EVAL(car(x)); 1265 NeedNum(ex, y); 1266 long b2 = (long) unBox(y); 1267 x = cdr(x); 1268 y = EVAL(car(x)); 1269 NeedNum(ex, y); 1270 long b3 = (long) unBox(y); 1271 gtk_text_view_set_border_window_size(b1, b2, b3); 1272 return Nil; 1273 } 1274 1275 any cfun_gtk_text_view_move_mark_onscreen(any ex) { 1276 any x = ex, y; 1277 x = cdr(x); 1278 y = EVAL(car(x)); 1279 NeedNum(ex, y); 1280 void* b1 = (void*) unBox(y); 1281 x = cdr(x); 1282 y = EVAL(car(x)); 1283 NeedNum(ex, y); 1284 void* b2 = (void*) unBox(y); 1285 int z = gtk_text_view_move_mark_onscreen(b1, b2); 1286 return z == 0 ? T : Nil; 1287 } 1288 1289 any cfun_gtk_text_view_scroll_to_mark(any ex) { 1290 any x = ex, y; 1291 x = cdr(x); 1292 y = EVAL(car(x)); 1293 NeedNum(ex, y); 1294 void* b1 = (void*) unBox(y); 1295 x = cdr(x); 1296 y = EVAL(car(x)); 1297 NeedNum(ex, y); 1298 void* b2 = (void*) unBox(y); 1299 x = cdr(x); 1300 y = EVAL(car(x)); 1301 NeedNum(ex, y); 1302 double b3 = (double) unBox(y) / 10000; 1303 x = cdr(x); 1304 y = EVAL(car(x)); 1305 int b4 = y == Nil ? 0 : 1; 1306 x = cdr(x); 1307 y = EVAL(car(x)); 1308 NeedNum(ex, y); 1309 double b5 = (double) unBox(y) / 10000; 1310 x = cdr(x); 1311 y = EVAL(car(x)); 1312 NeedNum(ex, y); 1313 double b6 = (double) unBox(y) / 10000; 1314 gtk_text_view_scroll_to_mark(b1, b2, b3, b4, b5, b6); 1315 return Nil; 1316 } 1317 1318 any cfun_gtk_text_view_scroll_mark_onscreen(any ex) { 1319 any x = ex, y; 1320 x = cdr(x); 1321 y = EVAL(car(x)); 1322 NeedNum(ex, y); 1323 void* b1 = (void*) unBox(y); 1324 x = cdr(x); 1325 y = EVAL(car(x)); 1326 NeedNum(ex, y); 1327 void* b2 = (void*) unBox(y); 1328 gtk_text_view_scroll_mark_onscreen(b1, b2); 1329 return Nil; 1330 } 1331 1332 any cfun_gtk_text_view_set_pixels_inside_wrap(any ex) { 1333 any x = ex, y; 1334 x = cdr(x); 1335 y = EVAL(car(x)); 1336 NeedNum(ex, y); 1337 void* b1 = (void*) unBox(y); 1338 x = cdr(x); 1339 y = EVAL(car(x)); 1340 NeedNum(ex, y); 1341 long b2 = (long) unBox(y); 1342 gtk_text_view_set_pixels_inside_wrap(b1, b2); 1343 return Nil; 1344 } 1345 1346 any cfun_gtk_text_view_get_pixels_inside_wrap(any ex) { 1347 any x = ex, y; 1348 x = cdr(x); 1349 y = EVAL(car(x)); 1350 NeedNum(ex, y); 1351 void* b1 = (void*) unBox(y); 1352 long z = gtk_text_view_get_pixels_inside_wrap(b1); 1353 return box(z); 1354 } 1355 1356 any cfun_gtk_text_view_set_pixels_above_lines(any ex) { 1357 any x = ex, y; 1358 x = cdr(x); 1359 y = EVAL(car(x)); 1360 NeedNum(ex, y); 1361 void* b1 = (void*) unBox(y); 1362 x = cdr(x); 1363 y = EVAL(car(x)); 1364 NeedNum(ex, y); 1365 long b2 = (long) unBox(y); 1366 gtk_text_view_set_pixels_above_lines(b1, b2); 1367 return Nil; 1368 } 1369 1370 any cfun_gtk_text_view_get_pixels_above_lines(any ex) { 1371 any x = ex, y; 1372 x = cdr(x); 1373 y = EVAL(car(x)); 1374 NeedNum(ex, y); 1375 void* b1 = (void*) unBox(y); 1376 long z = gtk_text_view_get_pixels_above_lines(b1); 1377 return box(z); 1378 } 1379 1380 any cfun_gtk_text_view_set_cursor_visible(any ex) { 1381 any x = ex, y; 1382 x = cdr(x); 1383 y = EVAL(car(x)); 1384 NeedNum(ex, y); 1385 void* b1 = (void*) unBox(y); 1386 x = cdr(x); 1387 y = EVAL(car(x)); 1388 int b2 = y == Nil ? 0 : 1; 1389 gtk_text_view_set_cursor_visible(b1, b2); 1390 return Nil; 1391 } 1392 1393 any cfun_gtk_text_view_window_to_buffer_coords(any ex) { 1394 any x = ex, y; 1395 x = cdr(x); 1396 y = EVAL(car(x)); 1397 NeedNum(ex, y); 1398 void* b1 = (void*) unBox(y); 1399 x = cdr(x); 1400 y = EVAL(car(x)); 1401 NeedNum(ex, y); 1402 long b2 = (long) unBox(y); 1403 x = cdr(x); 1404 y = EVAL(car(x)); 1405 NeedNum(ex, y); 1406 long b3 = (long) unBox(y); 1407 x = cdr(x); 1408 y = EVAL(car(x)); 1409 NeedNum(ex, y); 1410 long b4 = (long) unBox(y); 1411 x = cdr(x); 1412 y = EVAL(car(x)); 1413 NeedNum(ex, y); 1414 void* b5 = (void*) unBox(y); 1415 x = cdr(x); 1416 y = EVAL(car(x)); 1417 NeedNum(ex, y); 1418 void* b6 = (void*) unBox(y); 1419 gtk_text_view_window_to_buffer_coords(b1, b2, b3, b4, b5, b6); 1420 return Nil; 1421 } 1422 1423 any cfun_gtk_text_iter_forward_search(any ex) { 1424 any x = ex, y; 1425 x = cdr(x); 1426 y = EVAL(car(x)); 1427 NeedNum(ex, y); 1428 void* b1 = (void*) unBox(y); 1429 x = cdr(x); 1430 y = EVAL(car(x)); 1431 any y2s = xSym(y); 1432 char b2[bufSize(y2s)]; 1433 bufString(y2s, b2); 1434 x = cdr(x); 1435 y = EVAL(car(x)); 1436 NeedNum(ex, y); 1437 long b3 = (long) unBox(y); 1438 x = cdr(x); 1439 y = EVAL(car(x)); 1440 NeedNum(ex, y); 1441 void* b4 = (void*) unBox(y); 1442 x = cdr(x); 1443 y = EVAL(car(x)); 1444 NeedNum(ex, y); 1445 void* b5 = (void*) unBox(y); 1446 x = cdr(x); 1447 y = EVAL(car(x)); 1448 void* b6 = (void*) 0; 1449 int z = gtk_text_iter_forward_search(b1, b2, b3, b4, b5, b6); 1450 return z == 0 ? T : Nil; 1451 } 1452 1453 any cfun_gtk_text_iter_forward_visible_cursor_position(any ex) { 1454 any x = ex, y; 1455 x = cdr(x); 1456 y = EVAL(car(x)); 1457 NeedNum(ex, y); 1458 void* b1 = (void*) unBox(y); 1459 int z = gtk_text_iter_forward_visible_cursor_position(b1); 1460 return z == 0 ? T : Nil; 1461 } 1462 1463 any cfun_gtk_text_iter_forward_to_line_end(any ex) { 1464 any x = ex, y; 1465 x = cdr(x); 1466 y = EVAL(car(x)); 1467 NeedNum(ex, y); 1468 void* b1 = (void*) unBox(y); 1469 int z = gtk_text_iter_forward_to_line_end(b1); 1470 return z == 0 ? T : Nil; 1471 } 1472 1473 any cfun_gtk_text_iter_set_line(any ex) { 1474 any x = ex, y; 1475 x = cdr(x); 1476 y = EVAL(car(x)); 1477 NeedNum(ex, y); 1478 void* b1 = (void*) unBox(y); 1479 x = cdr(x); 1480 y = EVAL(car(x)); 1481 NeedNum(ex, y); 1482 long b2 = (long) unBox(y); 1483 gtk_text_iter_set_line(b1, b2); 1484 return Nil; 1485 } 1486 1487 any cfun_gtk_text_iter_set_line_offset(any ex) { 1488 any x = ex, y; 1489 x = cdr(x); 1490 y = EVAL(car(x)); 1491 NeedNum(ex, y); 1492 void* b1 = (void*) unBox(y); 1493 x = cdr(x); 1494 y = EVAL(car(x)); 1495 NeedNum(ex, y); 1496 long b2 = (long) unBox(y); 1497 gtk_text_iter_set_line_offset(b1, b2); 1498 return Nil; 1499 } 1500 1501 any cfun_gtk_text_iter_set_line_index(any ex) { 1502 any x = ex, y; 1503 x = cdr(x); 1504 y = EVAL(car(x)); 1505 NeedNum(ex, y); 1506 void* b1 = (void*) unBox(y); 1507 x = cdr(x); 1508 y = EVAL(car(x)); 1509 NeedNum(ex, y); 1510 long b2 = (long) unBox(y); 1511 gtk_text_iter_set_line_index(b1, b2); 1512 return Nil; 1513 } 1514 1515 any cfun_gtk_text_iter_get_text(any ex) { 1516 any x = ex, y; 1517 x = cdr(x); 1518 y = EVAL(car(x)); 1519 NeedNum(ex, y); 1520 void* b1 = (void*) unBox(y); 1521 x = cdr(x); 1522 y = EVAL(car(x)); 1523 NeedNum(ex, y); 1524 void* b2 = (void*) unBox(y); 1525 char* z = gtk_text_iter_get_text(b1, b2); 1526 return mkStr(z); 1527 } 1528 1529 any cfun_gtk_text_iter_get_line(any ex) { 1530 any x = ex, y; 1531 x = cdr(x); 1532 y = EVAL(car(x)); 1533 NeedNum(ex, y); 1534 void* b1 = (void*) unBox(y); 1535 long z = gtk_text_iter_get_line(b1); 1536 return box(z); 1537 } 1538 1539 any cfun_gtk_text_view_new(any ex __attribute__((unused))) { 1540 void* z = gtk_text_view_new(); 1541 return box(z); 1542 } 1543 1544 any cfun_gtk_text_view_get_buffer(any ex) { 1545 any x = ex, y; 1546 x = cdr(x); 1547 y = EVAL(car(x)); 1548 NeedNum(ex, y); 1549 void* b1 = (void*) unBox(y); 1550 void* z = gtk_text_view_get_buffer(b1); 1551 return box(z); 1552 } 1553 1554 any cfun_gtk_text_tag_table_remove(any ex) { 1555 any x = ex, y; 1556 x = cdr(x); 1557 y = EVAL(car(x)); 1558 NeedNum(ex, y); 1559 void* b1 = (void*) unBox(y); 1560 x = cdr(x); 1561 y = EVAL(car(x)); 1562 NeedNum(ex, y); 1563 void* b2 = (void*) unBox(y); 1564 gtk_text_tag_table_remove(b1, b2); 1565 return Nil; 1566 } 1567 1568 any cfun_gdk_font_load(any ex) { 1569 any x = ex, y; 1570 x = cdr(x); 1571 y = EVAL(car(x)); 1572 any y1s = xSym(y); 1573 char b1[bufSize(y1s)]; 1574 bufString(y1s, b1); 1575 void* z = gdk_font_load(b1); 1576 return box(z); 1577 } 1578 1579 any cfun_gdk_pixmap_new(any ex) { 1580 any x = ex, y; 1581 x = cdr(x); 1582 y = EVAL(car(x)); 1583 NeedNum(ex, y); 1584 void* b1 = (void*) unBox(y); 1585 x = cdr(x); 1586 y = EVAL(car(x)); 1587 NeedNum(ex, y); 1588 long b2 = (long) unBox(y); 1589 x = cdr(x); 1590 y = EVAL(car(x)); 1591 NeedNum(ex, y); 1592 long b3 = (long) unBox(y); 1593 x = cdr(x); 1594 y = EVAL(car(x)); 1595 NeedNum(ex, y); 1596 long b4 = (long) unBox(y); 1597 void* z = gdk_pixmap_new(b1, b2, b3, b4); 1598 return box(z); 1599 } 1600 1601 any cfun_gdk_pixmap_unref(any ex) { 1602 any x = ex, y; 1603 x = cdr(x); 1604 y = EVAL(car(x)); 1605 NeedNum(ex, y); 1606 void* b1 = (void*) unBox(y); 1607 gdk_pixmap_unref(b1); 1608 return Nil; 1609 } 1610 1611 any cfun_gdk_pixmap_create_from_xpm(any ex) { 1612 any x = ex, y; 1613 x = cdr(x); 1614 y = EVAL(car(x)); 1615 NeedNum(ex, y); 1616 void* b1 = (void*) unBox(y); 1617 x = cdr(x); 1618 y = EVAL(car(x)); 1619 void* b2 = (void*) 0; 1620 x = cdr(x); 1621 y = EVAL(car(x)); 1622 void* b3 = (void*) 0; 1623 x = cdr(x); 1624 y = EVAL(car(x)); 1625 any y4s = xSym(y); 1626 char b4[bufSize(y4s)]; 1627 bufString(y4s, b4); 1628 void* z = gdk_pixmap_create_from_xpm(b1, b2, b3, b4); 1629 return box(z); 1630 } 1631 1632 any cfun_gdk_pixmap_colormap_create_from_xpm(any ex) { 1633 any x = ex, y; 1634 x = cdr(x); 1635 y = EVAL(car(x)); 1636 void* b1 = (void*) 0; 1637 x = cdr(x); 1638 y = EVAL(car(x)); 1639 NeedNum(ex, y); 1640 void* b2 = (void*) unBox(y); 1641 x = cdr(x); 1642 y = EVAL(car(x)); 1643 void* b3 = (void*) 0; 1644 x = cdr(x); 1645 y = EVAL(car(x)); 1646 void* b4 = (void*) 0; 1647 x = cdr(x); 1648 y = EVAL(car(x)); 1649 any y5s = xSym(y); 1650 char b5[bufSize(y5s)]; 1651 bufString(y5s, b5); 1652 void* z = gdk_pixmap_colormap_create_from_xpm(b1, b2, b3, b4, b5); 1653 return box(z); 1654 } 1655 1656 any cfun_gdk_draw_rectangle(any ex) { 1657 any x = ex, y; 1658 x = cdr(x); 1659 y = EVAL(car(x)); 1660 NeedNum(ex, y); 1661 void* b1 = (void*) unBox(y); 1662 x = cdr(x); 1663 y = EVAL(car(x)); 1664 NeedNum(ex, y); 1665 void* b2 = (void*) unBox(y); 1666 x = cdr(x); 1667 y = EVAL(car(x)); 1668 int b3 = y == Nil ? 0 : 1; 1669 x = cdr(x); 1670 y = EVAL(car(x)); 1671 NeedNum(ex, y); 1672 long b4 = (long) unBox(y); 1673 x = cdr(x); 1674 y = EVAL(car(x)); 1675 NeedNum(ex, y); 1676 long b5 = (long) unBox(y); 1677 x = cdr(x); 1678 y = EVAL(car(x)); 1679 NeedNum(ex, y); 1680 long b6 = (long) unBox(y); 1681 x = cdr(x); 1682 y = EVAL(car(x)); 1683 NeedNum(ex, y); 1684 long b7 = (long) unBox(y); 1685 gdk_draw_rectangle(b1, b2, b3, b4, b5, b6, b7); 1686 return Nil; 1687 } 1688 1689 any cfun_gdk_draw_arc(any ex) { 1690 any x = ex, y; 1691 x = cdr(x); 1692 y = EVAL(car(x)); 1693 NeedNum(ex, y); 1694 void* b1 = (void*) unBox(y); 1695 x = cdr(x); 1696 y = EVAL(car(x)); 1697 NeedNum(ex, y); 1698 void* b2 = (void*) unBox(y); 1699 x = cdr(x); 1700 y = EVAL(car(x)); 1701 int b3 = y == Nil ? 0 : 1; 1702 x = cdr(x); 1703 y = EVAL(car(x)); 1704 NeedNum(ex, y); 1705 long b4 = (long) unBox(y); 1706 x = cdr(x); 1707 y = EVAL(car(x)); 1708 NeedNum(ex, y); 1709 long b5 = (long) unBox(y); 1710 x = cdr(x); 1711 y = EVAL(car(x)); 1712 NeedNum(ex, y); 1713 long b6 = (long) unBox(y); 1714 x = cdr(x); 1715 y = EVAL(car(x)); 1716 NeedNum(ex, y); 1717 long b7 = (long) unBox(y); 1718 x = cdr(x); 1719 y = EVAL(car(x)); 1720 NeedNum(ex, y); 1721 long b8 = (long) unBox(y); 1722 x = cdr(x); 1723 y = EVAL(car(x)); 1724 NeedNum(ex, y); 1725 long b9 = (long) unBox(y); 1726 gdk_draw_arc(b1, b2, b3, b4, b5, b6, b7, b8, b9); 1727 return Nil; 1728 } 1729 1730 any cfun_gdk_draw_line(any ex) { 1731 any x = ex, y; 1732 x = cdr(x); 1733 y = EVAL(car(x)); 1734 NeedNum(ex, y); 1735 void* b1 = (void*) unBox(y); 1736 x = cdr(x); 1737 y = EVAL(car(x)); 1738 NeedNum(ex, y); 1739 void* b2 = (void*) unBox(y); 1740 x = cdr(x); 1741 y = EVAL(car(x)); 1742 NeedNum(ex, y); 1743 long b3 = (long) unBox(y); 1744 x = cdr(x); 1745 y = EVAL(car(x)); 1746 NeedNum(ex, y); 1747 long b4 = (long) unBox(y); 1748 x = cdr(x); 1749 y = EVAL(car(x)); 1750 NeedNum(ex, y); 1751 long b5 = (long) unBox(y); 1752 x = cdr(x); 1753 y = EVAL(car(x)); 1754 NeedNum(ex, y); 1755 long b6 = (long) unBox(y); 1756 gdk_draw_line(b1, b2, b3, b4, b5, b6); 1757 return Nil; 1758 } 1759 1760 any cfun_gdk_draw_point(any ex) { 1761 any x = ex, y; 1762 x = cdr(x); 1763 y = EVAL(car(x)); 1764 NeedNum(ex, y); 1765 void* b1 = (void*) unBox(y); 1766 x = cdr(x); 1767 y = EVAL(car(x)); 1768 NeedNum(ex, y); 1769 void* b2 = (void*) unBox(y); 1770 x = cdr(x); 1771 y = EVAL(car(x)); 1772 NeedNum(ex, y); 1773 long b3 = (long) unBox(y); 1774 x = cdr(x); 1775 y = EVAL(car(x)); 1776 NeedNum(ex, y); 1777 long b4 = (long) unBox(y); 1778 gdk_draw_point(b1, b2, b3, b4); 1779 return Nil; 1780 } 1781 1782 any cfun_gdk_draw_layout(any ex) { 1783 any x = ex, y; 1784 x = cdr(x); 1785 y = EVAL(car(x)); 1786 NeedNum(ex, y); 1787 void* b1 = (void*) unBox(y); 1788 x = cdr(x); 1789 y = EVAL(car(x)); 1790 NeedNum(ex, y); 1791 void* b2 = (void*) unBox(y); 1792 x = cdr(x); 1793 y = EVAL(car(x)); 1794 NeedNum(ex, y); 1795 long b3 = (long) unBox(y); 1796 x = cdr(x); 1797 y = EVAL(car(x)); 1798 NeedNum(ex, y); 1799 long b4 = (long) unBox(y); 1800 x = cdr(x); 1801 y = EVAL(car(x)); 1802 NeedNum(ex, y); 1803 void* b5 = (void*) unBox(y); 1804 gdk_draw_layout(b1, b2, b3, b4, b5); 1805 return Nil; 1806 } 1807 1808 any cfun_gdk_draw_drawable(any ex) { 1809 any x = ex, y; 1810 x = cdr(x); 1811 y = EVAL(car(x)); 1812 NeedNum(ex, y); 1813 void* b1 = (void*) unBox(y); 1814 x = cdr(x); 1815 y = EVAL(car(x)); 1816 NeedNum(ex, y); 1817 void* b2 = (void*) unBox(y); 1818 x = cdr(x); 1819 y = EVAL(car(x)); 1820 NeedNum(ex, y); 1821 void* b3 = (void*) unBox(y); 1822 x = cdr(x); 1823 y = EVAL(car(x)); 1824 NeedNum(ex, y); 1825 long b4 = (long) unBox(y); 1826 x = cdr(x); 1827 y = EVAL(car(x)); 1828 NeedNum(ex, y); 1829 long b5 = (long) unBox(y); 1830 x = cdr(x); 1831 y = EVAL(car(x)); 1832 NeedNum(ex, y); 1833 long b6 = (long) unBox(y); 1834 x = cdr(x); 1835 y = EVAL(car(x)); 1836 NeedNum(ex, y); 1837 long b7 = (long) unBox(y); 1838 x = cdr(x); 1839 y = EVAL(car(x)); 1840 NeedNum(ex, y); 1841 long b8 = (long) unBox(y); 1842 x = cdr(x); 1843 y = EVAL(car(x)); 1844 NeedNum(ex, y); 1845 long b9 = (long) unBox(y); 1846 gdk_draw_drawable(b1, b2, b3, b4, b5, b6, b7, b8, b9); 1847 return Nil; 1848 } 1849 1850 any cfun_gdk_gc_new(any ex) { 1851 any x = ex, y; 1852 x = cdr(x); 1853 y = EVAL(car(x)); 1854 NeedNum(ex, y); 1855 void* b1 = (void*) unBox(y); 1856 void* z = gdk_gc_new(b1); 1857 return box(z); 1858 } 1859 1860 any cfun_gdk_gc_set_rgb_fg_color(any ex) { 1861 any x = ex, y; 1862 x = cdr(x); 1863 y = EVAL(car(x)); 1864 NeedNum(ex, y); 1865 void* b1 = (void*) unBox(y); 1866 x = cdr(x); 1867 y = EVAL(car(x)); 1868 NeedNum(ex, y); 1869 void* b2 = (void*) unBox(y); 1870 gdk_gc_set_rgb_fg_color(b1, b2); 1871 return Nil; 1872 } 1873 1874 any cfun_gdk_gc_set_rgb_bg_color(any ex) { 1875 any x = ex, y; 1876 x = cdr(x); 1877 y = EVAL(car(x)); 1878 NeedNum(ex, y); 1879 void* b1 = (void*) unBox(y); 1880 x = cdr(x); 1881 y = EVAL(car(x)); 1882 NeedNum(ex, y); 1883 void* b2 = (void*) unBox(y); 1884 gdk_gc_set_rgb_bg_color(b1, b2); 1885 return Nil; 1886 } 1887 1888 any cfun_gdk_gc_set_foreground(any ex) { 1889 any x = ex, y; 1890 x = cdr(x); 1891 y = EVAL(car(x)); 1892 NeedNum(ex, y); 1893 void* b1 = (void*) unBox(y); 1894 x = cdr(x); 1895 y = EVAL(car(x)); 1896 NeedNum(ex, y); 1897 void* b2 = (void*) unBox(y); 1898 gdk_gc_set_foreground(b1, b2); 1899 return Nil; 1900 } 1901 1902 any cfun_gdk_gc_set_background(any ex) { 1903 any x = ex, y; 1904 x = cdr(x); 1905 y = EVAL(car(x)); 1906 NeedNum(ex, y); 1907 void* b1 = (void*) unBox(y); 1908 x = cdr(x); 1909 y = EVAL(car(x)); 1910 NeedNum(ex, y); 1911 void* b2 = (void*) unBox(y); 1912 gdk_gc_set_background(b1, b2); 1913 return Nil; 1914 } 1915 1916 any cfun_gdk_gc_set_colormap(any ex) { 1917 any x = ex, y; 1918 x = cdr(x); 1919 y = EVAL(car(x)); 1920 NeedNum(ex, y); 1921 void* b1 = (void*) unBox(y); 1922 x = cdr(x); 1923 y = EVAL(car(x)); 1924 NeedNum(ex, y); 1925 void* b2 = (void*) unBox(y); 1926 gdk_gc_set_colormap(b1, b2); 1927 return Nil; 1928 } 1929 1930 any cfun_gdk_color_alloc(any ex) { 1931 any x = ex, y; 1932 x = cdr(x); 1933 y = EVAL(car(x)); 1934 NeedNum(ex, y); 1935 void* b1 = (void*) unBox(y); 1936 x = cdr(x); 1937 y = EVAL(car(x)); 1938 NeedNum(ex, y); 1939 void* b2 = (void*) unBox(y); 1940 long z = gdk_color_alloc(b1, b2); 1941 return box(z); 1942 } 1943 1944 any cfun_gdk_color_parse(any ex) { 1945 any x = ex, y; 1946 x = cdr(x); 1947 y = EVAL(car(x)); 1948 any y1s = xSym(y); 1949 char b1[bufSize(y1s)]; 1950 bufString(y1s, b1); 1951 x = cdr(x); 1952 y = EVAL(car(x)); 1953 NeedNum(ex, y); 1954 void* b2 = (void*) unBox(y); 1955 long z = gdk_color_parse(b1, b2); 1956 return box(z); 1957 } 1958 1959 any cfun_gdk_colormap_get_system(any ex __attribute__((unused))) { 1960 void* z = gdk_colormap_get_system(); 1961 return box(z); 1962 } 1963 1964 any cfun_gdk_colormap_alloc_color(any ex) { 1965 any x = ex, y; 1966 x = cdr(x); 1967 y = EVAL(car(x)); 1968 NeedNum(ex, y); 1969 void* b1 = (void*) unBox(y); 1970 x = cdr(x); 1971 y = EVAL(car(x)); 1972 NeedNum(ex, y); 1973 void* b2 = (void*) unBox(y); 1974 x = cdr(x); 1975 y = EVAL(car(x)); 1976 int b3 = y == Nil ? 0 : 1; 1977 x = cdr(x); 1978 y = EVAL(car(x)); 1979 int b4 = y == Nil ? 0 : 1; 1980 int z = gdk_colormap_alloc_color(b1, b2, b3, b4); 1981 return z == 0 ? T : Nil; 1982 } 1983 1984 any cfun_gdk_get_default_root_window(any ex __attribute__((unused))) { 1985 void* z = gdk_get_default_root_window(); 1986 return box(z); 1987 } 1988 1989 any cfun_gdk_rgb_find_color(any ex) { 1990 any x = ex, y; 1991 x = cdr(x); 1992 y = EVAL(car(x)); 1993 NeedNum(ex, y); 1994 void* b1 = (void*) unBox(y); 1995 x = cdr(x); 1996 y = EVAL(car(x)); 1997 NeedNum(ex, y); 1998 void* b2 = (void*) unBox(y); 1999 gdk_rgb_find_color(b1, b2); 2000 return Nil; 2001 } 2002 2003 any cfun_gdk_drawable_set_colormap(any ex) { 2004 any x = ex, y; 2005 x = cdr(x); 2006 y = EVAL(car(x)); 2007 NeedNum(ex, y); 2008 void* b1 = (void*) unBox(y); 2009 x = cdr(x); 2010 y = EVAL(car(x)); 2011 NeedNum(ex, y); 2012 void* b2 = (void*) unBox(y); 2013 gdk_drawable_set_colormap(b1, b2); 2014 return Nil; 2015 } 2016 2017 any cfun_gdk_drawable_get_size(any ex) { 2018 any x = ex, y; 2019 x = cdr(x); 2020 y = EVAL(car(x)); 2021 NeedNum(ex, y); 2022 void* b1 = (void*) unBox(y); 2023 x = cdr(x); 2024 y = EVAL(car(x)); 2025 NeedNum(ex, y); 2026 void* b2 = (void*) unBox(y); 2027 x = cdr(x); 2028 y = EVAL(car(x)); 2029 NeedNum(ex, y); 2030 void* b3 = (void*) unBox(y); 2031 gdk_drawable_get_size(b1, b2, b3); 2032 return Nil; 2033 } 2034 2035 any cfun_gdk_keymap_translate_keyboard_state(any ex) { 2036 any x = ex, y; 2037 x = cdr(x); 2038 y = EVAL(car(x)); 2039 void* b1 = (void*) 0; 2040 x = cdr(x); 2041 y = EVAL(car(x)); 2042 NeedNum(ex, y); 2043 long b2 = (long) unBox(y); 2044 x = cdr(x); 2045 y = EVAL(car(x)); 2046 NeedNum(ex, y); 2047 long b3 = (long) unBox(y); 2048 x = cdr(x); 2049 y = EVAL(car(x)); 2050 NeedNum(ex, y); 2051 long b4 = (long) unBox(y); 2052 x = cdr(x); 2053 y = EVAL(car(x)); 2054 NeedNum(ex, y); 2055 void* b5 = (void*) unBox(y); 2056 x = cdr(x); 2057 y = EVAL(car(x)); 2058 void* b6 = (void*) 0; 2059 x = cdr(x); 2060 y = EVAL(car(x)); 2061 void* b7 = (void*) 0; 2062 x = cdr(x); 2063 y = EVAL(car(x)); 2064 void* b8 = (void*) 0; 2065 int z = gdk_keymap_translate_keyboard_state(b1, b2, b3, b4, b5, b6, b7, b8); 2066 return z == 0 ? T : Nil; 2067 } 2068 2069 any cfun_gdk_window_process_all_updates(any ex __attribute__((unused))) { 2070 gdk_window_process_all_updates(); 2071 return Nil; 2072 } 2073 2074 any cfun_gdk_window_get_geometry(any ex) { 2075 any x = ex, y; 2076 x = cdr(x); 2077 y = EVAL(car(x)); 2078 NeedNum(ex, y); 2079 void* b1 = (void*) unBox(y); 2080 x = cdr(x); 2081 y = EVAL(car(x)); 2082 void* b2 = (void*) 0; 2083 x = cdr(x); 2084 y = EVAL(car(x)); 2085 void* b3 = (void*) 0; 2086 x = cdr(x); 2087 y = EVAL(car(x)); 2088 NeedNum(ex, y); 2089 void* b4 = (void*) unBox(y); 2090 x = cdr(x); 2091 y = EVAL(car(x)); 2092 any y5s = xSym(y); 2093 char b5[bufSize(y5s)]; 2094 bufString(y5s, b5); 2095 x = cdr(x); 2096 y = EVAL(car(x)); 2097 void* b6 = (void*) 0; 2098 gdk_window_get_geometry(b1, b2, b3, b4, b5, b6); 2099 return Nil; 2100 } 2101 2102 any cfun_gdk_screen_get_default(any ex __attribute__((unused))) { 2103 void* z = gdk_screen_get_default(); 2104 return box(z); 2105 } 2106 2107 any cfun_gdk_screen_get_width(any ex) { 2108 any x = ex, y; 2109 x = cdr(x); 2110 y = EVAL(car(x)); 2111 NeedNum(ex, y); 2112 void* b1 = (void*) unBox(y); 2113 long z = gdk_screen_get_width(b1); 2114 return box(z); 2115 } 2116 2117 any cfun_gdk_screen_get_height(any ex) { 2118 any x = ex, y; 2119 x = cdr(x); 2120 y = EVAL(car(x)); 2121 NeedNum(ex, y); 2122 void* b1 = (void*) unBox(y); 2123 long z = gdk_screen_get_height(b1); 2124 return box(z); 2125 } 2126 2127 any cfun_gdk_screen_width(any ex __attribute__((unused))) { 2128 long z = gdk_screen_width(); 2129 return box(z); 2130 } 2131 2132 any cfun_gdk_screen_height(any ex __attribute__((unused))) { 2133 long z = gdk_screen_height(); 2134 return box(z); 2135 } 2136 2137 any cfun_gdk_flush(any ex __attribute__((unused))) { 2138 gdk_flush(); 2139 return Nil; 2140 } 2141 2142 any cfun_gdk_init(any ex) { 2143 any x = ex, y; 2144 x = cdr(x); 2145 y = EVAL(car(x)); 2146 void* b1 = (void*) 0; 2147 x = cdr(x); 2148 y = EVAL(car(x)); 2149 void* b2 = (void*) 0; 2150 gdk_init(b1, b2); 2151 return Nil; 2152 } 2153 2154 any cfun_gdk_display_get_default(any ex __attribute__((unused))) { 2155 void* z = gdk_display_get_default(); 2156 return box(z); 2157 } 2158 2159 any cfun_gdk_display_get_pointer(any ex) { 2160 any x = ex, y; 2161 x = cdr(x); 2162 y = EVAL(car(x)); 2163 NeedNum(ex, y); 2164 void* b1 = (void*) unBox(y); 2165 x = cdr(x); 2166 y = EVAL(car(x)); 2167 void* b2 = (void*) 0; 2168 x = cdr(x); 2169 y = EVAL(car(x)); 2170 NeedNum(ex, y); 2171 void* b3 = (void*) unBox(y); 2172 x = cdr(x); 2173 y = EVAL(car(x)); 2174 NeedNum(ex, y); 2175 void* b4 = (void*) unBox(y); 2176 x = cdr(x); 2177 y = EVAL(car(x)); 2178 void* b5 = (void*) 0; 2179 gdk_display_get_pointer(b1, b2, b3, b4, b5); 2180 return Nil; 2181 } 2182 2183 any cfun_gtk_image_new(any ex __attribute__((unused))) { 2184 void* z = gtk_image_new(); 2185 return box(z); 2186 } 2187 2188 any cfun_gtk_image_new_from_pixmap(any ex) { 2189 any x = ex, y; 2190 x = cdr(x); 2191 y = EVAL(car(x)); 2192 NeedNum(ex, y); 2193 void* b1 = (void*) unBox(y); 2194 x = cdr(x); 2195 y = EVAL(car(x)); 2196 NeedNum(ex, y); 2197 void* b2 = (void*) unBox(y); 2198 void* z = gtk_image_new_from_pixmap(b1, b2); 2199 return box(z); 2200 } 2201 2202 any cfun_gtk_image_set_from_pixbuf(any ex) { 2203 any x = ex, y; 2204 x = cdr(x); 2205 y = EVAL(car(x)); 2206 NeedNum(ex, y); 2207 void* b1 = (void*) unBox(y); 2208 x = cdr(x); 2209 y = EVAL(car(x)); 2210 NeedNum(ex, y); 2211 void* b2 = (void*) unBox(y); 2212 gtk_image_set_from_pixbuf(b1, b2); 2213 return Nil; 2214 } 2215 2216 any cfun_gtk_image_set_from_pixmap(any ex) { 2217 any x = ex, y; 2218 x = cdr(x); 2219 y = EVAL(car(x)); 2220 NeedNum(ex, y); 2221 void* b1 = (void*) unBox(y); 2222 x = cdr(x); 2223 y = EVAL(car(x)); 2224 NeedNum(ex, y); 2225 void* b2 = (void*) unBox(y); 2226 x = cdr(x); 2227 y = EVAL(car(x)); 2228 void* b3 = (void*) 0; 2229 gtk_image_set_from_pixmap(b1, b2, b3); 2230 return Nil; 2231 } 2232 2233 any cfun_gtk_image_set(any ex) { 2234 any x = ex, y; 2235 x = cdr(x); 2236 y = EVAL(car(x)); 2237 NeedNum(ex, y); 2238 void* b1 = (void*) unBox(y); 2239 x = cdr(x); 2240 y = EVAL(car(x)); 2241 NeedNum(ex, y); 2242 void* b2 = (void*) unBox(y); 2243 x = cdr(x); 2244 y = EVAL(car(x)); 2245 void* b3 = (void*) 0; 2246 gtk_image_set(b1, b2, b3); 2247 return Nil; 2248 } 2249 2250 any cfun_gtk_image_set_from_file(any ex) { 2251 any x = ex, y; 2252 x = cdr(x); 2253 y = EVAL(car(x)); 2254 NeedNum(ex, y); 2255 void* b1 = (void*) unBox(y); 2256 x = cdr(x); 2257 y = EVAL(car(x)); 2258 any y2s = xSym(y); 2259 char b2[bufSize(y2s)]; 2260 bufString(y2s, b2); 2261 gtk_image_set_from_file(b1, b2); 2262 return Nil; 2263 } 2264 2265 any cfun_gtk_image_new_from_file(any ex) { 2266 any x = ex, y; 2267 x = cdr(x); 2268 y = EVAL(car(x)); 2269 any y1s = xSym(y); 2270 char b1[bufSize(y1s)]; 2271 bufString(y1s, b1); 2272 void* z = gtk_image_new_from_file(b1); 2273 return box(z); 2274 } 2275 2276 any cfun_gtk_pixmap_new(any ex) { 2277 any x = ex, y; 2278 x = cdr(x); 2279 y = EVAL(car(x)); 2280 NeedNum(ex, y); 2281 void* b1 = (void*) unBox(y); 2282 x = cdr(x); 2283 y = EVAL(car(x)); 2284 void* b2 = (void*) 0; 2285 void* z = gtk_pixmap_new(b1, b2); 2286 return box(z); 2287 } 2288 2289 any cfun_gtk_drawing_area_new(any ex __attribute__((unused))) { 2290 void* z = gtk_drawing_area_new(); 2291 return box(z); 2292 } 2293 2294 any cfun_gtk_widget_queue_draw(any ex) { 2295 any x = ex, y; 2296 x = cdr(x); 2297 y = EVAL(car(x)); 2298 NeedNum(ex, y); 2299 void* b1 = (void*) unBox(y); 2300 gtk_widget_queue_draw(b1); 2301 return Nil; 2302 } 2303 2304 any cfun_gtk_widget_get_colormap(any ex) { 2305 any x = ex, y; 2306 x = cdr(x); 2307 y = EVAL(car(x)); 2308 NeedNum(ex, y); 2309 void* b1 = (void*) unBox(y); 2310 void* z = gtk_widget_get_colormap(b1); 2311 return box(z); 2312 } 2313 2314 any cfun_gtk_widget_get_parent_window(any ex) { 2315 any x = ex, y; 2316 x = cdr(x); 2317 y = EVAL(car(x)); 2318 NeedNum(ex, y); 2319 void* b1 = (void*) unBox(y); 2320 void* z = gtk_widget_get_parent_window(b1); 2321 return box(z); 2322 } 2323 2324 any cfun_gtk_widget_create_pango_layout(any ex) { 2325 any x = ex, y; 2326 x = cdr(x); 2327 y = EVAL(car(x)); 2328 NeedNum(ex, y); 2329 void* b1 = (void*) unBox(y); 2330 x = cdr(x); 2331 y = EVAL(car(x)); 2332 any y2s = xSym(y); 2333 char b2[bufSize(y2s)]; 2334 bufString(y2s, b2); 2335 void* z = gtk_widget_create_pango_layout(b1, b2); 2336 return box(z); 2337 } 2338 2339 any cfun_gtk_vscrollbar_new(any ex) { 2340 any x = ex, y; 2341 x = cdr(x); 2342 y = EVAL(car(x)); 2343 NeedNum(ex, y); 2344 void* b1 = (void*) unBox(y); 2345 void* z = gtk_vscrollbar_new(b1); 2346 return box(z); 2347 } 2348 2349 any cfun_gtk_label_new(any ex) { 2350 any x = ex, y; 2351 x = cdr(x); 2352 y = EVAL(car(x)); 2353 any y1s = xSym(y); 2354 char b1[bufSize(y1s)]; 2355 bufString(y1s, b1); 2356 void* z = gtk_label_new(b1); 2357 return box(z); 2358 } 2359 2360 any cfun_gtk_label_set_text(any ex) { 2361 any x = ex, y; 2362 x = cdr(x); 2363 y = EVAL(car(x)); 2364 NeedNum(ex, y); 2365 void* b1 = (void*) unBox(y); 2366 x = cdr(x); 2367 y = EVAL(car(x)); 2368 any y2s = xSym(y); 2369 char b2[bufSize(y2s)]; 2370 bufString(y2s, b2); 2371 gtk_label_set_text(b1, b2); 2372 return Nil; 2373 } 2374 2375 any cfun_gtk_label_get_text(any ex) { 2376 any x = ex, y; 2377 x = cdr(x); 2378 y = EVAL(car(x)); 2379 NeedNum(ex, y); 2380 void* b1 = (void*) unBox(y); 2381 char* z = gtk_label_get_text(b1); 2382 return mkStr(z); 2383 } 2384 2385 any cfun_gtk_label_set_line_wrap(any ex) { 2386 any x = ex, y; 2387 x = cdr(x); 2388 y = EVAL(car(x)); 2389 NeedNum(ex, y); 2390 void* b1 = (void*) unBox(y); 2391 x = cdr(x); 2392 y = EVAL(car(x)); 2393 int b2 = y == Nil ? 0 : 1; 2394 gtk_label_set_line_wrap(b1, b2); 2395 return Nil; 2396 } 2397 2398 any cfun_gtk_label_set_selectable(any ex) { 2399 any x = ex, y; 2400 x = cdr(x); 2401 y = EVAL(car(x)); 2402 NeedNum(ex, y); 2403 void* b1 = (void*) unBox(y); 2404 x = cdr(x); 2405 y = EVAL(car(x)); 2406 int b2 = y == Nil ? 0 : 1; 2407 gtk_label_set_selectable(b1, b2); 2408 return Nil; 2409 } 2410 2411 any cfun_gtk_label_set_use_markup(any ex) { 2412 any x = ex, y; 2413 x = cdr(x); 2414 y = EVAL(car(x)); 2415 NeedNum(ex, y); 2416 void* b1 = (void*) unBox(y); 2417 x = cdr(x); 2418 y = EVAL(car(x)); 2419 int b2 = y == Nil ? 0 : 1; 2420 gtk_label_set_use_markup(b1, b2); 2421 return Nil; 2422 } 2423 2424 any cfun_gtk_label_set_justify(any ex) { 2425 any x = ex, y; 2426 x = cdr(x); 2427 y = EVAL(car(x)); 2428 NeedNum(ex, y); 2429 void* b1 = (void*) unBox(y); 2430 x = cdr(x); 2431 y = EVAL(car(x)); 2432 NeedNum(ex, y); 2433 long b2 = (long) unBox(y); 2434 gtk_label_set_justify(b1, b2); 2435 return Nil; 2436 } 2437 2438 any cfun_gtk_label_get_width_chars(any ex) { 2439 any x = ex, y; 2440 x = cdr(x); 2441 y = EVAL(car(x)); 2442 NeedNum(ex, y); 2443 void* b1 = (void*) unBox(y); 2444 long z = gtk_label_get_width_chars(b1); 2445 return box(z); 2446 } 2447 2448 any cfun_gtk_label_get_max_width_chars(any ex) { 2449 any x = ex, y; 2450 x = cdr(x); 2451 y = EVAL(car(x)); 2452 NeedNum(ex, y); 2453 void* b1 = (void*) unBox(y); 2454 long z = gtk_label_get_max_width_chars(b1); 2455 return box(z); 2456 } 2457 2458 any cfun_gtk_label_set_markup_with_mnemonic(any ex) { 2459 any x = ex, y; 2460 x = cdr(x); 2461 y = EVAL(car(x)); 2462 NeedNum(ex, y); 2463 void* b1 = (void*) unBox(y); 2464 x = cdr(x); 2465 y = EVAL(car(x)); 2466 any y2s = xSym(y); 2467 char b2[bufSize(y2s)]; 2468 bufString(y2s, b2); 2469 gtk_label_set_markup_with_mnemonic(b1, b2); 2470 return Nil; 2471 } 2472 2473 any cfun_gtk_frame_new(any ex) { 2474 any x = ex, y; 2475 x = cdr(x); 2476 y = EVAL(car(x)); 2477 void* b1 = (void*) 0; 2478 void* z = gtk_frame_new(b1); 2479 return box(z); 2480 } 2481 2482 any cfun_gtk_frame_set_label_align(any ex) { 2483 any x = ex, y; 2484 x = cdr(x); 2485 y = EVAL(car(x)); 2486 NeedNum(ex, y); 2487 void* b1 = (void*) unBox(y); 2488 x = cdr(x); 2489 y = EVAL(car(x)); 2490 NeedNum(ex, y); 2491 float b2 = (float) unBox(y) / 10000; 2492 x = cdr(x); 2493 y = EVAL(car(x)); 2494 NeedNum(ex, y); 2495 float b3 = (float) unBox(y) / 10000; 2496 gtk_frame_set_label_align(b1, b2, b3); 2497 return Nil; 2498 } 2499 2500 any cfun_gtk_frame_set_label(any ex) { 2501 any x = ex, y; 2502 x = cdr(x); 2503 y = EVAL(car(x)); 2504 NeedNum(ex, y); 2505 void* b1 = (void*) unBox(y); 2506 x = cdr(x); 2507 y = EVAL(car(x)); 2508 any y2s = xSym(y); 2509 char b2[bufSize(y2s)]; 2510 bufString(y2s, b2); 2511 gtk_frame_set_label(b1, b2); 2512 return Nil; 2513 } 2514 2515 any cfun_gtk_frame_get_label(any ex) { 2516 any x = ex, y; 2517 x = cdr(x); 2518 y = EVAL(car(x)); 2519 NeedNum(ex, y); 2520 void* b1 = (void*) unBox(y); 2521 char* z = gtk_frame_get_label(b1); 2522 return mkStr(z); 2523 } 2524 2525 any cfun_gtk_aspect_frame_new(any ex) { 2526 any x = ex, y; 2527 x = cdr(x); 2528 y = EVAL(car(x)); 2529 any y1s = xSym(y); 2530 char b1[bufSize(y1s)]; 2531 bufString(y1s, b1); 2532 x = cdr(x); 2533 y = EVAL(car(x)); 2534 NeedNum(ex, y); 2535 float b2 = (float) unBox(y) / 10000; 2536 x = cdr(x); 2537 y = EVAL(car(x)); 2538 NeedNum(ex, y); 2539 float b3 = (float) unBox(y) / 10000; 2540 x = cdr(x); 2541 y = EVAL(car(x)); 2542 NeedNum(ex, y); 2543 float b4 = (float) unBox(y) / 10000; 2544 x = cdr(x); 2545 y = EVAL(car(x)); 2546 int b5 = y == Nil ? 0 : 1; 2547 void* z = gtk_aspect_frame_new(b1, b2, b3, b4, b5); 2548 return box(z); 2549 } 2550 2551 any cfun_gtk_aspect_frame_set(any ex) { 2552 any x = ex, y; 2553 x = cdr(x); 2554 y = EVAL(car(x)); 2555 NeedNum(ex, y); 2556 void* b1 = (void*) unBox(y); 2557 x = cdr(x); 2558 y = EVAL(car(x)); 2559 NeedNum(ex, y); 2560 float b2 = (float) unBox(y) / 10000; 2561 x = cdr(x); 2562 y = EVAL(car(x)); 2563 NeedNum(ex, y); 2564 float b3 = (float) unBox(y) / 10000; 2565 x = cdr(x); 2566 y = EVAL(car(x)); 2567 NeedNum(ex, y); 2568 float b4 = (float) unBox(y) / 10000; 2569 x = cdr(x); 2570 y = EVAL(car(x)); 2571 int b5 = y == Nil ? 0 : 1; 2572 gtk_aspect_frame_set(b1, b2, b3, b4, b5); 2573 return Nil; 2574 } 2575 2576 any cfun_gtk_radio_button_new(any ex) { 2577 any x = ex, y; 2578 x = cdr(x); 2579 y = EVAL(car(x)); 2580 void* b1 = (void*) 0; 2581 void* z = gtk_radio_button_new(b1); 2582 return box(z); 2583 } 2584 2585 any cfun_gtk_radio_button_new_with_label(any ex) { 2586 any x = ex, y; 2587 x = cdr(x); 2588 y = EVAL(car(x)); 2589 NeedNum(ex, y); 2590 void* b1 = (void*) unBox(y); 2591 x = cdr(x); 2592 y = EVAL(car(x)); 2593 any y2s = xSym(y); 2594 char b2[bufSize(y2s)]; 2595 bufString(y2s, b2); 2596 void* z = gtk_radio_button_new_with_label(b1, b2); 2597 return box(z); 2598 } 2599 2600 any cfun_gtk_radio_button_new_from_widget(any ex) { 2601 any x = ex, y; 2602 x = cdr(x); 2603 y = EVAL(car(x)); 2604 NeedNum(ex, y); 2605 void* b1 = (void*) unBox(y); 2606 void* z = gtk_radio_button_new_from_widget(b1); 2607 return box(z); 2608 } 2609 2610 any cfun_gtk_radio_button_new_with_label_from_widget(any ex) { 2611 any x = ex, y; 2612 x = cdr(x); 2613 y = EVAL(car(x)); 2614 NeedNum(ex, y); 2615 void* b1 = (void*) unBox(y); 2616 x = cdr(x); 2617 y = EVAL(car(x)); 2618 any y2s = xSym(y); 2619 char b2[bufSize(y2s)]; 2620 bufString(y2s, b2); 2621 void* z = gtk_radio_button_new_with_label_from_widget(b1, b2); 2622 return box(z); 2623 } 2624 2625 any cfun_gtk_notebook_new(any ex __attribute__((unused))) { 2626 void* z = gtk_notebook_new(); 2627 return box(z); 2628 } 2629 2630 any cfun_gtk_notebook_set_tab_pos(any ex) { 2631 any x = ex, y; 2632 x = cdr(x); 2633 y = EVAL(car(x)); 2634 NeedNum(ex, y); 2635 void* b1 = (void*) unBox(y); 2636 x = cdr(x); 2637 y = EVAL(car(x)); 2638 NeedNum(ex, y); 2639 long b2 = (long) unBox(y); 2640 gtk_notebook_set_tab_pos(b1, b2); 2641 return Nil; 2642 } 2643 2644 any cfun_gtk_notebook_popup_enable(any ex) { 2645 any x = ex, y; 2646 x = cdr(x); 2647 y = EVAL(car(x)); 2648 NeedNum(ex, y); 2649 void* b1 = (void*) unBox(y); 2650 gtk_notebook_popup_enable(b1); 2651 return Nil; 2652 } 2653 2654 any cfun_gtk_notebook_insert_page(any ex) { 2655 any x = ex, y; 2656 x = cdr(x); 2657 y = EVAL(car(x)); 2658 NeedNum(ex, y); 2659 void* b1 = (void*) unBox(y); 2660 x = cdr(x); 2661 y = EVAL(car(x)); 2662 NeedNum(ex, y); 2663 void* b2 = (void*) unBox(y); 2664 x = cdr(x); 2665 y = EVAL(car(x)); 2666 NeedNum(ex, y); 2667 void* b3 = (void*) unBox(y); 2668 x = cdr(x); 2669 y = EVAL(car(x)); 2670 NeedNum(ex, y); 2671 long b4 = (long) unBox(y); 2672 gtk_notebook_insert_page(b1, b2, b3, b4); 2673 return Nil; 2674 } 2675 2676 any cfun_gtk_notebook_remove_page(any ex) { 2677 any x = ex, y; 2678 x = cdr(x); 2679 y = EVAL(car(x)); 2680 NeedNum(ex, y); 2681 void* b1 = (void*) unBox(y); 2682 x = cdr(x); 2683 y = EVAL(car(x)); 2684 NeedNum(ex, y); 2685 long b2 = (long) unBox(y); 2686 gtk_notebook_remove_page(b1, b2); 2687 return Nil; 2688 } 2689 2690 any cfun_gtk_notebook_get_current_page(any ex) { 2691 any x = ex, y; 2692 x = cdr(x); 2693 y = EVAL(car(x)); 2694 NeedNum(ex, y); 2695 void* b1 = (void*) unBox(y); 2696 gtk_notebook_get_current_page(b1); 2697 return Nil; 2698 } 2699 2700 any cfun_gtk_notebook_set_page(any ex) { 2701 any x = ex, y; 2702 x = cdr(x); 2703 y = EVAL(car(x)); 2704 NeedNum(ex, y); 2705 void* b1 = (void*) unBox(y); 2706 x = cdr(x); 2707 y = EVAL(car(x)); 2708 NeedNum(ex, y); 2709 long b2 = (long) unBox(y); 2710 gtk_notebook_set_page(b1, b2); 2711 return Nil; 2712 } 2713 2714 any cfun_gtk_notebook_set_tab_label_text(any ex) { 2715 any x = ex, y; 2716 x = cdr(x); 2717 y = EVAL(car(x)); 2718 NeedNum(ex, y); 2719 void* b1 = (void*) unBox(y); 2720 x = cdr(x); 2721 y = EVAL(car(x)); 2722 NeedNum(ex, y); 2723 void* b2 = (void*) unBox(y); 2724 x = cdr(x); 2725 y = EVAL(car(x)); 2726 any y3s = xSym(y); 2727 char b3[bufSize(y3s)]; 2728 bufString(y3s, b3); 2729 gtk_notebook_set_tab_label_text(b1, b2, b3); 2730 return Nil; 2731 } 2732 2733 any cfun_gtk_adjustment_new(any ex) { 2734 any x = ex, y; 2735 x = cdr(x); 2736 y = EVAL(car(x)); 2737 NeedNum(ex, y); 2738 double b1 = (double) unBox(y) / 10000; 2739 x = cdr(x); 2740 y = EVAL(car(x)); 2741 NeedNum(ex, y); 2742 double b2 = (double) unBox(y) / 10000; 2743 x = cdr(x); 2744 y = EVAL(car(x)); 2745 NeedNum(ex, y); 2746 double b3 = (double) unBox(y) / 10000; 2747 x = cdr(x); 2748 y = EVAL(car(x)); 2749 NeedNum(ex, y); 2750 double b4 = (double) unBox(y) / 10000; 2751 x = cdr(x); 2752 y = EVAL(car(x)); 2753 NeedNum(ex, y); 2754 double b5 = (double) unBox(y) / 10000; 2755 x = cdr(x); 2756 y = EVAL(car(x)); 2757 NeedNum(ex, y); 2758 double b6 = (double) unBox(y) / 10000; 2759 void* z = gtk_adjustment_new(b1, b2, b3, b4, b5, b6); 2760 return box(z); 2761 } 2762 2763 any cfun_gtk_adjustment_get_value(any ex) { 2764 any x = ex, y; 2765 x = cdr(x); 2766 y = EVAL(car(x)); 2767 NeedNum(ex, y); 2768 void* b1 = (void*) unBox(y); 2769 float z = gtk_adjustment_get_value(b1); 2770 return box(z * 10000); 2771 } 2772 2773 any cfun_gtk_range_get_adjustment(any ex) { 2774 any x = ex, y; 2775 x = cdr(x); 2776 y = EVAL(car(x)); 2777 NeedNum(ex, y); 2778 void* b1 = (void*) unBox(y); 2779 void* z = gtk_range_get_adjustment(b1); 2780 return box(z); 2781 } 2782 2783 any cfun_gtk_range_get_value(any ex) { 2784 any x = ex, y; 2785 x = cdr(x); 2786 y = EVAL(car(x)); 2787 NeedNum(ex, y); 2788 void* b1 = (void*) unBox(y); 2789 float z = gtk_range_get_value(b1); 2790 return box(z * 10000); 2791 } 2792 2793 any cfun_gtk_range_set_value(any ex) { 2794 any x = ex, y; 2795 x = cdr(x); 2796 y = EVAL(car(x)); 2797 NeedNum(ex, y); 2798 void* b1 = (void*) unBox(y); 2799 x = cdr(x); 2800 y = EVAL(car(x)); 2801 NeedNum(ex, y); 2802 double b2 = (double) unBox(y) / 10000; 2803 gtk_range_set_value(b1, b2); 2804 return Nil; 2805 } 2806 2807 any cfun_gtk_scale_set_draw_value(any ex) { 2808 any x = ex, y; 2809 x = cdr(x); 2810 y = EVAL(car(x)); 2811 NeedNum(ex, y); 2812 void* b1 = (void*) unBox(y); 2813 x = cdr(x); 2814 y = EVAL(car(x)); 2815 int b2 = y == Nil ? 0 : 1; 2816 gtk_scale_set_draw_value(b1, b2); 2817 return Nil; 2818 } 2819 2820 any cfun_gtk_scale_set_value_pos(any ex) { 2821 any x = ex, y; 2822 x = cdr(x); 2823 y = EVAL(car(x)); 2824 NeedNum(ex, y); 2825 void* b1 = (void*) unBox(y); 2826 x = cdr(x); 2827 y = EVAL(car(x)); 2828 NeedNum(ex, y); 2829 long b2 = (long) unBox(y); 2830 gtk_scale_set_value_pos(b1, b2); 2831 return Nil; 2832 } 2833 2834 any cfun_gtk_hscale_new(any ex) { 2835 any x = ex, y; 2836 x = cdr(x); 2837 y = EVAL(car(x)); 2838 NeedNum(ex, y); 2839 void* b1 = (void*) unBox(y); 2840 void* z = gtk_hscale_new(b1); 2841 return box(z); 2842 } 2843 2844 any cfun_gtk_hscale_new_with_range(any ex) { 2845 any x = ex, y; 2846 x = cdr(x); 2847 y = EVAL(car(x)); 2848 NeedNum(ex, y); 2849 double b1 = (double) unBox(y) / 10000; 2850 x = cdr(x); 2851 y = EVAL(car(x)); 2852 NeedNum(ex, y); 2853 double b2 = (double) unBox(y) / 10000; 2854 x = cdr(x); 2855 y = EVAL(car(x)); 2856 NeedNum(ex, y); 2857 double b3 = (double) unBox(y) / 10000; 2858 void* z = gtk_hscale_new_with_range(b1, b2, b3); 2859 return box(z); 2860 } 2861 2862 any cfun_gtk_vscale_new_with_range(any ex) { 2863 any x = ex, y; 2864 x = cdr(x); 2865 y = EVAL(car(x)); 2866 NeedNum(ex, y); 2867 double b1 = (double) unBox(y) / 10000; 2868 x = cdr(x); 2869 y = EVAL(car(x)); 2870 NeedNum(ex, y); 2871 double b2 = (double) unBox(y) / 10000; 2872 x = cdr(x); 2873 y = EVAL(car(x)); 2874 NeedNum(ex, y); 2875 double b3 = (double) unBox(y) / 10000; 2876 void* z = gtk_vscale_new_with_range(b1, b2, b3); 2877 return box(z); 2878 } 2879 2880 any cfun_gtk_spin_button_new(any ex) { 2881 any x = ex, y; 2882 x = cdr(x); 2883 y = EVAL(car(x)); 2884 NeedNum(ex, y); 2885 void* b1 = (void*) unBox(y); 2886 x = cdr(x); 2887 y = EVAL(car(x)); 2888 NeedNum(ex, y); 2889 double b2 = (double) unBox(y) / 10000; 2890 x = cdr(x); 2891 y = EVAL(car(x)); 2892 NeedNum(ex, y); 2893 long b3 = (long) unBox(y); 2894 void* z = gtk_spin_button_new(b1, b2, b3); 2895 return box(z); 2896 } 2897 2898 any cfun_gtk_spin_button_get_value_as_int(any ex) { 2899 any x = ex, y; 2900 x = cdr(x); 2901 y = EVAL(car(x)); 2902 NeedNum(ex, y); 2903 void* b1 = (void*) unBox(y); 2904 long z = gtk_spin_button_get_value_as_int(b1); 2905 return box(z); 2906 } 2907 2908 any cfun_gtk_spin_button_get_value(any ex) { 2909 any x = ex, y; 2910 x = cdr(x); 2911 y = EVAL(car(x)); 2912 NeedNum(ex, y); 2913 void* b1 = (void*) unBox(y); 2914 float z = gtk_spin_button_get_value(b1); 2915 return box(z * 10000); 2916 } 2917 2918 any cfun_gtk_spin_button_set_wrap(any ex) { 2919 any x = ex, y; 2920 x = cdr(x); 2921 y = EVAL(car(x)); 2922 NeedNum(ex, y); 2923 void* b1 = (void*) unBox(y); 2924 x = cdr(x); 2925 y = EVAL(car(x)); 2926 int b2 = y == Nil ? 0 : 1; 2927 gtk_spin_button_set_wrap(b1, b2); 2928 return Nil; 2929 } 2930 2931 any cfun_gtk_spin_button_set_value(any ex) { 2932 any x = ex, y; 2933 x = cdr(x); 2934 y = EVAL(car(x)); 2935 NeedNum(ex, y); 2936 void* b1 = (void*) unBox(y); 2937 x = cdr(x); 2938 y = EVAL(car(x)); 2939 NeedNum(ex, y); 2940 double b2 = (double) unBox(y) / 10000; 2941 gtk_spin_button_set_value(b1, b2); 2942 return Nil; 2943 } 2944 2945 any cfun_gtk_arrow_new(any ex) { 2946 any x = ex, y; 2947 x = cdr(x); 2948 y = EVAL(car(x)); 2949 NeedNum(ex, y); 2950 long b1 = (long) unBox(y); 2951 x = cdr(x); 2952 y = EVAL(car(x)); 2953 NeedNum(ex, y); 2954 long b2 = (long) unBox(y); 2955 void* z = gtk_arrow_new(b1, b2); 2956 return box(z); 2957 } 2958 2959 any cfun_gtk_file_chooser_dialog_new(any ex) { 2960 any x = ex, y; 2961 x = cdr(x); 2962 y = EVAL(car(x)); 2963 any y1s = xSym(y); 2964 char b1[bufSize(y1s)]; 2965 bufString(y1s, b1); 2966 x = cdr(x); 2967 y = EVAL(car(x)); 2968 NeedNum(ex, y); 2969 void* b2 = (void*) unBox(y); 2970 x = cdr(x); 2971 y = EVAL(car(x)); 2972 NeedNum(ex, y); 2973 long b3 = (long) unBox(y); 2974 x = cdr(x); 2975 y = EVAL(car(x)); 2976 any y4s = xSym(y); 2977 char b4[bufSize(y4s)]; 2978 bufString(y4s, b4); 2979 x = cdr(x); 2980 y = EVAL(car(x)); 2981 NeedNum(ex, y); 2982 long b5 = (long) unBox(y); 2983 x = cdr(x); 2984 y = EVAL(car(x)); 2985 any y6s = xSym(y); 2986 char b6[bufSize(y6s)]; 2987 bufString(y6s, b6); 2988 x = cdr(x); 2989 y = EVAL(car(x)); 2990 NeedNum(ex, y); 2991 long b7 = (long) unBox(y); 2992 x = cdr(x); 2993 y = EVAL(car(x)); 2994 void* b8 = (void*) 0; 2995 void* z = gtk_file_chooser_dialog_new(b1, b2, b3, b4, b5, b6, b7, b8); 2996 return box(z); 2997 } 2998 2999 any cfun_gtk_file_chooser_widget_new(any ex) { 3000 any x = ex, y; 3001 x = cdr(x); 3002 y = EVAL(car(x)); 3003 NeedNum(ex, y); 3004 long b1 = (long) unBox(y); 3005 void* z = gtk_file_chooser_widget_new(b1); 3006 return box(z); 3007 } 3008 3009 any cfun_gtk_dialog_run(any ex) { 3010 any x = ex, y; 3011 x = cdr(x); 3012 y = EVAL(car(x)); 3013 NeedNum(ex, y); 3014 void* b1 = (void*) unBox(y); 3015 long z = gtk_dialog_run(b1); 3016 return box(z); 3017 } 3018 3019 any cfun_gtk_file_chooser_get_filename(any ex) { 3020 any x = ex, y; 3021 x = cdr(x); 3022 y = EVAL(car(x)); 3023 NeedNum(ex, y); 3024 void* b1 = (void*) unBox(y); 3025 char* z = gtk_file_chooser_get_filename(b1); 3026 return mkStr(z); 3027 } 3028 3029 any cfun_gtk_file_chooser_set_filename(any ex) { 3030 any x = ex, y; 3031 x = cdr(x); 3032 y = EVAL(car(x)); 3033 NeedNum(ex, y); 3034 void* b1 = (void*) unBox(y); 3035 x = cdr(x); 3036 y = EVAL(car(x)); 3037 any y2s = xSym(y); 3038 char b2[bufSize(y2s)]; 3039 bufString(y2s, b2); 3040 int z = gtk_file_chooser_set_filename(b1, b2); 3041 return z == 0 ? T : Nil; 3042 } 3043 3044 any cfun_gtk_file_filter_new(any ex __attribute__((unused))) { 3045 void* z = gtk_file_filter_new(); 3046 return box(z); 3047 } 3048 3049 any cfun_gtk_file_filter_add_pattern(any ex) { 3050 any x = ex, y; 3051 x = cdr(x); 3052 y = EVAL(car(x)); 3053 NeedNum(ex, y); 3054 void* b1 = (void*) unBox(y); 3055 x = cdr(x); 3056 y = EVAL(car(x)); 3057 any y2s = xSym(y); 3058 char b2[bufSize(y2s)]; 3059 bufString(y2s, b2); 3060 gtk_file_filter_add_pattern(b1, b2); 3061 return Nil; 3062 } 3063 3064 any cfun_gtk_file_filter_set_name(any ex) { 3065 any x = ex, y; 3066 x = cdr(x); 3067 y = EVAL(car(x)); 3068 NeedNum(ex, y); 3069 void* b1 = (void*) unBox(y); 3070 x = cdr(x); 3071 y = EVAL(car(x)); 3072 any y2s = xSym(y); 3073 char b2[bufSize(y2s)]; 3074 bufString(y2s, b2); 3075 gtk_file_filter_set_name(b1, b2); 3076 return Nil; 3077 } 3078 3079 any cfun_gtk_file_chooser_add_filter(any ex) { 3080 any x = ex, y; 3081 x = cdr(x); 3082 y = EVAL(car(x)); 3083 NeedNum(ex, y); 3084 void* b1 = (void*) unBox(y); 3085 x = cdr(x); 3086 y = EVAL(car(x)); 3087 NeedNum(ex, y); 3088 void* b2 = (void*) unBox(y); 3089 gtk_file_chooser_add_filter(b1, b2); 3090 return Nil; 3091 } 3092 3093 any cfun_gtk_font_selection_dialog_new(any ex) { 3094 any x = ex, y; 3095 x = cdr(x); 3096 y = EVAL(car(x)); 3097 any y1s = xSym(y); 3098 char b1[bufSize(y1s)]; 3099 bufString(y1s, b1); 3100 void* z = gtk_font_selection_dialog_new(b1); 3101 return box(z); 3102 } 3103 3104 any cfun_gtk_font_selection_dialog_get_font_name(any ex) { 3105 any x = ex, y; 3106 x = cdr(x); 3107 y = EVAL(car(x)); 3108 NeedNum(ex, y); 3109 void* b1 = (void*) unBox(y); 3110 char* z = gtk_font_selection_dialog_get_font_name(b1); 3111 return mkStr(z); 3112 } 3113 3114 any cfun_gtk_font_selection_new(any ex __attribute__((unused))) { 3115 void* z = gtk_font_selection_new(); 3116 return box(z); 3117 } 3118 3119 any cfun_gtk_font_selection_get_font_name(any ex) { 3120 any x = ex, y; 3121 x = cdr(x); 3122 y = EVAL(car(x)); 3123 NeedNum(ex, y); 3124 void* b1 = (void*) unBox(y); 3125 char* z = gtk_font_selection_get_font_name(b1); 3126 return mkStr(z); 3127 } 3128 3129 any cfun_gtk_font_selection_set_font_name(any ex) { 3130 any x = ex, y; 3131 x = cdr(x); 3132 y = EVAL(car(x)); 3133 NeedNum(ex, y); 3134 void* b1 = (void*) unBox(y); 3135 x = cdr(x); 3136 y = EVAL(car(x)); 3137 any y2s = xSym(y); 3138 char b2[bufSize(y2s)]; 3139 bufString(y2s, b2); 3140 int z = gtk_font_selection_set_font_name(b1, b2); 3141 return z == 0 ? T : Nil; 3142 } 3143 3144 any cfun_gtk_color_selection_new(any ex __attribute__((unused))) { 3145 void* z = gtk_color_selection_new(); 3146 return box(z); 3147 } 3148 3149 any cfun_gtk_color_selection_set_has_opacity_control(any ex) { 3150 any x = ex, y; 3151 x = cdr(x); 3152 y = EVAL(car(x)); 3153 NeedNum(ex, y); 3154 void* b1 = (void*) unBox(y); 3155 x = cdr(x); 3156 y = EVAL(car(x)); 3157 int b2 = y == Nil ? 0 : 1; 3158 gtk_color_selection_set_has_opacity_control(b1, b2); 3159 return Nil; 3160 } 3161 3162 any cfun_gtk_color_selection_set_current_color(any ex) { 3163 any x = ex, y; 3164 x = cdr(x); 3165 y = EVAL(car(x)); 3166 NeedNum(ex, y); 3167 void* b1 = (void*) unBox(y); 3168 x = cdr(x); 3169 y = EVAL(car(x)); 3170 any y2s = xSym(y); 3171 char b2[bufSize(y2s)]; 3172 bufString(y2s, b2); 3173 gtk_color_selection_set_current_color(b1, b2); 3174 return Nil; 3175 } 3176 3177 any cfun_gtk_color_selection_get_current_color(any ex) { 3178 any x = ex, y; 3179 x = cdr(x); 3180 y = EVAL(car(x)); 3181 NeedNum(ex, y); 3182 void* b1 = (void*) unBox(y); 3183 x = cdr(x); 3184 y = EVAL(car(x)); 3185 NeedNum(ex, y); 3186 void* b2 = (void*) unBox(y); 3187 gtk_color_selection_get_current_color(b1, b2); 3188 return Nil; 3189 } 3190 3191 any cfun_gtk_color_selection_set_color(any ex) { 3192 any x = ex, y; 3193 x = cdr(x); 3194 y = EVAL(car(x)); 3195 NeedNum(ex, y); 3196 void* b1 = (void*) unBox(y); 3197 x = cdr(x); 3198 y = EVAL(car(x)); 3199 any y2s = xSym(y); 3200 char b2[bufSize(y2s)]; 3201 bufString(y2s, b2); 3202 gtk_color_selection_set_color(b1, b2); 3203 return Nil; 3204 } 3205 3206 any cfun_gtk_menu_bar_new(any ex __attribute__((unused))) { 3207 void* z = gtk_menu_bar_new(); 3208 return box(z); 3209 } 3210 3211 any cfun_gtk_menu_shell_append(any ex) { 3212 any x = ex, y; 3213 x = cdr(x); 3214 y = EVAL(car(x)); 3215 NeedNum(ex, y); 3216 void* b1 = (void*) unBox(y); 3217 x = cdr(x); 3218 y = EVAL(car(x)); 3219 NeedNum(ex, y); 3220 void* b2 = (void*) unBox(y); 3221 gtk_menu_shell_append(b1, b2); 3222 return Nil; 3223 } 3224 3225 any cfun_gtk_menu_item_new(any ex __attribute__((unused))) { 3226 void* z = gtk_menu_item_new(); 3227 return box(z); 3228 } 3229 3230 any cfun_gtk_menu_item_new_with_label(any ex) { 3231 any x = ex, y; 3232 x = cdr(x); 3233 y = EVAL(car(x)); 3234 any y1s = xSym(y); 3235 char b1[bufSize(y1s)]; 3236 bufString(y1s, b1); 3237 void* z = gtk_menu_item_new_with_label(b1); 3238 return box(z); 3239 } 3240 3241 any cfun_gtk_menu_item_new_with_mnemonic(any ex) { 3242 any x = ex, y; 3243 x = cdr(x); 3244 y = EVAL(car(x)); 3245 any y1s = xSym(y); 3246 char b1[bufSize(y1s)]; 3247 bufString(y1s, b1); 3248 void* z = gtk_menu_item_new_with_mnemonic(b1); 3249 return box(z); 3250 } 3251 3252 any cfun_gtk_menu_new(any ex __attribute__((unused))) { 3253 void* z = gtk_menu_new(); 3254 return box(z); 3255 } 3256 3257 any cfun_gtk_menu_item_set_right_justified(any ex) { 3258 any x = ex, y; 3259 x = cdr(x); 3260 y = EVAL(car(x)); 3261 NeedNum(ex, y); 3262 void* b1 = (void*) unBox(y); 3263 x = cdr(x); 3264 y = EVAL(car(x)); 3265 int b2 = y == Nil ? 0 : 1; 3266 gtk_menu_item_set_right_justified(b1, b2); 3267 return Nil; 3268 } 3269 3270 any cfun_gtk_menu_item_set_submenu(any ex) { 3271 any x = ex, y; 3272 x = cdr(x); 3273 y = EVAL(car(x)); 3274 NeedNum(ex, y); 3275 void* b1 = (void*) unBox(y); 3276 x = cdr(x); 3277 y = EVAL(car(x)); 3278 NeedNum(ex, y); 3279 void* b2 = (void*) unBox(y); 3280 gtk_menu_item_set_submenu(b1, b2); 3281 return Nil; 3282 } 3283 3284 any cfun_gtk_check_menu_item_new_with_label(any ex) { 3285 any x = ex, y; 3286 x = cdr(x); 3287 y = EVAL(car(x)); 3288 any y1s = xSym(y); 3289 char b1[bufSize(y1s)]; 3290 bufString(y1s, b1); 3291 void* z = gtk_check_menu_item_new_with_label(b1); 3292 return box(z); 3293 } 3294 3295 any cfun_gtk_check_menu_item_new_with_mnemonic(any ex) { 3296 any x = ex, y; 3297 x = cdr(x); 3298 y = EVAL(car(x)); 3299 any y1s = xSym(y); 3300 char b1[bufSize(y1s)]; 3301 bufString(y1s, b1); 3302 void* z = gtk_check_menu_item_new_with_mnemonic(b1); 3303 return box(z); 3304 } 3305 3306 any cfun_gtk_check_menu_item_get_active(any ex) { 3307 any x = ex, y; 3308 x = cdr(x); 3309 y = EVAL(car(x)); 3310 NeedNum(ex, y); 3311 void* b1 = (void*) unBox(y); 3312 int z = gtk_check_menu_item_get_active(b1); 3313 return z == 0 ? T : Nil; 3314 } 3315 3316 any cfun_gtk_check_menu_item_set_active(any ex) { 3317 any x = ex, y; 3318 x = cdr(x); 3319 y = EVAL(car(x)); 3320 NeedNum(ex, y); 3321 void* b1 = (void*) unBox(y); 3322 x = cdr(x); 3323 y = EVAL(car(x)); 3324 int b2 = y == Nil ? 0 : 1; 3325 gtk_check_menu_item_set_active(b1, b2); 3326 return Nil; 3327 } 3328 3329 any cfun_gtk_menu_popup(any ex) { 3330 any x = ex, y; 3331 x = cdr(x); 3332 y = EVAL(car(x)); 3333 NeedNum(ex, y); 3334 void* b1 = (void*) unBox(y); 3335 x = cdr(x); 3336 y = EVAL(car(x)); 3337 void* b2 = (void*) 0; 3338 x = cdr(x); 3339 y = EVAL(car(x)); 3340 void* b3 = (void*) 0; 3341 x = cdr(x); 3342 y = EVAL(car(x)); 3343 void* b4 = (void*) 0; 3344 x = cdr(x); 3345 y = EVAL(car(x)); 3346 void* b5 = (void*) 0; 3347 x = cdr(x); 3348 y = EVAL(car(x)); 3349 NeedNum(ex, y); 3350 long b6 = (long) unBox(y); 3351 x = cdr(x); 3352 y = EVAL(car(x)); 3353 NeedNum(ex, y); 3354 long b7 = (long) unBox(y); 3355 gtk_menu_popup(b1, b2, b3, b4, b5, b6, b7); 3356 return Nil; 3357 } 3358 3359 any cfun_gtk_progress_bar_new(any ex __attribute__((unused))) { 3360 void* z = gtk_progress_bar_new(); 3361 return box(z); 3362 } 3363 3364 any cfun_gtk_progress_bar_set_text(any ex) { 3365 any x = ex, y; 3366 x = cdr(x); 3367 y = EVAL(car(x)); 3368 NeedNum(ex, y); 3369 void* b1 = (void*) unBox(y); 3370 x = cdr(x); 3371 y = EVAL(car(x)); 3372 any y2s = xSym(y); 3373 char b2[bufSize(y2s)]; 3374 bufString(y2s, b2); 3375 gtk_progress_bar_set_text(b1, b2); 3376 return Nil; 3377 } 3378 3379 any cfun_gtk_progress_bar_set_fraction(any ex) { 3380 any x = ex, y; 3381 x = cdr(x); 3382 y = EVAL(car(x)); 3383 NeedNum(ex, y); 3384 void* b1 = (void*) unBox(y); 3385 x = cdr(x); 3386 y = EVAL(car(x)); 3387 NeedNum(ex, y); 3388 double b2 = (double) unBox(y) / 10000; 3389 gtk_progress_bar_set_fraction(b1, b2); 3390 return Nil; 3391 } 3392 3393 any cfun_gtk_progress_bar_pulse(any ex) { 3394 any x = ex, y; 3395 x = cdr(x); 3396 y = EVAL(car(x)); 3397 NeedNum(ex, y); 3398 void* b1 = (void*) unBox(y); 3399 gtk_progress_bar_pulse(b1); 3400 return Nil; 3401 } 3402 3403 any cfun_gtk_progress_bar_set_pulse_step(any ex) { 3404 any x = ex, y; 3405 x = cdr(x); 3406 y = EVAL(car(x)); 3407 NeedNum(ex, y); 3408 void* b1 = (void*) unBox(y); 3409 x = cdr(x); 3410 y = EVAL(car(x)); 3411 NeedNum(ex, y); 3412 double b2 = (double) unBox(y) / 10000; 3413 gtk_progress_bar_set_pulse_step(b1, b2); 3414 return Nil; 3415 } 3416 3417 any cfun_gtk_statusbar_new(any ex __attribute__((unused))) { 3418 void* z = gtk_statusbar_new(); 3419 return box(z); 3420 } 3421 3422 any cfun_gtk_statusbar_get_context_id(any ex) { 3423 any x = ex, y; 3424 x = cdr(x); 3425 y = EVAL(car(x)); 3426 NeedNum(ex, y); 3427 void* b1 = (void*) unBox(y); 3428 x = cdr(x); 3429 y = EVAL(car(x)); 3430 any y2s = xSym(y); 3431 char b2[bufSize(y2s)]; 3432 bufString(y2s, b2); 3433 long z = gtk_statusbar_get_context_id(b1, b2); 3434 return box(z); 3435 } 3436 3437 any cfun_gtk_statusbar_push(any ex) { 3438 any x = ex, y; 3439 x = cdr(x); 3440 y = EVAL(car(x)); 3441 NeedNum(ex, y); 3442 void* b1 = (void*) unBox(y); 3443 x = cdr(x); 3444 y = EVAL(car(x)); 3445 NeedNum(ex, y); 3446 long b2 = (long) unBox(y); 3447 x = cdr(x); 3448 y = EVAL(car(x)); 3449 any y3s = xSym(y); 3450 char b3[bufSize(y3s)]; 3451 bufString(y3s, b3); 3452 long z = gtk_statusbar_push(b1, b2, b3); 3453 return box(z); 3454 } 3455 3456 any cfun_gtk_statusbar_pop(any ex) { 3457 any x = ex, y; 3458 x = cdr(x); 3459 y = EVAL(car(x)); 3460 NeedNum(ex, y); 3461 void* b1 = (void*) unBox(y); 3462 x = cdr(x); 3463 y = EVAL(car(x)); 3464 NeedNum(ex, y); 3465 long b2 = (long) unBox(y); 3466 gtk_statusbar_pop(b1, b2); 3467 return Nil; 3468 } 3469 3470 any cfun_gtk_statusbar_remove(any ex) { 3471 any x = ex, y; 3472 x = cdr(x); 3473 y = EVAL(car(x)); 3474 NeedNum(ex, y); 3475 void* b1 = (void*) unBox(y); 3476 x = cdr(x); 3477 y = EVAL(car(x)); 3478 NeedNum(ex, y); 3479 long b2 = (long) unBox(y); 3480 x = cdr(x); 3481 y = EVAL(car(x)); 3482 NeedNum(ex, y); 3483 long b3 = (long) unBox(y); 3484 gtk_statusbar_remove(b1, b2, b3); 3485 return Nil; 3486 } 3487 3488 any cfun_gtk_statusbar_set_has_resize_grip(any ex) { 3489 any x = ex, y; 3490 x = cdr(x); 3491 y = EVAL(car(x)); 3492 NeedNum(ex, y); 3493 void* b1 = (void*) unBox(y); 3494 x = cdr(x); 3495 y = EVAL(car(x)); 3496 int b2 = y == Nil ? 0 : 1; 3497 gtk_statusbar_set_has_resize_grip(b1, b2); 3498 return Nil; 3499 } 3500 3501 any cfun_gtk_event_box_new(any ex __attribute__((unused))) { 3502 void* z = gtk_event_box_new(); 3503 return box(z); 3504 } 3505 3506 any cfun_gtk_combo_box_new_text(any ex __attribute__((unused))) { 3507 void* z = gtk_combo_box_new_text(); 3508 return box(z); 3509 } 3510 3511 any cfun_gtk_combo_box_append_text(any ex) { 3512 any x = ex, y; 3513 x = cdr(x); 3514 y = EVAL(car(x)); 3515 NeedNum(ex, y); 3516 void* b1 = (void*) unBox(y); 3517 x = cdr(x); 3518 y = EVAL(car(x)); 3519 any y2s = xSym(y); 3520 char b2[bufSize(y2s)]; 3521 bufString(y2s, b2); 3522 gtk_combo_box_append_text(b1, b2); 3523 return Nil; 3524 } 3525 3526 any cfun_gtk_combo_box_insert_text(any ex) { 3527 any x = ex, y; 3528 x = cdr(x); 3529 y = EVAL(car(x)); 3530 NeedNum(ex, y); 3531 void* b1 = (void*) unBox(y); 3532 x = cdr(x); 3533 y = EVAL(car(x)); 3534 NeedNum(ex, y); 3535 long b2 = (long) unBox(y); 3536 x = cdr(x); 3537 y = EVAL(car(x)); 3538 any y3s = xSym(y); 3539 char b3[bufSize(y3s)]; 3540 bufString(y3s, b3); 3541 gtk_combo_box_insert_text(b1, b2, b3); 3542 return Nil; 3543 } 3544 3545 any cfun_gtk_combo_box_prepend_text(any ex) { 3546 any x = ex, y; 3547 x = cdr(x); 3548 y = EVAL(car(x)); 3549 NeedNum(ex, y); 3550 void* b1 = (void*) unBox(y); 3551 x = cdr(x); 3552 y = EVAL(car(x)); 3553 any y2s = xSym(y); 3554 char b2[bufSize(y2s)]; 3555 bufString(y2s, b2); 3556 gtk_combo_box_prepend_text(b1, b2); 3557 return Nil; 3558 } 3559 3560 any cfun_gtk_combo_box_remove_text(any ex) { 3561 any x = ex, y; 3562 x = cdr(x); 3563 y = EVAL(car(x)); 3564 NeedNum(ex, y); 3565 void* b1 = (void*) unBox(y); 3566 x = cdr(x); 3567 y = EVAL(car(x)); 3568 NeedNum(ex, y); 3569 long b2 = (long) unBox(y); 3570 gtk_combo_box_remove_text(b1, b2); 3571 return Nil; 3572 } 3573 3574 any cfun_gtk_combo_box_get_active(any ex) { 3575 any x = ex, y; 3576 x = cdr(x); 3577 y = EVAL(car(x)); 3578 NeedNum(ex, y); 3579 void* b1 = (void*) unBox(y); 3580 long z = gtk_combo_box_get_active(b1); 3581 return box(z); 3582 } 3583 3584 any cfun_gtk_combo_box_set_active(any ex) { 3585 any x = ex, y; 3586 x = cdr(x); 3587 y = EVAL(car(x)); 3588 NeedNum(ex, y); 3589 void* b1 = (void*) unBox(y); 3590 x = cdr(x); 3591 y = EVAL(car(x)); 3592 NeedNum(ex, y); 3593 long b2 = (long) unBox(y); 3594 gtk_combo_box_set_active(b1, b2); 3595 return Nil; 3596 } 3597 3598 any cfun_gtk_combo_box_get_active_text(any ex) { 3599 any x = ex, y; 3600 x = cdr(x); 3601 y = EVAL(car(x)); 3602 NeedNum(ex, y); 3603 void* b1 = (void*) unBox(y); 3604 char* z = gtk_combo_box_get_active_text(b1); 3605 return mkStr(z); 3606 } 3607 3608 any cfun_gtk_vseparator_new(any ex __attribute__((unused))) { 3609 void* z = gtk_vseparator_new(); 3610 return box(z); 3611 } 3612 3613 any cfun_gtk_hseparator_new(any ex __attribute__((unused))) { 3614 void* z = gtk_hseparator_new(); 3615 return box(z); 3616 } 3617 3618 any cfun_gtk_editable_copy_clipboard(any ex) { 3619 any x = ex, y; 3620 x = cdr(x); 3621 y = EVAL(car(x)); 3622 NeedNum(ex, y); 3623 void* b1 = (void*) unBox(y); 3624 gtk_editable_copy_clipboard(b1); 3625 return Nil; 3626 } 3627 3628 any cfun_gtk_editable_cut_clipboard(any ex) { 3629 any x = ex, y; 3630 x = cdr(x); 3631 y = EVAL(car(x)); 3632 NeedNum(ex, y); 3633 void* b1 = (void*) unBox(y); 3634 gtk_editable_cut_clipboard(b1); 3635 return Nil; 3636 } 3637 3638 any cfun_gtk_editable_paste_clipboard(any ex) { 3639 any x = ex, y; 3640 x = cdr(x); 3641 y = EVAL(car(x)); 3642 NeedNum(ex, y); 3643 void* b1 = (void*) unBox(y); 3644 gtk_editable_paste_clipboard(b1); 3645 return Nil; 3646 } 3647 3648 any cfun_gdk_atom_intern(any ex) { 3649 any x = ex, y; 3650 x = cdr(x); 3651 y = EVAL(car(x)); 3652 any y1s = xSym(y); 3653 char b1[bufSize(y1s)]; 3654 bufString(y1s, b1); 3655 x = cdr(x); 3656 y = EVAL(car(x)); 3657 NeedNum(ex, y); 3658 long b2 = (long) unBox(y); 3659 void* z = gdk_atom_intern(b1, b2); 3660 return box(z); 3661 } 3662 3663 any cfun_gtk_clipboard_get(any ex) { 3664 any x = ex, y; 3665 x = cdr(x); 3666 y = EVAL(car(x)); 3667 NeedNum(ex, y); 3668 long b1 = (long) unBox(y); 3669 void* z = gtk_clipboard_get(b1); 3670 return box(z); 3671 } 3672 3673 any cfun_gtk_clipboard_set_text(any ex) { 3674 any x = ex, y; 3675 x = cdr(x); 3676 y = EVAL(car(x)); 3677 NeedNum(ex, y); 3678 void* b1 = (void*) unBox(y); 3679 x = cdr(x); 3680 y = EVAL(car(x)); 3681 any y2s = xSym(y); 3682 char b2[bufSize(y2s)]; 3683 bufString(y2s, b2); 3684 x = cdr(x); 3685 y = EVAL(car(x)); 3686 NeedNum(ex, y); 3687 long b3 = (long) unBox(y); 3688 gtk_clipboard_set_text(b1, b2, b3); 3689 return Nil; 3690 } 3691 3692 any cfun_gtk_clipboard_wait_for_text(any ex) { 3693 any x = ex, y; 3694 x = cdr(x); 3695 y = EVAL(car(x)); 3696 NeedNum(ex, y); 3697 void* b1 = (void*) unBox(y); 3698 char* z = gtk_clipboard_wait_for_text(b1); 3699 return mkStr(z); 3700 } 3701 3702 any cfun_gtk_clist_new(any ex) { 3703 any x = ex, y; 3704 x = cdr(x); 3705 y = EVAL(car(x)); 3706 NeedNum(ex, y); 3707 long b1 = (long) unBox(y); 3708 void* z = gtk_clist_new(b1); 3709 return box(z); 3710 } 3711 3712 any cfun_gtk_clist_set_column_title(any ex) { 3713 any x = ex, y; 3714 x = cdr(x); 3715 y = EVAL(car(x)); 3716 NeedNum(ex, y); 3717 void* b1 = (void*) unBox(y); 3718 x = cdr(x); 3719 y = EVAL(car(x)); 3720 NeedNum(ex, y); 3721 long b2 = (long) unBox(y); 3722 x = cdr(x); 3723 y = EVAL(car(x)); 3724 any y3s = xSym(y); 3725 char b3[bufSize(y3s)]; 3726 bufString(y3s, b3); 3727 gtk_clist_set_column_title(b1, b2, b3); 3728 return Nil; 3729 } 3730 3731 any cfun_gtk_clist_column_titles_show(any ex) { 3732 any x = ex, y; 3733 x = cdr(x); 3734 y = EVAL(car(x)); 3735 NeedNum(ex, y); 3736 void* b1 = (void*) unBox(y); 3737 gtk_clist_column_titles_show(b1); 3738 return Nil; 3739 } 3740 3741 any cfun_gtk_clist_append(any ex) { 3742 any x = ex, y; 3743 x = cdr(x); 3744 y = EVAL(car(x)); 3745 NeedNum(ex, y); 3746 void* b1 = (void*) unBox(y); 3747 x = cdr(x); 3748 y = EVAL(car(x)); 3749 NeedNum(ex, y); 3750 void* b2 = (void*) unBox(y); 3751 long z = gtk_clist_append(b1, b2); 3752 return box(z); 3753 } 3754 3755 any cfun_gtk_clist_set_text(any ex) { 3756 any x = ex, y; 3757 x = cdr(x); 3758 y = EVAL(car(x)); 3759 NeedNum(ex, y); 3760 void* b1 = (void*) unBox(y); 3761 x = cdr(x); 3762 y = EVAL(car(x)); 3763 NeedNum(ex, y); 3764 long b2 = (long) unBox(y); 3765 x = cdr(x); 3766 y = EVAL(car(x)); 3767 NeedNum(ex, y); 3768 long b3 = (long) unBox(y); 3769 x = cdr(x); 3770 y = EVAL(car(x)); 3771 any y4s = xSym(y); 3772 char b4[bufSize(y4s)]; 3773 bufString(y4s, b4); 3774 gtk_clist_set_text(b1, b2, b3, b4); 3775 return Nil; 3776 } 3777 3778 any cfun_gtk_fixed_new(any ex __attribute__((unused))) { 3779 void* z = gtk_fixed_new(); 3780 return box(z); 3781 } 3782 3783 any cfun_gtk_fixed_put(any ex) { 3784 any x = ex, y; 3785 x = cdr(x); 3786 y = EVAL(car(x)); 3787 NeedNum(ex, y); 3788 void* b1 = (void*) unBox(y); 3789 x = cdr(x); 3790 y = EVAL(car(x)); 3791 NeedNum(ex, y); 3792 void* b2 = (void*) unBox(y); 3793 x = cdr(x); 3794 y = EVAL(car(x)); 3795 NeedNum(ex, y); 3796 long b3 = (long) unBox(y); 3797 x = cdr(x); 3798 y = EVAL(car(x)); 3799 NeedNum(ex, y); 3800 long b4 = (long) unBox(y); 3801 gtk_fixed_put(b1, b2, b3, b4); 3802 return Nil; 3803 } 3804 3805 any cfun_gtk_fixed_move(any ex) { 3806 any x = ex, y; 3807 x = cdr(x); 3808 y = EVAL(car(x)); 3809 NeedNum(ex, y); 3810 void* b1 = (void*) unBox(y); 3811 x = cdr(x); 3812 y = EVAL(car(x)); 3813 NeedNum(ex, y); 3814 void* b2 = (void*) unBox(y); 3815 x = cdr(x); 3816 y = EVAL(car(x)); 3817 NeedNum(ex, y); 3818 long b3 = (long) unBox(y); 3819 x = cdr(x); 3820 y = EVAL(car(x)); 3821 NeedNum(ex, y); 3822 long b4 = (long) unBox(y); 3823 gtk_fixed_move(b1, b2, b3, b4); 3824 return Nil; 3825 } 3826 3827 any cfun_gtk_list_store_new(any ex) { 3828 any x = ex, y; 3829 x = cdr(x); 3830 y = EVAL(car(x)); 3831 NeedNum(ex, y); 3832 long b1 = (long) unBox(y); 3833 x = cdr(x); 3834 y = EVAL(car(x)); 3835 NeedNum(ex, y); 3836 long b2 = (long) unBox(y); 3837 void* z = gtk_list_store_new(b1, b2); 3838 return box(z); 3839 } 3840 3841 any cfun_gtk_list_store_append(any ex) { 3842 any x = ex, y; 3843 x = cdr(x); 3844 y = EVAL(car(x)); 3845 NeedNum(ex, y); 3846 void* b1 = (void*) unBox(y); 3847 x = cdr(x); 3848 y = EVAL(car(x)); 3849 NeedNum(ex, y); 3850 void* b2 = (void*) unBox(y); 3851 gtk_list_store_append(b1, b2); 3852 return Nil; 3853 } 3854 3855 any cfun_gtk_list_store_set(any ex) { 3856 any x = ex, y; 3857 x = cdr(x); 3858 y = EVAL(car(x)); 3859 NeedNum(ex, y); 3860 void* b1 = (void*) unBox(y); 3861 x = cdr(x); 3862 y = EVAL(car(x)); 3863 NeedNum(ex, y); 3864 void* b2 = (void*) unBox(y); 3865 x = cdr(x); 3866 y = EVAL(car(x)); 3867 NeedNum(ex, y); 3868 long b3 = (long) unBox(y); 3869 x = cdr(x); 3870 y = EVAL(car(x)); 3871 any y4s = xSym(y); 3872 char b4[bufSize(y4s)]; 3873 bufString(y4s, b4); 3874 x = cdr(x); 3875 y = EVAL(car(x)); 3876 NeedNum(ex, y); 3877 long b5 = (long) unBox(y); 3878 gtk_list_store_set(b1, b2, b3, b4, b5); 3879 return Nil; 3880 } 3881 3882 any cfun_gtk_list_store_set_value(any ex) { 3883 any x = ex, y; 3884 x = cdr(x); 3885 y = EVAL(car(x)); 3886 NeedNum(ex, y); 3887 void* b1 = (void*) unBox(y); 3888 x = cdr(x); 3889 y = EVAL(car(x)); 3890 NeedNum(ex, y); 3891 void* b2 = (void*) unBox(y); 3892 x = cdr(x); 3893 y = EVAL(car(x)); 3894 NeedNum(ex, y); 3895 long b3 = (long) unBox(y); 3896 x = cdr(x); 3897 y = EVAL(car(x)); 3898 any y4s = xSym(y); 3899 char b4[bufSize(y4s)]; 3900 bufString(y4s, b4); 3901 gtk_list_store_set_value(b1, b2, b3, b4); 3902 return Nil; 3903 } 3904 3905 any cfun_gtk_list_store_clear(any ex) { 3906 any x = ex, y; 3907 x = cdr(x); 3908 y = EVAL(car(x)); 3909 NeedNum(ex, y); 3910 void* b1 = (void*) unBox(y); 3911 gtk_list_store_clear(b1); 3912 return Nil; 3913 } 3914 3915 any cfun_gtk_list_store_remove(any ex) { 3916 any x = ex, y; 3917 x = cdr(x); 3918 y = EVAL(car(x)); 3919 NeedNum(ex, y); 3920 void* b1 = (void*) unBox(y); 3921 x = cdr(x); 3922 y = EVAL(car(x)); 3923 NeedNum(ex, y); 3924 void* b2 = (void*) unBox(y); 3925 int z = gtk_list_store_remove(b1, b2); 3926 return z == 0 ? T : Nil; 3927 } 3928 3929 any cfun_gtk_cell_renderer_text_new(any ex __attribute__((unused))) { 3930 void* z = gtk_cell_renderer_text_new(); 3931 return box(z); 3932 } 3933 3934 any cfun_gtk_tree_view_new_with_model(any ex) { 3935 any x = ex, y; 3936 x = cdr(x); 3937 y = EVAL(car(x)); 3938 NeedNum(ex, y); 3939 void* b1 = (void*) unBox(y); 3940 void* z = gtk_tree_view_new_with_model(b1); 3941 return box(z); 3942 } 3943 3944 any cfun_gtk_tree_view_column_new(any ex __attribute__((unused))) { 3945 void* z = gtk_tree_view_column_new(); 3946 return box(z); 3947 } 3948 3949 any cfun_gtk_tree_view_column_new_with_attributes(any ex) { 3950 any x = ex, y; 3951 x = cdr(x); 3952 y = EVAL(car(x)); 3953 any y1s = xSym(y); 3954 char b1[bufSize(y1s)]; 3955 bufString(y1s, b1); 3956 x = cdr(x); 3957 y = EVAL(car(x)); 3958 NeedNum(ex, y); 3959 void* b2 = (void*) unBox(y); 3960 x = cdr(x); 3961 y = EVAL(car(x)); 3962 any y3s = xSym(y); 3963 char b3[bufSize(y3s)]; 3964 bufString(y3s, b3); 3965 x = cdr(x); 3966 y = EVAL(car(x)); 3967 NeedNum(ex, y); 3968 long b4 = (long) unBox(y); 3969 x = cdr(x); 3970 y = EVAL(car(x)); 3971 void* b5 = (void*) 0; 3972 void* z = gtk_tree_view_column_new_with_attributes(b1, b2, b3, b4, b5); 3973 return box(z); 3974 } 3975 3976 any cfun_gtk_tree_view_column_pack_start(any ex) { 3977 any x = ex, y; 3978 x = cdr(x); 3979 y = EVAL(car(x)); 3980 NeedNum(ex, y); 3981 void* b1 = (void*) unBox(y); 3982 x = cdr(x); 3983 y = EVAL(car(x)); 3984 NeedNum(ex, y); 3985 void* b2 = (void*) unBox(y); 3986 x = cdr(x); 3987 y = EVAL(car(x)); 3988 int b3 = y == Nil ? 0 : 1; 3989 gtk_tree_view_column_pack_start(b1, b2, b3); 3990 return Nil; 3991 } 3992 3993 any cfun_gtk_tree_view_append_column(any ex) { 3994 any x = ex, y; 3995 x = cdr(x); 3996 y = EVAL(car(x)); 3997 NeedNum(ex, y); 3998 void* b1 = (void*) unBox(y); 3999 x = cdr(x); 4000 y = EVAL(car(x)); 4001 NeedNum(ex, y); 4002 void* b2 = (void*) unBox(y); 4003 gtk_tree_view_append_column(b1, b2); 4004 return Nil; 4005 } 4006 4007 any cfun_gtk_tree_view_set_headers_visible(any ex) { 4008 any x = ex, y; 4009 x = cdr(x); 4010 y = EVAL(car(x)); 4011 NeedNum(ex, y); 4012 void* b1 = (void*) unBox(y); 4013 x = cdr(x); 4014 y = EVAL(car(x)); 4015 int b2 = y == Nil ? 0 : 1; 4016 gtk_tree_view_set_headers_visible(b1, b2); 4017 return Nil; 4018 } 4019 4020 any cfun_gtk_tree_view_set_headers_clickable(any ex) { 4021 any x = ex, y; 4022 x = cdr(x); 4023 y = EVAL(car(x)); 4024 NeedNum(ex, y); 4025 void* b1 = (void*) unBox(y); 4026 x = cdr(x); 4027 y = EVAL(car(x)); 4028 int b2 = y == Nil ? 0 : 1; 4029 gtk_tree_view_set_headers_clickable(b1, b2); 4030 return Nil; 4031 } 4032 4033 any cfun_gtk_tree_view_get_selection(any ex) { 4034 any x = ex, y; 4035 x = cdr(x); 4036 y = EVAL(car(x)); 4037 NeedNum(ex, y); 4038 void* b1 = (void*) unBox(y); 4039 void* z = gtk_tree_view_get_selection(b1); 4040 return box(z); 4041 } 4042 4043 any cfun_gtk_tree_view_column_set_resizable(any ex) { 4044 any x = ex, y; 4045 x = cdr(x); 4046 y = EVAL(car(x)); 4047 NeedNum(ex, y); 4048 void* b1 = (void*) unBox(y); 4049 x = cdr(x); 4050 y = EVAL(car(x)); 4051 int b2 = y == Nil ? 0 : 1; 4052 gtk_tree_view_column_set_resizable(b1, b2); 4053 return Nil; 4054 } 4055 4056 any cfun_gtk_tree_view_column_set_clickable(any ex) { 4057 any x = ex, y; 4058 x = cdr(x); 4059 y = EVAL(car(x)); 4060 NeedNum(ex, y); 4061 void* b1 = (void*) unBox(y); 4062 x = cdr(x); 4063 y = EVAL(car(x)); 4064 int b2 = y == Nil ? 0 : 1; 4065 gtk_tree_view_column_set_clickable(b1, b2); 4066 return Nil; 4067 } 4068 4069 any cfun_gtk_tree_selection_get_selected(any ex) { 4070 any x = ex, y; 4071 x = cdr(x); 4072 y = EVAL(car(x)); 4073 NeedNum(ex, y); 4074 void* b1 = (void*) unBox(y); 4075 x = cdr(x); 4076 y = EVAL(car(x)); 4077 void* b2 = (void*) 0; 4078 x = cdr(x); 4079 y = EVAL(car(x)); 4080 NeedNum(ex, y); 4081 void* b3 = (void*) unBox(y); 4082 int z = gtk_tree_selection_get_selected(b1, b2, b3); 4083 return z == 0 ? T : Nil; 4084 } 4085 4086 any cfun_gtk_tree_selection_select_iter(any ex) { 4087 any x = ex, y; 4088 x = cdr(x); 4089 y = EVAL(car(x)); 4090 NeedNum(ex, y); 4091 void* b1 = (void*) unBox(y); 4092 x = cdr(x); 4093 y = EVAL(car(x)); 4094 NeedNum(ex, y); 4095 void* b2 = (void*) unBox(y); 4096 gtk_tree_selection_select_iter(b1, b2); 4097 return Nil; 4098 } 4099 4100 any cfun_gtk_tree_selection_select_path(any ex) { 4101 any x = ex, y; 4102 x = cdr(x); 4103 y = EVAL(car(x)); 4104 NeedNum(ex, y); 4105 void* b1 = (void*) unBox(y); 4106 x = cdr(x); 4107 y = EVAL(car(x)); 4108 NeedNum(ex, y); 4109 void* b2 = (void*) unBox(y); 4110 gtk_tree_selection_select_path(b1, b2); 4111 return Nil; 4112 } 4113 4114 any cfun_gtk_tree_model_get(any ex) { 4115 any x = ex, y; 4116 x = cdr(x); 4117 y = EVAL(car(x)); 4118 NeedNum(ex, y); 4119 void* b1 = (void*) unBox(y); 4120 x = cdr(x); 4121 y = EVAL(car(x)); 4122 NeedNum(ex, y); 4123 void* b2 = (void*) unBox(y); 4124 x = cdr(x); 4125 y = EVAL(car(x)); 4126 NeedNum(ex, y); 4127 long b3 = (long) unBox(y); 4128 x = cdr(x); 4129 y = EVAL(car(x)); 4130 any y4s = xSym(y); 4131 char b4[bufSize(y4s)]; 4132 bufString(y4s, b4); 4133 x = cdr(x); 4134 y = EVAL(car(x)); 4135 NeedNum(ex, y); 4136 long b5 = (long) unBox(y); 4137 gtk_tree_model_get(b1, b2, b3, b4, b5); 4138 return Nil; 4139 } 4140 4141 any cfun_gtk_tree_model_get_string_from_iter(any ex) { 4142 any x = ex, y; 4143 x = cdr(x); 4144 y = EVAL(car(x)); 4145 NeedNum(ex, y); 4146 void* b1 = (void*) unBox(y); 4147 x = cdr(x); 4148 y = EVAL(car(x)); 4149 NeedNum(ex, y); 4150 void* b2 = (void*) unBox(y); 4151 char* z = gtk_tree_model_get_string_from_iter(b1, b2); 4152 return mkStr(z); 4153 } 4154 4155 any cfun_gtk_tree_path_new_from_string(any ex) { 4156 any x = ex, y; 4157 x = cdr(x); 4158 y = EVAL(car(x)); 4159 any y1s = xSym(y); 4160 char b1[bufSize(y1s)]; 4161 bufString(y1s, b1); 4162 void* z = gtk_tree_path_new_from_string(b1); 4163 return box(z); 4164 } 4165 4166 any cfun_gtk_tree_path_free(any ex) { 4167 any x = ex, y; 4168 x = cdr(x); 4169 y = EVAL(car(x)); 4170 NeedNum(ex, y); 4171 void* b1 = (void*) unBox(y); 4172 gtk_tree_path_free(b1); 4173 return Nil; 4174 } 4175 4176 any cfun_gtk_tree_sortable_set_sort_column_id(any ex) { 4177 any x = ex, y; 4178 x = cdr(x); 4179 y = EVAL(car(x)); 4180 NeedNum(ex, y); 4181 void* b1 = (void*) unBox(y); 4182 x = cdr(x); 4183 y = EVAL(car(x)); 4184 NeedNum(ex, y); 4185 long b2 = (long) unBox(y); 4186 x = cdr(x); 4187 y = EVAL(car(x)); 4188 NeedNum(ex, y); 4189 long b3 = (long) unBox(y); 4190 gtk_tree_sortable_set_sort_column_id(b1, b2, b3); 4191 return Nil; 4192 } 4193 4194 any cfun_gtk_init(any ex) { 4195 any x = ex, y; 4196 x = cdr(x); 4197 y = EVAL(car(x)); 4198 void* b1 = (void*) 0; 4199 x = cdr(x); 4200 y = EVAL(car(x)); 4201 void* b2 = (void*) 0; 4202 gtk_init(b1, b2); 4203 return Nil; 4204 } 4205 4206 any cfun_gtk_widget_show(any ex) { 4207 any x = ex, y; 4208 x = cdr(x); 4209 y = EVAL(car(x)); 4210 NeedNum(ex, y); 4211 void* b1 = (void*) unBox(y); 4212 gtk_widget_show(b1); 4213 return Nil; 4214 } 4215 4216 any cfun_gtk_widget_show_all(any ex) { 4217 any x = ex, y; 4218 x = cdr(x); 4219 y = EVAL(car(x)); 4220 NeedNum(ex, y); 4221 void* b1 = (void*) unBox(y); 4222 gtk_widget_show_all(b1); 4223 return Nil; 4224 } 4225 4226 any cfun_gtk_widget_realize(any ex) { 4227 any x = ex, y; 4228 x = cdr(x); 4229 y = EVAL(car(x)); 4230 NeedNum(ex, y); 4231 void* b1 = (void*) unBox(y); 4232 gtk_widget_realize(b1); 4233 return Nil; 4234 } 4235 4236 any cfun_gtk_widget_unrealize(any ex) { 4237 any x = ex, y; 4238 x = cdr(x); 4239 y = EVAL(car(x)); 4240 NeedNum(ex, y); 4241 void* b1 = (void*) unBox(y); 4242 gtk_widget_unrealize(b1); 4243 return Nil; 4244 } 4245 4246 any cfun_gtk_widget_hide(any ex) { 4247 any x = ex, y; 4248 x = cdr(x); 4249 y = EVAL(car(x)); 4250 NeedNum(ex, y); 4251 void* b1 = (void*) unBox(y); 4252 gtk_widget_hide(b1); 4253 return Nil; 4254 } 4255 4256 any cfun_gtk_widget_destroy(any ex) { 4257 any x = ex, y; 4258 x = cdr(x); 4259 y = EVAL(car(x)); 4260 NeedNum(ex, y); 4261 void* b1 = (void*) unBox(y); 4262 gtk_widget_destroy(b1); 4263 return Nil; 4264 } 4265 4266 any cfun_gtk_widget_grab_focus(any ex) { 4267 any x = ex, y; 4268 x = cdr(x); 4269 y = EVAL(car(x)); 4270 NeedNum(ex, y); 4271 void* b1 = (void*) unBox(y); 4272 gtk_widget_grab_focus(b1); 4273 return Nil; 4274 } 4275 4276 any cfun_gtk_widget_set_size_request(any ex) { 4277 any x = ex, y; 4278 x = cdr(x); 4279 y = EVAL(car(x)); 4280 NeedNum(ex, y); 4281 void* b1 = (void*) unBox(y); 4282 x = cdr(x); 4283 y = EVAL(car(x)); 4284 NeedNum(ex, y); 4285 long b2 = (long) unBox(y); 4286 x = cdr(x); 4287 y = EVAL(car(x)); 4288 NeedNum(ex, y); 4289 long b3 = (long) unBox(y); 4290 gtk_widget_set_size_request(b1, b2, b3); 4291 return Nil; 4292 } 4293 4294 any cfun_gtk_widget_size_request(any ex) { 4295 any x = ex, y; 4296 x = cdr(x); 4297 y = EVAL(car(x)); 4298 NeedNum(ex, y); 4299 void* b1 = (void*) unBox(y); 4300 x = cdr(x); 4301 y = EVAL(car(x)); 4302 NeedNum(ex, y); 4303 void* b2 = (void*) unBox(y); 4304 gtk_widget_size_request(b1, b2); 4305 return Nil; 4306 } 4307 4308 any cfun_gtk_widget_set_usize(any ex) { 4309 any x = ex, y; 4310 x = cdr(x); 4311 y = EVAL(car(x)); 4312 NeedNum(ex, y); 4313 void* b1 = (void*) unBox(y); 4314 x = cdr(x); 4315 y = EVAL(car(x)); 4316 NeedNum(ex, y); 4317 long b2 = (long) unBox(y); 4318 x = cdr(x); 4319 y = EVAL(car(x)); 4320 NeedNum(ex, y); 4321 long b3 = (long) unBox(y); 4322 gtk_widget_set_usize(b1, b2, b3); 4323 return Nil; 4324 } 4325 4326 any cfun_gtk_widget_modify_base(any ex) { 4327 any x = ex, y; 4328 x = cdr(x); 4329 y = EVAL(car(x)); 4330 NeedNum(ex, y); 4331 void* b1 = (void*) unBox(y); 4332 x = cdr(x); 4333 y = EVAL(car(x)); 4334 NeedNum(ex, y); 4335 long b2 = (long) unBox(y); 4336 x = cdr(x); 4337 y = EVAL(car(x)); 4338 NeedNum(ex, y); 4339 long b3 = (long) unBox(y); 4340 gtk_widget_modify_base(b1, b2, b3); 4341 return Nil; 4342 } 4343 4344 any cfun_gtk_widget_modify_bg(any ex) { 4345 any x = ex, y; 4346 x = cdr(x); 4347 y = EVAL(car(x)); 4348 NeedNum(ex, y); 4349 void* b1 = (void*) unBox(y); 4350 x = cdr(x); 4351 y = EVAL(car(x)); 4352 NeedNum(ex, y); 4353 long b2 = (long) unBox(y); 4354 x = cdr(x); 4355 y = EVAL(car(x)); 4356 NeedNum(ex, y); 4357 long b3 = (long) unBox(y); 4358 gtk_widget_modify_bg(b1, b2, b3); 4359 return Nil; 4360 } 4361 4362 any cfun_gtk_widget_set_sensitive(any ex) { 4363 any x = ex, y; 4364 x = cdr(x); 4365 y = EVAL(car(x)); 4366 NeedNum(ex, y); 4367 void* b1 = (void*) unBox(y); 4368 x = cdr(x); 4369 y = EVAL(car(x)); 4370 int b2 = y == Nil ? 0 : 1; 4371 gtk_widget_set_sensitive(b1, b2); 4372 return Nil; 4373 } 4374 4375 any cfun_gtk_settings_get_default(any ex __attribute__((unused))) { 4376 void* z = gtk_settings_get_default(); 4377 return box(z); 4378 } 4379 4380 any cfun_gtk_widget_get_parent(any ex) { 4381 any x = ex, y; 4382 x = cdr(x); 4383 y = EVAL(car(x)); 4384 NeedNum(ex, y); 4385 void* b1 = (void*) unBox(y); 4386 void* z = gtk_widget_get_parent(b1); 4387 return box(z); 4388 } 4389 4390 any cfun_gtk_misc_set_alignment(any ex) { 4391 any x = ex, y; 4392 x = cdr(x); 4393 y = EVAL(car(x)); 4394 NeedNum(ex, y); 4395 void* b1 = (void*) unBox(y); 4396 x = cdr(x); 4397 y = EVAL(car(x)); 4398 NeedNum(ex, y); 4399 float b2 = (float) unBox(y) / 10000; 4400 x = cdr(x); 4401 y = EVAL(car(x)); 4402 NeedNum(ex, y); 4403 float b3 = (float) unBox(y) / 10000; 4404 gtk_misc_set_alignment(b1, b2, b3); 4405 return Nil; 4406 } 4407 4408 any cfun_gtk_main(any ex __attribute__((unused))) { 4409 gtk_main(); 4410 return Nil; 4411 } 4412 4413 any cfun_gtk_main_iteration(any ex __attribute__((unused))) { 4414 int z = gtk_main_iteration(); 4415 return z == 0 ? T : Nil; 4416 } 4417 4418 any cfun_gtk_main_iteration_do(any ex) { 4419 any x = ex, y; 4420 x = cdr(x); 4421 y = EVAL(car(x)); 4422 int b1 = y == Nil ? 0 : 1; 4423 int z = gtk_main_iteration_do(b1); 4424 return z == 0 ? T : Nil; 4425 } 4426 4427 any cfun_gtk_events_pending(any ex __attribute__((unused))) { 4428 int z = gtk_events_pending(); 4429 return z == 0 ? T : Nil; 4430 } 4431 4432 any cfun_gtk_exit(any ex) { 4433 any x = ex, y; 4434 x = cdr(x); 4435 y = EVAL(car(x)); 4436 NeedNum(ex, y); 4437 long b1 = (long) unBox(y); 4438 gtk_exit(b1); 4439 return Nil; 4440 } 4441 4442 any cfun_gtk_main_quit(any ex __attribute__((unused))) { 4443 gtk_main_quit(); 4444 return Nil; 4445 } 4446 4447 any cfun_gtk_rc_parse(any ex) { 4448 any x = ex, y; 4449 x = cdr(x); 4450 y = EVAL(car(x)); 4451 any y1s = xSym(y); 4452 char b1[bufSize(y1s)]; 4453 bufString(y1s, b1); 4454 gtk_rc_parse(b1); 4455 return Nil; 4456 } 4457 4458 any cfun_gtk_rc_parse_string(any ex) { 4459 any x = ex, y; 4460 x = cdr(x); 4461 y = EVAL(car(x)); 4462 any y1s = xSym(y); 4463 char b1[bufSize(y1s)]; 4464 bufString(y1s, b1); 4465 gtk_rc_parse_string(b1); 4466 return Nil; 4467 } 4468 4469 any cfun_gtk_rc_reparse_all(any ex __attribute__((unused))) { 4470 int z = gtk_rc_reparse_all(); 4471 return z == 0 ? T : Nil; 4472 } 4473 4474 any cfun_gtk_rc_reset_styles(any ex) { 4475 any x = ex, y; 4476 x = cdr(x); 4477 y = EVAL(car(x)); 4478 NeedNum(ex, y); 4479 void* b1 = (void*) unBox(y); 4480 gtk_rc_reset_styles(b1); 4481 return Nil; 4482 } 4483 4484 any cfun_gtk_rc_add_default_file(any ex) { 4485 any x = ex, y; 4486 x = cdr(x); 4487 y = EVAL(car(x)); 4488 any y1s = xSym(y); 4489 char b1[bufSize(y1s)]; 4490 bufString(y1s, b1); 4491 gtk_rc_add_default_file(b1); 4492 return Nil; 4493 } 4494 4495 any cfun_gtk_widget_set_name(any ex) { 4496 any x = ex, y; 4497 x = cdr(x); 4498 y = EVAL(car(x)); 4499 NeedNum(ex, y); 4500 void* b1 = (void*) unBox(y); 4501 x = cdr(x); 4502 y = EVAL(car(x)); 4503 any y2s = xSym(y); 4504 char b2[bufSize(y2s)]; 4505 bufString(y2s, b2); 4506 gtk_widget_set_name(b1, b2); 4507 return Nil; 4508 } 4509 4510 any cfun_gtk_check_version(any ex) { 4511 any x = ex, y; 4512 x = cdr(x); 4513 y = EVAL(car(x)); 4514 NeedNum(ex, y); 4515 long b1 = (long) unBox(y); 4516 x = cdr(x); 4517 y = EVAL(car(x)); 4518 NeedNum(ex, y); 4519 long b2 = (long) unBox(y); 4520 x = cdr(x); 4521 y = EVAL(car(x)); 4522 NeedNum(ex, y); 4523 long b3 = (long) unBox(y); 4524 char* z = gtk_check_version(b1, b2, b3); 4525 return mkStr(z); 4526 } 4527 4528 any cfun_gtk_drag_source_set(any ex) { 4529 any x = ex, y; 4530 x = cdr(x); 4531 y = EVAL(car(x)); 4532 NeedNum(ex, y); 4533 void* b1 = (void*) unBox(y); 4534 x = cdr(x); 4535 y = EVAL(car(x)); 4536 NeedNum(ex, y); 4537 long b2 = (long) unBox(y); 4538 x = cdr(x); 4539 y = EVAL(car(x)); 4540 NeedNum(ex, y); 4541 long b3 = (long) unBox(y); 4542 x = cdr(x); 4543 y = EVAL(car(x)); 4544 NeedNum(ex, y); 4545 long b4 = (long) unBox(y); 4546 x = cdr(x); 4547 y = EVAL(car(x)); 4548 NeedNum(ex, y); 4549 long b5 = (long) unBox(y); 4550 gtk_drag_source_set(b1, b2, b3, b4, b5); 4551 return Nil; 4552 } 4553 4554 any cfun_gtk_drag_dest_set(any ex) { 4555 any x = ex, y; 4556 x = cdr(x); 4557 y = EVAL(car(x)); 4558 NeedNum(ex, y); 4559 void* b1 = (void*) unBox(y); 4560 x = cdr(x); 4561 y = EVAL(car(x)); 4562 NeedNum(ex, y); 4563 long b2 = (long) unBox(y); 4564 x = cdr(x); 4565 y = EVAL(car(x)); 4566 NeedNum(ex, y); 4567 long b3 = (long) unBox(y); 4568 x = cdr(x); 4569 y = EVAL(car(x)); 4570 NeedNum(ex, y); 4571 long b4 = (long) unBox(y); 4572 x = cdr(x); 4573 y = EVAL(car(x)); 4574 NeedNum(ex, y); 4575 long b5 = (long) unBox(y); 4576 gtk_drag_dest_set(b1, b2, b3, b4, b5); 4577 return Nil; 4578 } 4579 4580 any cfun_gtk_drag_finish(any ex) { 4581 any x = ex, y; 4582 x = cdr(x); 4583 y = EVAL(car(x)); 4584 NeedNum(ex, y); 4585 void* b1 = (void*) unBox(y); 4586 x = cdr(x); 4587 y = EVAL(car(x)); 4588 int b2 = y == Nil ? 0 : 1; 4589 x = cdr(x); 4590 y = EVAL(car(x)); 4591 int b3 = y == Nil ? 0 : 1; 4592 x = cdr(x); 4593 y = EVAL(car(x)); 4594 NeedNum(ex, y); 4595 long b4 = (long) unBox(y); 4596 gtk_drag_finish(b1, b2, b3, b4); 4597 return Nil; 4598 } 4599 4600 any cfun_gtk_get_current_event_time(any ex __attribute__((unused))) { 4601 long z = gtk_get_current_event_time(); 4602 return box(z); 4603 } 4604 4605 any cfun_gtk_widget_get_size_request(any ex) { 4606 any x = ex, y; 4607 x = cdr(x); 4608 y = EVAL(car(x)); 4609 NeedNum(ex, y); 4610 void* b1 = (void*) unBox(y); 4611 x = cdr(x); 4612 y = EVAL(car(x)); 4613 NeedNum(ex, y); 4614 void* b2 = (void*) unBox(y); 4615 x = cdr(x); 4616 y = EVAL(car(x)); 4617 NeedNum(ex, y); 4618 void* b3 = (void*) unBox(y); 4619 gtk_widget_get_size_request(b1, b2, b3); 4620 return Nil; 4621 } 4622 4623 any cfun_gtk_signal_emit_by_name(any ex) { 4624 any x = ex, y; 4625 x = cdr(x); 4626 y = EVAL(car(x)); 4627 NeedNum(ex, y); 4628 void* b1 = (void*) unBox(y); 4629 x = cdr(x); 4630 y = EVAL(car(x)); 4631 any y2s = xSym(y); 4632 char b2[bufSize(y2s)]; 4633 bufString(y2s, b2); 4634 gtk_signal_emit_by_name(b1, b2); 4635 return Nil; 4636 } 4637 4638 any cfun_gtk_invisible_new(any ex __attribute__((unused))) { 4639 void* z = gtk_invisible_new(); 4640 return box(z); 4641 } 4642 4643 any cfun_gdk_pixbuf_new_from_file(any ex) { 4644 any x = ex, y; 4645 x = cdr(x); 4646 y = EVAL(car(x)); 4647 any y1s = xSym(y); 4648 char b1[bufSize(y1s)]; 4649 bufString(y1s, b1); 4650 x = cdr(x); 4651 y = EVAL(car(x)); 4652 void* b2 = (void*) 0; 4653 void* z = gdk_pixbuf_new_from_file(b1, b2); 4654 return box(z); 4655 } 4656 4657 any cfun_gdk_pixbuf_new_from_file_at_size(any ex) { 4658 any x = ex, y; 4659 x = cdr(x); 4660 y = EVAL(car(x)); 4661 any y1s = xSym(y); 4662 char b1[bufSize(y1s)]; 4663 bufString(y1s, b1); 4664 x = cdr(x); 4665 y = EVAL(car(x)); 4666 NeedNum(ex, y); 4667 long b2 = (long) unBox(y); 4668 x = cdr(x); 4669 y = EVAL(car(x)); 4670 NeedNum(ex, y); 4671 long b3 = (long) unBox(y); 4672 x = cdr(x); 4673 y = EVAL(car(x)); 4674 void* b4 = (void*) 0; 4675 void* z = gdk_pixbuf_new_from_file_at_size(b1, b2, b3, b4); 4676 return box(z); 4677 } 4678 4679 any cfun_gdk_pixbuf_rotate_simple(any ex) { 4680 any x = ex, y; 4681 x = cdr(x); 4682 y = EVAL(car(x)); 4683 NeedNum(ex, y); 4684 void* b1 = (void*) unBox(y); 4685 x = cdr(x); 4686 y = EVAL(car(x)); 4687 NeedNum(ex, y); 4688 long b2 = (long) unBox(y); 4689 void* z = gdk_pixbuf_rotate_simple(b1, b2); 4690 return box(z); 4691 } 4692 4693 any cfun_g_object_unref(any ex) { 4694 any x = ex, y; 4695 x = cdr(x); 4696 y = EVAL(car(x)); 4697 NeedNum(ex, y); 4698 void* b1 = (void*) unBox(y); 4699 g_object_unref(b1); 4700 return Nil; 4701 } 4702 4703 any cfun_g_locale_to_utf8(any ex) { 4704 any x = ex, y; 4705 x = cdr(x); 4706 y = EVAL(car(x)); 4707 any y1s = xSym(y); 4708 char b1[bufSize(y1s)]; 4709 bufString(y1s, b1); 4710 x = cdr(x); 4711 y = EVAL(car(x)); 4712 NeedNum(ex, y); 4713 long b2 = (long) unBox(y); 4714 x = cdr(x); 4715 y = EVAL(car(x)); 4716 void* b3 = (void*) 0; 4717 x = cdr(x); 4718 y = EVAL(car(x)); 4719 void* b4 = (void*) 0; 4720 x = cdr(x); 4721 y = EVAL(car(x)); 4722 void* b5 = (void*) 0; 4723 char* z = g_locale_to_utf8(b1, b2, b3, b4, b5); 4724 return mkStr(z); 4725 } 4726 4727 any cfun_g_locale_from_utf8(any ex) { 4728 any x = ex, y; 4729 x = cdr(x); 4730 y = EVAL(car(x)); 4731 any y1s = xSym(y); 4732 char b1[bufSize(y1s)]; 4733 bufString(y1s, b1); 4734 x = cdr(x); 4735 y = EVAL(car(x)); 4736 NeedNum(ex, y); 4737 long b2 = (long) unBox(y); 4738 x = cdr(x); 4739 y = EVAL(car(x)); 4740 void* b3 = (void*) 0; 4741 x = cdr(x); 4742 y = EVAL(car(x)); 4743 void* b4 = (void*) 0; 4744 x = cdr(x); 4745 y = EVAL(car(x)); 4746 void* b5 = (void*) 0; 4747 char* z = g_locale_from_utf8(b1, b2, b3, b4, b5); 4748 return mkStr(z); 4749 } 4750 4751 any cfun_g_free(any ex) { 4752 any x = ex, y; 4753 x = cdr(x); 4754 y = EVAL(car(x)); 4755 NeedNum(ex, y); 4756 void* b1 = (void*) unBox(y); 4757 g_free(b1); 4758 return Nil; 4759 } 4760 4761 any cfun_glade_init(any ex __attribute__((unused))) { 4762 glade_init(); 4763 return Nil; 4764 } 4765 4766 any cfun_glade_xml_new(any ex) { 4767 any x = ex, y; 4768 x = cdr(x); 4769 y = EVAL(car(x)); 4770 any y1s = xSym(y); 4771 char b1[bufSize(y1s)]; 4772 bufString(y1s, b1); 4773 x = cdr(x); 4774 y = EVAL(car(x)); 4775 void* b2 = (void*) 0; 4776 x = cdr(x); 4777 y = EVAL(car(x)); 4778 void* b3 = (void*) 0; 4779 void* z = glade_xml_new(b1, b2, b3); 4780 return box(z); 4781 } 4782 4783 any cfun_glade_xml_get_widget(any ex) { 4784 any x = ex, y; 4785 x = cdr(x); 4786 y = EVAL(car(x)); 4787 NeedNum(ex, y); 4788 void* b1 = (void*) unBox(y); 4789 x = cdr(x); 4790 y = EVAL(car(x)); 4791 any y2s = xSym(y); 4792 char b2[bufSize(y2s)]; 4793 bufString(y2s, b2); 4794 void* z = glade_xml_get_widget(b1, b2); 4795 return box(z); 4796 } 4797 4798 static any lcb_handler; 4799 4800 static any lfun_handler(char* handlerName, void* object, char* signalName, char* signalData, void* connectObject, int after, void* userData) { 4801 cell c[7]; 4802 Push(c[0], mkStr(handlerName)); 4803 Push(c[1], box(object)); 4804 Push(c[2], mkStr(signalName)); 4805 Push(c[3], mkStr(signalData)); 4806 Push(c[4], box(connectObject)); 4807 Push(c[5], after == 0 ? T : Nil); 4808 Push(c[6], box(userData)); 4809 apply(NULL, lcb_handler, NO, 7, c); 4810 drop(c[0]); 4811 return Nil; 4812 } 4813 4814 any cfun_glade_xml_signal_autoconnect_full(any ex) { 4815 any x = ex, y; 4816 x = cdr(x); 4817 y = EVAL(car(x)); 4818 NeedNum(ex, y); 4819 void* b1 = (void*) unBox(y); 4820 x = cdr(x); 4821 y = EVAL(car(x)); 4822 lcb_handler = y; 4823 void* b2 = (void*) lfun_handler; 4824 x = cdr(x); 4825 y = EVAL(car(x)); 4826 NeedNum(ex, y); 4827 void* b3 = (void*) unBox(y); 4828 glade_xml_signal_autoconnect_full(b1, b2, b3); 4829 return Nil; 4830 } 4831 4832 any cfun_glade_get_widget_name(any ex) { 4833 any x = ex, y; 4834 x = cdr(x); 4835 y = EVAL(car(x)); 4836 NeedNum(ex, y); 4837 void* b1 = (void*) unBox(y); 4838 char* z = glade_get_widget_name(b1); 4839 return mkStr(z); 4840 } 4841 4842 any cfun_glade_get_widget_tree(any ex) { 4843 any x = ex, y; 4844 x = cdr(x); 4845 y = EVAL(car(x)); 4846 NeedNum(ex, y); 4847 void* b1 = (void*) unBox(y); 4848 void* z = glade_get_widget_tree(b1); 4849 return box(z); 4850 } 4851 4852 static any lcb_signal; 4853 4854 static any lfun_signal() { 4855 cell c[0]; 4856 apply(NULL, lcb_signal, NO, 0, c); 4857 drop(c[0]); 4858 return Nil; 4859 } 4860 4861 static any lcb_destroyNotify; 4862 4863 static any lfun_destroyNotify() { 4864 cell c[0]; 4865 apply(NULL, lcb_destroyNotify, NO, 0, c); 4866 drop(c[0]); 4867 return Nil; 4868 } 4869 4870 any cfun_gtk_signal_connect_full(any ex) { 4871 any x = ex, y; 4872 x = cdr(x); 4873 y = EVAL(car(x)); 4874 NeedNum(ex, y); 4875 void* b1 = (void*) unBox(y); 4876 x = cdr(x); 4877 y = EVAL(car(x)); 4878 any y2s = xSym(y); 4879 char b2[bufSize(y2s)]; 4880 bufString(y2s, b2); 4881 x = cdr(x); 4882 y = EVAL(car(x)); 4883 lcb_signal = y; 4884 void* b3 = (void*) lfun_signal; 4885 x = cdr(x); 4886 y = EVAL(car(x)); 4887 void* b4 = (void*) 0; 4888 x = cdr(x); 4889 y = EVAL(car(x)); 4890 NeedNum(ex, y); 4891 void* b5 = (void*) unBox(y); 4892 x = cdr(x); 4893 y = EVAL(car(x)); 4894 lcb_destroyNotify = y; 4895 void* b6 = (void*) lfun_destroyNotify; 4896 x = cdr(x); 4897 y = EVAL(car(x)); 4898 NeedNum(ex, y); 4899 int b7 = (int) unBox(y); 4900 x = cdr(x); 4901 y = EVAL(car(x)); 4902 NeedNum(ex, y); 4903 int b8 = (int) unBox(y); 4904 ulong z = gtk_signal_connect_full(b1, b2, b3, b4, b5, b6, b7, b8); 4905 return box(z); 4906 } 4907 4908 static any lcb_signal2; 4909 4910 static any lfun_signal2(void* data) { 4911 cell c[1]; 4912 Push(c[0], box(data)); 4913 apply(NULL, lcb_signal2, NO, 1, c); 4914 drop(c[0]); 4915 return Nil; 4916 } 4917 4918 any cfun_g_signal_connect(any ex) { 4919 any x = ex, y; 4920 x = cdr(x); 4921 y = EVAL(car(x)); 4922 NeedNum(ex, y); 4923 void* b1 = (void*) unBox(y); 4924 x = cdr(x); 4925 y = EVAL(car(x)); 4926 any y2s = xSym(y); 4927 char b2[bufSize(y2s)]; 4928 bufString(y2s, b2); 4929 x = cdr(x); 4930 y = EVAL(car(x)); 4931 lcb_signal2 = y; 4932 void* b3 = (void*) lfun_signal2; 4933 x = cdr(x); 4934 y = EVAL(car(x)); 4935 NeedNum(ex, y); 4936 void* b4 = (void*) unBox(y); 4937 g_signal_connect(b1, b2, b3, b4); 4938 return Nil; 4939 }