/dports/lang/mosh/mosh-0.2.7/lib/yuni/miniobj/ |
H A D | minitype.sls | 18 (simple-struct? obj) 20 (simple-struct-name obj)))) 44 (simple-struct-ref obj 1)) 47 (simple-struct-ref obj 0)) 50 (simple-struct-ref obj 1)) 53 (simple-struct-ref obj 0)) 56 (make-simple-struct 63 (make-simple-struct 67 (make-vector (length (minitype-slot minitype))))))) 92 (define (make-minitype-refslot minitype slot) [all …]
|
/dports/lang/guile/guile-3.0.7/test-suite/tests/ |
H A D | goops.test | 147 (pass-if "struct vtable" 149 ;; for which `struct-vtable-name' is #f. 190 (pass-if "interaction with `struct-ref'" 191 (eval '(define-class <class-struct> () 195 (eval '(let ((x (make <class-struct> 198 (and (struct? x) 203 (pass-if "interaction with `struct-set!'" 207 (eval '(let ((x (make <class-struct-2>))) 208 (struct-set! x 0 'hello) 209 (struct-set! x 1 'world) [all …]
|
/dports/lang/guile2/guile-2.2.7/test-suite/tests/ |
H A D | goops.test | 147 (pass-if "struct vtable" 149 ;; for which `struct-vtable-name' is #f. 190 (pass-if "interaction with `struct-ref'" 191 (eval '(define-class <class-struct> () 195 (eval '(let ((x (make <class-struct> 198 (and (struct? x) 203 (pass-if "interaction with `struct-set!'" 207 (eval '(let ((x (make <class-struct-2>))) 208 (struct-set! x 0 'hello) 209 (struct-set! x 1 'world) [all …]
|
/dports/lang/guile1/guile-1.8.8/test-suite/tests/ |
H A D | goops.test | 145 (pass-if "struct vtable" 181 (eval '(let ((x (make <class-struct> 184 (and (struct? x) 193 (eval '(let ((x (make <class-struct-2>))) 194 (struct-set! x 0 'hello) 195 (struct-set! x 1 'world) 196 (and (struct? x) 313 (equal? (slot-ref o1 'the-slot) 777) 366 (slot-ref object 'the-slot) 445 (define bar (make <bar>)) [all …]
|
/dports/lang/racket/racket-8.3/share/pkgs/swindle/ |
H A D | tiny-clos.rkt | 231 (define-values (struct:instance make-instance instance? inst-ref inst-set!) 233 (make-struct-type 'swindleobj #f 3 0 #f '() (current-inspector) 493 ;;>> (struct-type->class struct-type) 497 (define struct-to-class-table (make-hash-table)) 786 (make-setter-locked! (lookup-slot-info <method> slot values) #t 1347 ;;> struct type.) 1351 (if (struct-type? c) (struct-type->class c) c)) 1638 (make-setter-locked! (car slot) g+s lock 1992 ;;>> <struct> 2094 (defprimclass <opaque-struct> <struct>) [all …]
|
H A D | extra.rkt | 14 (define struct-to-slot-names (make-hash-table)) 16 (hash-table-put! struct-to-slot-names <struct> '()) 30 (hash-table-put! struct-to-slot-names this slots) 51 ;;>> (defstruct <struct-name> ([super]) slot ...) 53 ;;> (define-struct struct-name (slot ...) (make-inspector)) 54 ;;> (define-struct (struct-name super) (slot ...) (make-inspector)) 56 ;;> is computed by `struct-type->class'. The `(make-inspector)' is needed 57 ;;> to make this a struct that we can access information on. Note that in 79 ;;> To make things even easier, the super-struct can be written using a 104 [make-struct (datum->syntax-object [all …]
|
/dports/devel/swig/swig-4.0.2/Examples/test-suite/chicken/ |
H A D | li_std_string_runme_proxy.ss | 26 (define struct (make <Structure>)) 29 (if (not (string=? (slot-ref struct 'MemberString) "")) 31 ;(slot-set! (slot-ref struct 'MemberString) "and how") 32 ;;(if (not (string=? (slot-ref struct 'MemberString) "and how")) 34 (if (not (string=? (slot-ref struct 'MemberString2) "member string 2")) 42 ;(if (not (string=? (Structure-ConstMemberString-get struct) "const member string"))
|
/dports/lang/racket/racket-8.3/collects/ffi/ |
H A D | unsafe.rkt | 470 (make-struct-type 474 (make-struct-field-accessor get 0 'proc) 475 (make-struct-field-accessor get 1 'name))))) 1702 ;; defines a type called _foo for a C struct, with user-procedues: make-foo, 1713 ;; slot named `super' can be used to extract this initial struct -- although 1800 (make-struct-type 'cpointer:TYPE 1833 (make-struct-info 1887 (raise-argument-error 'set-TYPE-SLOT! struct-string 0 x slot)) 2050 [(slot slot-type) (check-slot #'slot #'slot-type #f)] 2051 … [(slot slot-type #:offset slot-offset) (check-slot #'slot #'slot-type #'slot-offset)] [all …]
|
/dports/lang/racket-minimal/racket-8.3/collects/ffi/ |
H A D | unsafe.rkt | 470 (make-struct-type 474 (make-struct-field-accessor get 0 'proc) 475 (make-struct-field-accessor get 1 'name))))) 1702 ;; defines a type called _foo for a C struct, with user-procedues: make-foo, 1713 ;; slot named `super' can be used to extract this initial struct -- although 1800 (make-struct-type 'cpointer:TYPE 1833 (make-struct-info 1887 (raise-argument-error 'set-TYPE-SLOT! struct-string 0 x slot)) 2050 [(slot slot-type) (check-slot #'slot #'slot-type #f)] 2051 … [(slot slot-type #:offset slot-offset) (check-slot #'slot #'slot-type #'slot-offset)] [all …]
|
/dports/net/rsync/rsync-3.2.3/patches/ |
H A D | checksum-updating.diff | 14 make 77 +static void write_checksums(int slot, struct file_list *flist, int whole_dir) 138 struct file_list *flist = csum_cache[slot].flist; 191 @@ -429,10 +524,11 @@ static void read_checksums(int slot, struct file_list *flist, const char *dir… 204 @@ -453,7 +549,7 @@ static void read_checksums(int slot, struct file_list *flist, const char *dirnam 213 @@ -464,7 +560,14 @@ static void read_checksums(int slot, struct file_list *flist, const char *dirn… 347 void get_cached_checksum(int slot, const char *fname, struct file_struct *file, 351 struct file_list *flist = csum_cache[slot].flist; 632 This parameter tells rsync to make use of any cached checksum information 695 This parameter tells rsync to make use of any cached checksum information [all …]
|
H A D | checksum-reading.diff | 17 make 134 + for (slot = 0; slot < slots; slot++) { 135 + struct file_list *flist = csum_cache[slot].flist; 205 +static void read_checksums(int slot, struct file_list *flist, const char *dirname) 223 + if (slot) { 329 +void get_cached_checksum(int slot, const char *fname, struct file_struct *file, 332 + struct file_list *flist = csum_cache[slot].flist; 337 + read_checksums(slot, flist, file->dirname); 480 +int unchanged_file(char *fn, struct file_struct *file, STRUCT_STAT *st, int slot) 489 + if (checksum_files && slot >= 0) [all …]
|
/dports/devel/aws-c-io/aws-c-io-0.10.12/ |
H A D | README.md | 176 In this diagram, a channel is a collection of slots, and it knows how to make them communicate. It … 507 int aws_channel_slot_remove (struct aws_channel_slot *slot); 519 …int aws_channel_slot_insert_left (struct aws_channel_slot *slot, struct aws_channel_slot_ref *left… 585 int (*data_in) ( struct aws_channel_handler *handler, struct aws_channel_slot *slot, 587 int (*data_out) ( struct aws_channel_handler *handler, struct aws_channel_slot *slot, 590 … int (*on_shutdown_notify) (struct aws_channel_handler *handler, struct aws_channel_slot *slot, 592 … int (*shutdown_direction) (struct aws_channel_handler *handler, struct aws_channel_slot *slot, 599 `int data_in ( struct aws_channel_handler *handler, struct aws_channel_slot *slot, 606 `int data_out (struct aws_channel_handler *handler, struct aws_channel_slot *slot, 616 It only applies in the read direction. This gives the handler a chance to make a programmatic decis… [all …]
|
/dports/www/chromium-legacy/chromium-88.0.4324.182/third_party/llvm/llvm/test/CodeGen/ARM/ |
H A D | sjlj-prepare-critical-edge.ll | 2 ; Just make sure no one tries to make the assumption that the normal edge of an 5 %struct.__CFString = type opaque 7 declare void @bar(%struct.__CFString*, %struct.__CFString*) 11 %call = tail call %struct.__CFString* @bar3() 16 invoke void @bar(%struct.__CFString* undef, %struct.__CFString* null) 41 %exn.slot.0 = phi i8* [ %1, %lpad ], [ %4, %lpad5 ] 42 %ehselector.slot.0 = phi i32 [ %2, %lpad ], [ %5, %lpad5 ] 43 %7 = bitcast %struct.__CFString* %call to i8* 54 %lpad.val = insertvalue { i8*, i32 } undef, i8* %exn.slot.0, 0 59 declare %struct.__CFString* @bar3() [all …]
|
/dports/devel/llvm-cheri/llvm-project-37c49ff00e3eadce5d8703fdc4497f28458c64a8/llvm/test/CodeGen/ARM/ |
H A D | sjlj-prepare-critical-edge.ll | 2 ; Just make sure no one tries to make the assumption that the normal edge of an 5 %struct.__CFString = type opaque 7 declare void @bar(%struct.__CFString*, %struct.__CFString*) 11 %call = tail call %struct.__CFString* @bar3() 16 invoke void @bar(%struct.__CFString* undef, %struct.__CFString* null) 41 %exn.slot.0 = phi i8* [ %1, %lpad ], [ %4, %lpad5 ] 42 %ehselector.slot.0 = phi i32 [ %2, %lpad ], [ %5, %lpad5 ] 43 %7 = bitcast %struct.__CFString* %call to i8* 54 %lpad.val = insertvalue { i8*, i32 } undef, i8* %exn.slot.0, 0 59 declare %struct.__CFString* @bar3() [all …]
|
/dports/devel/llvm10/llvm-10.0.1.src/test/CodeGen/ARM/ |
H A D | sjlj-prepare-critical-edge.ll | 2 ; Just make sure no one tries to make the assumption that the normal edge of an 5 %struct.__CFString = type opaque 7 declare void @bar(%struct.__CFString*, %struct.__CFString*) 11 %call = tail call %struct.__CFString* @bar3() 16 invoke void @bar(%struct.__CFString* undef, %struct.__CFString* null) 41 %exn.slot.0 = phi i8* [ %1, %lpad ], [ %4, %lpad5 ] 42 %ehselector.slot.0 = phi i32 [ %2, %lpad ], [ %5, %lpad5 ] 43 %7 = bitcast %struct.__CFString* %call to i8* 54 %lpad.val = insertvalue { i8*, i32 } undef, i8* %exn.slot.0, 0 59 declare %struct.__CFString* @bar3() [all …]
|
/dports/devel/llvm-devel/llvm-project-f05c95f10fc1d8171071735af8ad3a9e87633120/llvm/test/CodeGen/ARM/ |
H A D | sjlj-prepare-critical-edge.ll | 2 ; Just make sure no one tries to make the assumption that the normal edge of an 5 %struct.__CFString = type opaque 7 declare void @bar(%struct.__CFString*, %struct.__CFString*) 11 %call = tail call %struct.__CFString* @bar3() 16 invoke void @bar(%struct.__CFString* undef, %struct.__CFString* null) 41 %exn.slot.0 = phi i8* [ %1, %lpad ], [ %4, %lpad5 ] 42 %ehselector.slot.0 = phi i32 [ %2, %lpad ], [ %5, %lpad5 ] 43 %7 = bitcast %struct.__CFString* %call to i8* 54 %lpad.val = insertvalue { i8*, i32 } undef, i8* %exn.slot.0, 0 59 declare %struct.__CFString* @bar3() [all …]
|
/dports/graphics/llvm-mesa/llvm-13.0.1.src/test/CodeGen/ARM/ |
H A D | sjlj-prepare-critical-edge.ll | 2 ; Just make sure no one tries to make the assumption that the normal edge of an 5 %struct.__CFString = type opaque 7 declare void @bar(%struct.__CFString*, %struct.__CFString*) 11 %call = tail call %struct.__CFString* @bar3() 16 invoke void @bar(%struct.__CFString* undef, %struct.__CFString* null) 41 %exn.slot.0 = phi i8* [ %1, %lpad ], [ %4, %lpad5 ] 42 %ehselector.slot.0 = phi i32 [ %2, %lpad ], [ %5, %lpad5 ] 43 %7 = bitcast %struct.__CFString* %call to i8* 54 %lpad.val = insertvalue { i8*, i32 } undef, i8* %exn.slot.0, 0 59 declare %struct.__CFString* @bar3() [all …]
|
/dports/devel/llvm12/llvm-project-12.0.1.src/llvm/test/CodeGen/ARM/ |
H A D | sjlj-prepare-critical-edge.ll | 2 ; Just make sure no one tries to make the assumption that the normal edge of an 5 %struct.__CFString = type opaque 7 declare void @bar(%struct.__CFString*, %struct.__CFString*) 11 %call = tail call %struct.__CFString* @bar3() 16 invoke void @bar(%struct.__CFString* undef, %struct.__CFString* null) 41 %exn.slot.0 = phi i8* [ %1, %lpad ], [ %4, %lpad5 ] 42 %ehselector.slot.0 = phi i32 [ %2, %lpad ], [ %5, %lpad5 ] 43 %7 = bitcast %struct.__CFString* %call to i8* 54 %lpad.val = insertvalue { i8*, i32 } undef, i8* %exn.slot.0, 0 59 declare %struct.__CFString* @bar3() [all …]
|
/dports/devel/llvm11/llvm-11.0.1.src/test/CodeGen/ARM/ |
H A D | sjlj-prepare-critical-edge.ll | 2 ; Just make sure no one tries to make the assumption that the normal edge of an 5 %struct.__CFString = type opaque 7 declare void @bar(%struct.__CFString*, %struct.__CFString*) 11 %call = tail call %struct.__CFString* @bar3() 16 invoke void @bar(%struct.__CFString* undef, %struct.__CFString* null) 41 %exn.slot.0 = phi i8* [ %1, %lpad ], [ %4, %lpad5 ] 42 %ehselector.slot.0 = phi i32 [ %2, %lpad ], [ %5, %lpad5 ] 43 %7 = bitcast %struct.__CFString* %call to i8* 54 %lpad.val = insertvalue { i8*, i32 } undef, i8* %exn.slot.0, 0 59 declare %struct.__CFString* @bar3() [all …]
|
/dports/devel/wasi-compiler-rt13/llvm-project-13.0.1.src/llvm/test/CodeGen/ARM/ |
H A D | sjlj-prepare-critical-edge.ll | 2 ; Just make sure no one tries to make the assumption that the normal edge of an 5 %struct.__CFString = type opaque 7 declare void @bar(%struct.__CFString*, %struct.__CFString*) 11 %call = tail call %struct.__CFString* @bar3() 16 invoke void @bar(%struct.__CFString* undef, %struct.__CFString* null) 41 %exn.slot.0 = phi i8* [ %1, %lpad ], [ %4, %lpad5 ] 42 %ehselector.slot.0 = phi i32 [ %2, %lpad ], [ %5, %lpad5 ] 43 %7 = bitcast %struct.__CFString* %call to i8* 54 %lpad.val = insertvalue { i8*, i32 } undef, i8* %exn.slot.0, 0 59 declare %struct.__CFString* @bar3() [all …]
|
/dports/devel/wasi-compiler-rt12/llvm-project-12.0.1.src/llvm/test/CodeGen/ARM/ |
H A D | sjlj-prepare-critical-edge.ll | 2 ; Just make sure no one tries to make the assumption that the normal edge of an 5 %struct.__CFString = type opaque 7 declare void @bar(%struct.__CFString*, %struct.__CFString*) 11 %call = tail call %struct.__CFString* @bar3() 16 invoke void @bar(%struct.__CFString* undef, %struct.__CFString* null) 41 %exn.slot.0 = phi i8* [ %1, %lpad ], [ %4, %lpad5 ] 42 %ehselector.slot.0 = phi i32 [ %2, %lpad ], [ %5, %lpad5 ] 43 %7 = bitcast %struct.__CFString* %call to i8* 54 %lpad.val = insertvalue { i8*, i32 } undef, i8* %exn.slot.0, 0 59 declare %struct.__CFString* @bar3() [all …]
|
/dports/devel/wasi-libcxx/llvm-project-13.0.1.src/llvm/test/CodeGen/ARM/ |
H A D | sjlj-prepare-critical-edge.ll | 2 ; Just make sure no one tries to make the assumption that the normal edge of an 5 %struct.__CFString = type opaque 7 declare void @bar(%struct.__CFString*, %struct.__CFString*) 11 %call = tail call %struct.__CFString* @bar3() 16 invoke void @bar(%struct.__CFString* undef, %struct.__CFString* null) 41 %exn.slot.0 = phi i8* [ %1, %lpad ], [ %4, %lpad5 ] 42 %ehselector.slot.0 = phi i32 [ %2, %lpad ], [ %5, %lpad5 ] 43 %7 = bitcast %struct.__CFString* %call to i8* 54 %lpad.val = insertvalue { i8*, i32 } undef, i8* %exn.slot.0, 0 59 declare %struct.__CFString* @bar3() [all …]
|
/dports/devel/tinygo/tinygo-0.14.1/llvm-project/llvm/test/CodeGen/ARM/ |
H A D | sjlj-prepare-critical-edge.ll | 2 ; Just make sure no one tries to make the assumption that the normal edge of an 5 %struct.__CFString = type opaque 7 declare void @bar(%struct.__CFString*, %struct.__CFString*) 11 %call = tail call %struct.__CFString* @bar3() 16 invoke void @bar(%struct.__CFString* undef, %struct.__CFString* null) 41 %exn.slot.0 = phi i8* [ %1, %lpad ], [ %4, %lpad5 ] 42 %ehselector.slot.0 = phi i32 [ %2, %lpad ], [ %5, %lpad5 ] 43 %7 = bitcast %struct.__CFString* %call to i8* 54 %lpad.val = insertvalue { i8*, i32 } undef, i8* %exn.slot.0, 0 59 declare %struct.__CFString* @bar3() [all …]
|
/dports/devel/llvm90/llvm-9.0.1.src/test/CodeGen/ARM/ |
H A D | sjlj-prepare-critical-edge.ll | 2 ; Just make sure no one tries to make the assumption that the normal edge of an 5 %struct.__CFString = type opaque 7 declare void @bar(%struct.__CFString*, %struct.__CFString*) 11 %call = tail call %struct.__CFString* @bar3() 16 invoke void @bar(%struct.__CFString* undef, %struct.__CFString* null) 41 %exn.slot.0 = phi i8* [ %1, %lpad ], [ %4, %lpad5 ] 42 %ehselector.slot.0 = phi i32 [ %2, %lpad ], [ %5, %lpad5 ] 43 %7 = bitcast %struct.__CFString* %call to i8* 54 %lpad.val = insertvalue { i8*, i32 } undef, i8* %exn.slot.0, 0 59 declare %struct.__CFString* @bar3() [all …]
|
/dports/devel/llvm80/llvm-8.0.1.src/test/CodeGen/ARM/ |
H A D | sjlj-prepare-critical-edge.ll | 2 ; Just make sure no one tries to make the assumption that the normal edge of an 5 %struct.__CFString = type opaque 7 declare void @bar(%struct.__CFString*, %struct.__CFString*) 11 %call = tail call %struct.__CFString* @bar3() 16 invoke void @bar(%struct.__CFString* undef, %struct.__CFString* null) 41 %exn.slot.0 = phi i8* [ %1, %lpad ], [ %4, %lpad5 ] 42 %ehselector.slot.0 = phi i32 [ %2, %lpad ], [ %5, %lpad5 ] 43 %7 = bitcast %struct.__CFString* %call to i8* 54 %lpad.val = insertvalue { i8*, i32 } undef, i8* %exn.slot.0, 0 59 declare %struct.__CFString* @bar3() [all …]
|