source: trunk/oldtest/src/matlab/test_put.m @ 2038

Last change on this file since 2038 was 165, checked in by dkearney, 18 years ago

1) removing matlab and octave tests for put*id functions
2) adding old fortran examples
3) minor changes to matlab and octave to fix rpUnitsGetBasis
4) rpUnitsMakeMetric does not work in matlab
5) changes to fortran bindings to return proper error codes.
6) added debugging to matlab compiling options and changed outdir location in Makefile
File size: 1.2 KB
Line 
1% ----------------------------------------------------------------------
2%  TEST: Matlab's Rappture Library Test Functions.
3%
4%   [err] = test_put(libHandle,path,value,id,append)
5%
6%
7% ======================================================================
8%  AUTHOR:  Derrick Kearney, Purdue University
9%  Copyright (c) 2004-2005  Purdue Research Foundation
10%
11%  See the file "license.terms" for information on usage and
12%  redistribution of this file, and for a DISCLAIMER OF ALL WARRANTIES.
13% ======================================================================
14
15function [err] = test_put(libHandle,path,value,append)
16    err = 1;
17    disp(sprintf('\n\nTESTING rpLibPut\n'));
18    [err] = rpLibPut(libHandle,path,value,append);
19    if ~err
20        [retStr, err] = rpLibGet(libHandle,path);
21        disp(sprintf ('retStr = %s\n',retStr));
22        if ~err
23            if strcmp(retStr,value)
24                disp(sprintf ('rpLibPut Successful\n'));
25            else
26                disp(sprintf ('rpLibPut FAILED\n'));
27            end
28        else
29            disp(sprintf ('rpLibGet returned Error\n'));
30        end
31    else
32        disp(sprintf('Error within rpLibPut\n'));
33    end
34return
Note: See TracBrowser for help on using the repository browser.