From octave-maintainers-request at bevo dot che dot wisc dot edu  Mon Oct 18 14:14:12 1999
Subject: Re: equivalent of fullfile (of matlab) in octave.
From: etienne grossmann <etienne at anonimo dot isr dot ist dot utl dot pt>
To: octave-maintainers at bevo dot che dot wisc dot edu
CC: etienne at isr dot ist dot utl dot pt
Date: Mon, 18 Oct 1999 20:12:43 +0100 (WEST)

--Multipart_Mon_Oct_18_20:12:43_1999-1
Content-Type: text/plain; charset=US-ASCII


  Hello

Lakshmi wrote:
> hi,
>  I have a problem in converting an octave equivalent code of matlab program.
>  In this program , I have to add a path in the program to get another function 
> in the same directory.In matlab it is written as
>  curdir=pwd;
> addpath(fullfile(curdir,'..','Base')); 
> addpath(fullfile(curdir,'..','Tools')); 

  For "addpath", you may try the code in the attachment (oh, no! I
should be sending it to "octave-source"! But what if Lakshmi doesn't
subscribe to "octave-source"?)

> Could you please tell me what is the Matlab Equivalent of this addpath or 
> fullfile.

  For
  fullfile(), you may try the following :

\begin{untested_code}

function s = fullfile(...)
  s = "";
  while nargin--,
    s=[s,va_arg()];
  end 
  t='';
  while !strcmp(t,s), 
    t=s;
    s=strrep(t,"/./","/");
    s=strrep(s,"//","/");
  end
  end
endfunction

\end{untested_code}

  Hope this helps,

  Etienne


--Multipart_Mon_Oct_18_20:12:43_1999-1
Content-Type: application/octet-stream
Content-Disposition: attachment; filename="addpath.m"
Content-Transfer-Encoding: base64

IyMgICAgICAgYWRkcGF0aChkaXIxLC4uLikKIyMKIyMgUHJlcGVuZHMgZGlyMSwuLi4gdG8g
dGhlIGN1cnJlbnQgTE9BRFBBVEguCiMjIAojIyAgICAgICBhZGRwYXRoKGRpcjEsJy1lbmQn
LGRpcjIsJy1iZWdpbicsZGlyMywnLUVORCcsZGlyNCwnLUJFR0lOJyxkaXI1KQojIyAKIyMg
UHJlcGVuZHMgZGlyMSwgZGlyMyBhbmQgZGlyNSBhbmQgYXBwZW5kcyBkaXIyIGFuZCBkaXI0
LiAKIyMKIyMgRm9yIG0qKioqYiBjb21wYXQuCiMjIAojIyBCVUcgOiBDYW4ndCBhZGQgZGly
ZWN0b3JpZXMgY2FsbGVkICctRU5EJywgJy1lbmQnLCAnLUJFR0lOJyBvciAnLWJlZ2luJwoj
IyAgICAgICBDYW4ndCBhZGQgZGlyZWN0b3JpZXMgdGhhdCBhcmUgbm90IHJlYWRhYmxlIGJ5
IHRoZWlyIG93bmVyCiMjCiMjIEZFQVRVUkUgOiBXb24ndCBhZGQgYSBzdHJpbmcgdGhhdCBp
cyBub3QgYSBkaXIuIApmdW5jdGlvbiBhZGRwYXRoKC4uLikKCiAgYXBwID0gMCA7CQkJIyBB
cHBlbmQ/IERlZmF1bHQgaXMgJ25vJy4KICB3aGlsZSBuYXJnaW4tLSwKICAgIHAgPSB2YV9h
cmcoKSA7CiAgICBpZiBzdHJjbXAocCwiLWVuZCIpIHwgc3RyY21wKHAsIi1FTkQiKSAsCiAg
ICAgIGFwcCA9IDEgOwogICAgZWxzZWlmIHN0cmNtcChwLCItYmVnaW4iKSB8IHN0cmNtcChw
LCItQkVHSU4iKSAsCiAgICAgIGFwcCA9IDAgOwogICAgZWxzZQogICAgICBbcyxlcnIsbV0g
PSBzdGF0KHApIDsJCSMgQ2hlY2sgZm9yIGV4aXN0ZW5jZQogICAgICBpZiBlcnIsCglwcmlu
dGYoImFkZHBhdGggOiBTdGF0IG9uICVzIHJldHVybnNcbiAlc1xuIixwLG0pOwogICAgICBl
bHNlaWYgaW5kZXgocy5tb2Rlc3RyLCJkIikhPTEsCglwcmludGYoImFkZHBhdGggOiA+JXM8
IGlzIG5vdCBhIGRpciAobW9kZT0lcylcbiIsIHMubW9kZXN0cik7CgogICAgICBlbHNlaWYg
IGluZGV4KHMubW9kZXN0ciwiciIpIT0yLCAjIEFzdW1lIEknbSBvd25lci4gVGhhdCdzIGEg
YnVnCgoJcHJpbnRmKCJhZGRwYXRoIDogPiVzPCBpcyBub3QgYSByZWFkYWJsZSAobW9kZT0l
cylcbiIsLi4uCgkgICAgICAgcy5tb2Rlc3RyKTsKICAgICAgZWxzZWlmICEgYXBwLAoJTE9B
RFBBVEggPSBbcCwnOicsTE9BRFBBVEhdIDsKICAgICAgZWxzZQoJTE9BRFBBVEggPSBbTE9B
RFBBVEgsJzonLHBdIDsKICAgICAgZW5kCiAgICBlbmQKICBlbmQKICAgIA==

--Multipart_Mon_Oct_18_20:12:43_1999-1--