我想写点像
let timeit (x:'a->'b) =
let start = System.DateTime.Now
x
let duration = System.DateTime.Now - start
printfn "time usage = %A" duration.Milliseconds
()
它适用于
let matrixtest() =
let x = vector[1.;2.;4.]
let y = matrix[[1.;2.;4.;];[3.;4.;9.;]]
printfn "%A" (y * x)
()
但不是
let rec fib x =
match x with
| 0 | 1 -> 1
| n -> fib (n-1) + fib (n-2)
sa F#是静态类型的.
任何的想法？谢谢.
我有这个LINQ语句
Dim Demo = From d In DBDataTable.AsEnumerable _
Select id = d.Field(Of Integer)("id"), _
Column = d.Field(Of Object) (_column2), _
Col3 = d.Field(Of Object)(_column3), _
Col4 = IIf(_Col4 <> -1, d.Field(Of Object)(_Col4), Nothing)
如果/ iif在select中,我有什么方法可以使用吗？
我想检查一个元素是否存在于特定的向量位置,比如i,然后像v [i]一样访问它.你能让我知道我该怎么办？
谢谢.
我通过Web平台安装程序在Windows 7上安装了用于FastCGI的PHP.我需要编辑php.ini以启用日志记录,但我无法覆盖现有文件,显然是因为某些内容已打开和/或已锁定.
在IIS管理器中停止服务器没有帮助; 停止Windows进程激活服务和万维网发布服务没有帮助.phpinfo()确认我正在使用正确的文件(C:\ Program Files(x86)\ PHP\php.ini).它没有标记为只读,我确实有权限.我没有想法.
我有一个主程序,它创建一个N子线程的集合来执行一些计算.从创建线程到完成任务的那一刻,每个孩子都将完全占据他们的任务.主程序还将创建一个特殊的(N + 1)线程,它有一些间歇性的任务要执行.当满足某些条件时(如全局变量具有某个值),特殊线程将执行计算,然后返回以等待再次满足这些条件.至关重要的是,当第N + 1个线程无关时,它不应该减慢其他处理器的速度.有人可以建议如何实现这一目标.
编辑: 明显但笨拙的方式是这样的:
// inside one of the standard worker child threads...
if (time_for_one_of_those_intermittent_calculations_to_be_done())
{
global_flag_set = TRUE;
}
和
// inside the special (N+1)th thread
for(;;)
{
if (global_flag_set == TRUE)
{
perform_big_calculation();
global_flag_set = FALSE;
}
// sleep for a while?
}
我想使用mercurial的precommit钩子运行我所有的django测试.每当测试失败时,提交将被中止.
目标是尽可能频繁地阻止构建破坏的提交.
编辑:使用外部脚本路径结束.这是我的hgrc的相当部分:
[hooks]
precommit = python ./pinax/projects/lgr/manage.py test lgr_photos --verbosity=0 --noinput
commit = hg push
这是我在钩子函数上的进展:
from os.path import join, dirname
import sys
from django.core.management import call_command
def hook(ui, repo, **kwargs):
project_path = join( dirname(repo.path), 'pinax', 'projects')
sys.path.insert(0, project_path)
from lgr.manage import *
output = call_command('test', verbosity=0, interactive=False)
#ui.warn(output)
我在这做错了什么？
PS - 它提供了一个巨大的错误追溯,它包含在下面的整个内容中
jim@ubuntu:~/workspace/lgr$ hg ci -m 'testing hooks'
No username found, using 'jim@ubuntu.ubuntu-domain' instead
error: precommit hook raised an exception: '_demandmod' object is not iterable
** unknown …我有一个模板化的类A <T,int>和两个typedef A <string,20>和A <string,30>.如何覆盖A <string,20>的构造函数？以下不起作用:
template <typename T, int M> class A;
typedef A<std::string, 20> one_type;
typedef A<std::string, 30> second_type;
template <typename T, int M>
class A {
public:
A(int m) {test= (m>M);}
bool test;
};
template<>
one_type::one_type() { cerr << "One type" << endl;}
我希望类A <std :: string,20>做一些其他类没有的东西.如何在不更改构造函数的情况下执行此操作A:A(int)？
push_back从中调用方法时std::vector,其大小增加1,意味着创建新实例,然后您传递的参数将被复制到最近创建的元素中,对吧？例:
myVector.push_back(MyVectorElement());
那么,如果我想简单地使用其默认值来增加向量的大小,那么使用该resize方法会不会更好？我的意思是这样的:
myVector.resize(myVector.size() + 1);
据我所知,这将完成相同的事情,但会避免完全不必要的元素属性的赋值副本.
这种推理是正确的还是我错过了什么？
有史以来第一次,我正在研究RichTextBoxC#Windows窗体中的控件.我知道我的应用程序中需要这个控件,因为TextBox它太简单了.
我有以下代码:
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Windows.Forms;
namespace _19_richtextbox
{
public partial class Form1 : Form
{
public Form1()
{
InitializeComponent();
}
private void richTextBoxHome_KeyDown(object sender, KeyEventArgs e)
{
if (e.KeyValue == (char)(Keys.Return))
{
richTextBoxChat.AppendText("Home:" + richTextBoxHome.Text + "\n");
richTextBoxHome.Clear();
}
}
}
}
目前我只想要在一个中输入的任何内容在击中时RichTextBox显示在另一个RichTextBox上Return.
问题是,每次我点击时Return,数据都被转移到另一个控件,但第一个控件在光标前留下了回车符.每次我击中都会发生这种情况Return.两个控件都接受多行输入.我如何让它停止这样做？
我想用一种方法将"Home:"部分用粗体表示.
我在搜索中发现的信息非常少.以下是我能理解的唯一实际代码.
rtb1.Rtf = @"{\rtf1\ansi {\b hello} {\i World}}" …例如这段代码:
new_log = ActivityLog(user=self.user,
activity=activity)
new_log.save()
我可以将它链接到new_log = ActivityLog(...).save()？
我相信我尝试了上述内容,但它不起作用.有没有办法让它成为一个班轮？