トップ «前の日記(2008-01-17) 最新次の日記(2008-01-20)» 編集

Orz日記 by Akio Morita

ToDo:

15 SAD Fit[]回りの障害事例の解析
10 smart pointer版PEGクラスの再実装(Left Recursionまわり)

2006|03|04|05|06|07|08|09|10|11|12|

2007|01|02|03|04|06|09|10|11|12|

2008|01|02|03|04|05|06|07|08|09|10|11|12|

2009|01|02|03|04|05|06|07|08|09|10|11|12|

2010|01|02|03|04|05|06|07|08|09|10|11|12|

2011|01|02|03|04|05|06|07|08|09|10|11|12|

2012|01|02|03|04|05|07|08|09|10|11|12|

2013|01|03|04|05|06|07|08|09|10|11|12|

2014|01|02|03|04|05|06|07|08|09|10|11|12|

2015|01|02|03|04|06|07|08|10|12|

2016|01|02|03|05|06|08|10|11|

2017|01|02|03|04|05|06|07|09|10|11|12|

2018|01|02|03|04|06|07|08|09|10|11|12|

2019|01|03|04|05|07|08|09|10|11|12|

2020|01|02|03|04|05|06|07|08|09|10|11|12|

2021|01|02|03|04|05|06|07|08|09|10|11|12|

2022|01|02|03|04|05|06|07|08|09|10|11|12|

2023|01|02|03|04|05|06|07|08|09|10|11|12|

2024|01|02|03|04|05|06|07|08|09|

2008-01-17 [長年日記]

_ [SAD]Random[] family入れ換え

Random[] familyを RandomMT extension moduleベースのものに入れ換え

ただし、TRACKモジュール等で使われている iseed, tran(), tgauss()系は既存のままなので、これらの疑似乱数列は SEED, \$SEED変数で制御される点に注意

_ [SAD]SeekFile[]サポート with GCC4.3.0

gfortranで不足している fseek intrinsicが、GCC 4.3.0から実装されているので、SeekFile[]を復活させてみました。

g77だと、fseekは引数3個の整数を返す関数(fseek -> fseek_)なのだが gfortranだと引数4個のサブルーチン(fseek -> _gfortran_fseek_sub) だったりするので、Fortranでの名前空間の衝突を避けつつ fseek_を提供するために Fortran + Cの二段構えのラッパーになりました

まあ、使っているって話は聞かないけど、動かない機能があるのは気持ち悪いので...

[ツッコミを入れる]

カテゴリー: Admin | Emacs | EPICS | Fortran | FreeBSD | GCC | hgsubversion | IPv6 | KEKB | LHC | Lisp | LLVM | MADX | Ryzen | SAD | samba | tDiary | unix | WWW | YaSAI | お仕事 | イベント | 出張 | 宴会 | 数学 | 艦これ | 買いもの | 追記 | 雑記