[monaco] incomplete completion list not working

src/vs/editor/browser/standalone/standaloneLanguages.ts

@@ -399,6 +399,12 @@ class SuggestAdapter {
 		const ran = model.getWordUntilPosition(position);
 
 		return toThenable<CompletionItem[]|CompletionList>(this._provider.provideCompletionItems(model, position, token)).then(value => {
+			let defaultSuggestions: modes.ISuggestResult = {
+				suggestions: [],
+				currentWord: ran ? ran.word : '',
+			};
+			let allSuggestions: modes.ISuggestResult[] = [defaultSuggestions];
+
 			let list: CompletionList;
 			if (Array.isArray(value)) {
 				list = {
@@ -407,6 +413,7 @@ class SuggestAdapter {
 				};
 			} else if (typeof value === 'object' && Array.isArray(value.items)) {
 				list = value;
+				defaultSuggestions.incomplete = list.isIncomplete;
 			} else if (!value) {
 				// undefined and null are valid results
 				return;
@@ -415,12 +422,6 @@ class SuggestAdapter {
 				console.warn('INVALID result from completion provider. expected CompletionItem-array or CompletionList but got:', value);
 			}
 
-			let defaultSuggestions: modes.ISuggestResult = {
-				suggestions: [],
-				currentWord: ran ? ran.word : '',
-			};
-			let allSuggestions: modes.ISuggestResult[] = [defaultSuggestions];
-
 			for (let i = 0; i < list.items.length; i++) {
 				const item = list.items[i];
 				const suggestion = SuggestAdapter.from(item);