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

函数缓冲=鱼片% # codegen% Declare 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);为i = 1:元素个数(缓冲)如果buffer(i) ~= char(13) buffer(j) = buffer(i);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_tnsizet =投(n,“喜欢”coder.opaque (“size_t”,' 0 '));％返回值是intretval = coder.opaque (“int”);retval = coder.ceval (“strncmp”if cstr(s1)， cstr(s2)， nsizet);%将不透明的返回值转换为MATLAB值y =投(retval,“int32”);%--------------函数sc =装运箱(s)% NULL终止C的MATLAB字符向量sc = [s, char(0)];

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

Castopaque_mex（“abc”,“abc”)

Castopaque_mex（“abc”,abd的)

Castopaque_mex（abd的,“abc”)