[module] Track script "module code" status

test/cctest/test-api.cc

 // Copyright 2012 the V8 project authors. All rights reserved.
 // Redistribution and use in source and binary forms, with or without
 // modification, are permitted provided that the following conditions are
 // met:
 //
 //     * Redistributions of source code must retain the above copyright
 //       notice, this list of conditions and the following disclaimer.
 //     * Redistributions in binary form must reproduce the above
 //       copyright notice, this list of conditions and the following
 //       disclaimer in the documentation and/or other materials provided
@@ skipping 23587 matching lines @@
   CHECK(script1->GetPositionInfo(9, &info, script1->NO_OFFSET));
   CHECK_EQ(1, info.line);
   CHECK_EQ(0, info.column);
   CHECK_EQ(9, info.line_start);
   CHECK_EQ(17, info.line_end);
 
   // Fail when position is larger than script size.
   CHECK(!script1->GetPositionInfo(220384, &info, script1->NO_OFFSET));
 }
 
+TEST(ScriptIsModule) {
+  LocalContext env;
+  v8::Isolate* isolate = env->GetIsolate();
+  v8::HandleScope scope(isolate);
+  const char* url = "http://www.foo.com/foo.js";
+  v8::ScriptOrigin origin(v8_str(url), v8::Integer::New(isolate, 1));
+  v8::ScriptCompiler::Source script_source(v8_str("void 0;\n"), origin);
+  Local<Script> local_script;
+  i::Handle<i::SharedFunctionInfo> fn_info;
+
+  local_script =
+      v8::ScriptCompiler::Compile(env.local(), &script_source).ToLocalChecked();
+  fn_info = i::Handle<i::SharedFunctionInfo>::cast(
+      v8::Utils::OpenHandle(*local_script->GetUnboundScript()));
+  i::Handle<i::Script> globalScript(i::Script::cast(fn_info->script()));
+  CHECK_EQ(false, globalScript->is_module());
+
+  local_script = v8::ScriptCompiler::CompileModule(env.local(), &script_source)
+                     .ToLocalChecked();
+  fn_info = i::Handle<i::SharedFunctionInfo>::cast(
+      v8::Utils::OpenHandle(*local_script->GetUnboundScript()));
+  i::Handle<i::Script> moduleScript(i::Script::cast(fn_info->script()));
+  CHECK_EQ(true, moduleScript->is_module());
+}
+
 void CheckMagicComments(Local<Script> script, const char* expected_source_url,
                         const char* expected_source_mapping_url) {
   if (expected_source_url != NULL) {
     v8::String::Utf8Value url(script->GetUnboundScript()->GetSourceURL());
     CHECK_EQ(0, strcmp(expected_source_url, *url));
   } else {
     CHECK(script->GetUnboundScript()->GetSourceURL()->IsUndefined());
   }
   if (expected_source_mapping_url != NULL) {
     v8::String::Utf8Value url(
@@ skipping 1752 matching lines @@
   CHECK(object->SetPrototype(context.local(), v8::Null(isolate)).IsNothing());
 
   // The original prototype is still there
   Local<Value> new_proto =
       object->Get(context.local(), v8_str("__proto__")).ToLocalChecked();
   CHECK(new_proto->IsObject());
   CHECK(new_proto.As<v8::Object>()
             ->Equals(context.local(), original_proto)
             .FromJust());
 }