File: char_binary_runme.rb

package info (click to toggle)
swig 4.3.0-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 46,232 kB
  • sloc: cpp: 54,631; ansic: 29,122; java: 17,530; python: 12,505; cs: 10,369; ruby: 7,232; yacc: 6,477; makefile: 5,965; javascript: 5,520; sh: 5,415; perl: 4,187; php: 3,693; ml: 2,187; lisp: 2,056; tcl: 1,991; xml: 115
file content (35 lines) | stat: -rw-r--r-- 942 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
#!/usr/bin/env ruby
#
# Put description here
#

require 'swig_assert'
require 'char_binary'

include Char_binary

t = Test.new
str = 'hile'
swig_assert(t.strlen(str) == 4, binding, 'bad multi-arg typemap')
swig_assert(t.ustrlen(str) == 4, binding, 'bad multi-arg typemap')
swig_assert(t.strlen("hil\000") == 4, binding, 'bad multi-arg typemap')
swig_assert(t.ustrlen("hil\000") == 4, binding, 'bad multi-arg typemap')

# creating a raw char*
pc = new_pchar(5)
pchar_setitem(pc, 0, 'h')
pchar_setitem(pc, 1, 'o')
pchar_setitem(pc, 2, 'l')
pchar_setitem(pc, 3, 'a')
pchar_setitem(pc, 4, 0)

swig_assert(t.strlen(pc) == 4, binding, 'bad multi-arg typemap')
swig_assert(t.ustrlen(pc) == 4, binding, 'bad multi-arg typemap')

Char_binary.var_pchar = pc
swig_assert(Char_binary.var_pchar == 'hola', binding, 'bad pointer case')

Char_binary.var_namet = pc
swig_assert(Char_binary.var_namet == 'hola', binding, 'bad pointer case')

delete_pchar(pc)