函数y = valtest% codegen%声明x1为一个初始值为“0”的整数x1 =码码。opaque（“int”，' 0 '）;声明x2具有与x1相同的类型和初始值x1, x2 =x2 = coder.ceval (“myfun”）;%通过比较x1的值来测试调用'myfun'的结果如果x = x y = 0;其他的y = 1;结束结束

函数缓冲=鱼片% # codegen%声明'f'为不透明类型'FILE *'，初始值为'NULL '％指定包含“文件*”类型定义的标题文件;f = coder.opaque ('文件 *'，“零”，“HeaderFile”，''）;%以二进制模式打开文件f = coder.ceval (fopen的装运箱(“filetest.m”），cstring（rb的））;%从文件中读取，直到到达并放置文件的末尾％内容到缓冲区n = int32 (1);我= int32 (1);缓冲=字符(0 (8192));而n > 0%默认情况下，MATLAB转换常量值%在生成的代码中为双精度%，因此插入显式的类型转换到int32。n = coder.ceval (从文件中读的，coder.ref（缓冲区（i）），int32（1），．..int32(元素个数(缓冲),f);I = I + n;结束coder.ceval (“关闭”f);缓冲= strip_cr(缓冲);％在Matlab字符向量结束时放置C终止字符'\ 0'函数Y = cstring(x) Y = [x char(0)];％删除所有字符13（CR），但保持字符10（LF）函数if (j = 1, j = 1, j = 1);为i = 1:元素个数(缓冲)如果Buffer (i) ~= char(13);J = J + 1;结束结束缓冲(i) = 0;

null = coder.opaque ('文件 *'，“零”，“HeaderFile”，''）;

ftmp =零;ftmp = coder.ceval (fopen的, ('testfile.txt'char (0)], [“r”char (0)));

如果ftmp = =零%错误条件结束

函数y = castopaque (s1, s2)％<0  - 不匹配的第一个字符在S1中的值较低，而不是S2% 0 -两个字符串的内容相等% >0 -第一个不匹配的字符在s1中的值大于s2中的值％% # codegencoder.cinclude (' < string.h >”）;N = min(numel(s1)， numel(s2));%转换要与size_t比较的字符数nsizet =投(n,“喜欢”coder.opaque (“size_t”，' 0 '））;％返回值是intretval = coder.opaque (“int”）;retval = coder.ceval (“strncmp”， cstr(s1)， cstr(s2)， nsizet);%将不透明返回值转换为MATLAB值y =投(retval,“int32”）;%--------------函数sc =装运箱(s)% NULL结束一个MATLAB字符向量为CSc = [s, char(0)];

codegencastopaquearg游戏{空白(3),空格(3)}-报告

Castopaque_mex（“abc”，“abc”）

Castopaque_mex（“abc”，abd的）

Castopaque_mex（abd的，“abc”）