Overview
Comment:Typo: missing $ in front of variable names.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | origin/master | trunk
Files: files | file ages | folders
SHA3-256: 119443cd8ff358b3a08aa34a18dd9edebb91859798d9d895c27a37875d1698e5
User & Date: geraint@users.sourceforge.net on 2004-09-09 23:15:40
Other Links: branch diff | manifest | tags
Context
2004-09-10
21:05:15
Ensure that the system exists before proceeding.
This should stop me from copying my home directory to MTT_work.
check-in: 3d4ed12b52 user: geraint@users.sourceforge.net tags: origin/master, trunk
2004-09-09
23:15:40
Typo: missing $ in front of variable names. check-in: 119443cd8f user: geraint@users.sourceforge.net tags: origin/master, trunk
2004-09-07
20:38:44
Applies CRs before creating sese.make to avoid Circular dependencies. check-in: 2a7f044b8c user: geraint@users.sourceforge.net tags: origin/master, trunk
Changes

Modified mttroot/mtt/lib/cr/perl/lin.pm from [c83d02ae5f] to [961e5e7d01].

90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
	    $input,
	    $in_causality,
	    $in_port) = @args;

	if (($out_port == 2) and
	    ($in_port  == 1))
	{			# uni-causal
	    $retval = "((input)*(gain))";
	}

	elsif (($out_port == 1) and
	       ($in_port  == 2))
	{			# bi-causal
	    $retval = "((input)/(gain))";
	}
    }
    
    if ($retval)
    {
	return $retval;
    }







|





|







90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
	    $input,
	    $in_causality,
	    $in_port) = @args;

	if (($out_port == 2) and
	    ($in_port  == 1))
	{			# uni-causal
	    $retval = "(($input)*($gain))";
	}

	elsif (($out_port == 1) and
	       ($in_port  == 2))
	{			# bi-causal
	    $retval = "(($input)/($gain))";
	}
    }
    
    if ($retval)
    {
	return $retval;
    }


MTT: Model Transformation Tools
GitHub | SourceHut | Sourceforge | Fossil RSS ]